А реально paradox 3 for dos открыть табличку по русски

← →
muzzzy (2002-11-22 13:55) [0]

Вообще реально русскость увидеть в табличках paradox"a версии 3 для dos"a в Delphi(Builder"e)... Если да то плиз хелп ми ... уже
все перепробывал ... пишет билеберду и все... Какой Langdriver ставить в BDE?

← →
kostya (2002-11-22 14:23) [1]

Вообще то можно... Но не везде... Под чем работаешь?

← →
muzzzy (2002-11-22 14:51) [2]

в сысле под чем ... delphi 5, таблички лежать в отдельной директории... через TQuery открываю их...

← →
MsGuns (2002-11-22 16:10) [3]

Таблицы имеют русские заголовки ?

← →
muzzzy (2002-11-25 08:19) [4]

Лана вопрос сформулируем по другому ... у парадоксовых таблиц есть какойто байт указывающий на кодовую таблицу используемую в нунтри этой самой таблицы... Вопрос такой как средствами Дельфей поменять для paradox"овой таблицы кодовую страничку ( в DBE не лесть ибо это совсем нето) ...

← →
Valeron (2002-11-25 09:56) [5]

Ты открываешь данные через TQuery, а значит так или иначе используешь BDE. А значит нужно настроить Langdriver. Я выставляю в Configuration->Native->Paradox кириллицу. И нужно еще перегрузить комп чтобы настройки загрузились. если это не поможет, то используй компонент TDatabase и используй настройки ODBC.

← →
Zelius (2002-11-25 11:09) [6]

А можно еще начхать на настройки драйвера и считывать данные в том виде, в каком они лежат в файле, а потом самому их конвертировать ф-ией OemToChar, иногда так проще получается...

← →
muzzzy (2002-11-25 11:49) [7]

to Valeron ... я не про то тут...
Не надо торкать BDE драйвер и его языковые настройки ... меня интерисует персонально для файла *.db языковые настроики и как их поменять DbiDoRestructure() все время возвращает какуето ошибку если есть какойнить пример или итилитка буду признателен...

← →
Zelius (2002-11-25 13:28) [8]

aDBHnd - TDatabase.Handle;
aTblType - "PARADOX"/"DBASE"/"FOXPRO"
aLangDriver - "ancyrr".

procedure ChangeLangDriver( aDBHnd: HDBIDB; aTable: TTable; const aTblType, aLangDriver: String);
var
TblExt: string;
TblDesc: CRTblDesc;
OptDesc: FLDDesc;
OptData: array [0..250] of Char;
Cur: hDBICur;
Rec: CFGDesc;
begin
FillChar( OptDesc, SizeOf( OptDesc ), #0);
FillChar( TblDesc, SizeOf( TblDesc ), #0);
StrCopy( OptDesc.szName, "LANGDRIVER");
OptDesc.iLen := Length(aLangDriver) + 1;
with TblDesc do
begin
StrPCopy( szTblName, aTable.TableName);
StrCopy( szTblType, PChar(aTblType));
iOptParams := 1;
pfldOptParams := @OptDesc;
pOptData := @OptData;
end;
StrPCopy( OptData, aLangDriver);
Check( DbiDoRestructure( aDBHnd, 1, @TblDesc, nil, nil, nil, False ) );
end;

← →
muzzzy (2002-11-25 14:43) [9]

все хорошо ... только теперь у меня bde орет что таличка aTable используеться мной. Не activ:=false; не DisableControls непомогаю,
а вообще все выше изложенное очень похоже на пример из bdeapi (где половину написанно для D3 и просто не работает в 5 и старше, это не только мной замеченно)...

← →
Zelius (2002-11-25 16:43) [10]

Во первых, у меня это работает в Дельфи6, а во вторых, ты прав, таблица должна быть всеми закрыта, поэтому убедись, что она у тебя закрыта в design-time или в другом месте программы! Попробуй закрыть Дельфи и запустить программу отдельно, если не найдешь, где она открыта!

← →
muzzzy (2002-11-27 11:31) [11]

Глупо как-то!!! В DbiDoRestructure() нужно передовать handle от никому не нужного TDatabase содержащего директорию с табличками...
Почему нельзя использовать хандле от конкретной TTable с которой я работаю !?!

← →
Zelius (2002-11-27 11:45) [12]

Попробуй TTable.DBHandle, но помни: "DBHandle is assigned an initial value when a session is activate".

← →
muzzzy (2002-11-28 09:13) [13]

to Zelius ... неа неработает говорит Invalid Handle to Function ... Так шта... без TDataBase Не обойтись.

← →
Zelius (2002-11-28 10:04) [14]

а сессию открыл?

← →
muzzzy (2002-11-28 15:26) [15]

обижаеш ... Ну тут может и не этом дело, потому что тот же код на другой машине совсем другую ошибку выдает ... вообщем хрен его знает таварисч майор!!!

А реально paradox 3 for dos открыть табличку по русски Найти похожие ветки