![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Кодировка DOS в Paradox4.5 [D6, Paradox]
DSKalugin © (2005-02-18 16:22:00)база написана на Paradox4.5 для доса
в ней русскоязычные названия полей и содержимое некоторых полей
Естественно, оно выглядит при просмотре в Виндовс как ересь.
В DBD просмотрел структуру - драйвер "Paradox ascii"
Выставляю его в настройках БДЕ - не помогает
перепробовал все кириллические, ascii и ANSI - не помогает
Как всеже извлечь русскоязычную информацию?
DSKalugin (2005-02-18 18:11:00) [1]ААААААААААААААААААААААААААААААААААаааааааааааа
какая тупость
Взял и ДБД втупую сделал реструктуризацию
1-изменил названия всех полей из абры в латин
2-помменял дравер языка на Paradox Cyrr 866
нажал Сохранить и О ЧЮДО! получилось :-)))
хоть в ФАК выносите
DSKalugin (2005-02-18 17:36:00) [2]
procedure TForm1.Button1Click(Sender: TObject);
var d,s: String;
Source, Dest : array[0..255] of Char;
begin
// 1й способ
s:=Table1AAAAAAAAA.AsString;
SetLength(d, Length(S));
OemToAnsi(PChar(S), PChar(d));
edit1.Text:=d ;
SetLength(d,0);
// 2й способ
OemToAnsi(StrPCopy(Source, S), Dest);
edit1.Text:= StrPas(Dest);
end;
не работает. беру исходную ОЕМ строку из поля
DSKalugin (2005-02-18 17:32:00) [3]2 В ДОСе пишется скрипт
нету у меня доса, только ВинХП и Линукс.
я взял эту таблицу у "ненаших"
для извлечения информации
msguns (2005-02-18 17:02:00) [4]Мы эту траблу решали так:
В ДОСе пишется скрипт, который экспортирует таблицу в дбф с полями FIELDNNN и создает еще одну служебную дбф-ку, где сохраняет структуру исх.таблицы в виде
FIELDN - имя поля дбф (FIELDNNN)
FLNATIV - имя поля исх.таблицы (на русском)
FLTYPE - тип поля
FLPKFL - флажок прймкея
В виндузном парадоксе (конвертили в Paradox 7) берем эти дбф-ки и сначала создаем таблицу, потом заливаем в нее данные, сканируя исх.дбф и используя винапишную ф-цию OEM-преобразования символов
DSKalugin (2005-02-18 16:46:00) [5]может конверторы есть
или программу писать OEM2ANSI