![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
DBF - кодировка DOS -> Win
AlexRush © (2003-08-11 18:30:00)
Есть DBF (dBase IV) в кодировке ДОС. Как мне из свойе проги осуществить нечто типа
if Table1.FieldByName("FIELD_NAME").AsString = "ТекстКирилица в Win"
then DoSome();
Карелин Артем (2003-08-12 09:35:00) [1]
Попробуй Field.Transliterate:=false;
dabadabiabo (2003-08-11 18:49:00) [2]
Процедура устанавливает для текущей сессии (пока прога работает) досовскую кодировку. После просто не обращаешь внимания в какой кодировке база...
procedure Form1.FormCreate(Sender: TObject);
var
AParams: TStringList;
begin
AParams := TStringList.Create;
AParams.Clear;
AParams.Add("LANGDRIVER=db866ru0");
Session.ConfigMode:=[cfmSession];
Session.ModifyDriver("DBASE",AParams);
AParams.Free;
end;