Форум: "Базы";
Текущий архив: 2003.02.03;
Скачать: [xml.tar.bz2];
ВнизdbiCopyTable() Найти похожие ветки
← →
Pat (2003-01-17 01:19) [0]Как заставить эту гадость понимать русские символы? Т.е. я имею ввиду следующее:
procedure TForm1.Button1Click(Sender: TObject);
var Path:string;
begin
Path:="c:\привет\";
ForceDirectories(Path);
Path:=Path+Table.TableName;
Check(DbiCopyTable(Table.dbhandle, True,
pchar(Table.TableName), nil,
PChar(Path)))
end;
Если в Path содержатся русские буквы - выдается ошибка Path not found...как лечить??? :-(((((((((
← →
sniknik (2003-01-17 02:12) [1]виндовс нестандартные имена (с пробелами, в локальной кодировке) в кавычки "пакует" попробуй может выйдет
"D:\Progra m Files\Microsof t Office\Office10\MSACCESS.EXE "
← →
Pat (2003-01-17 03:10) [2]К сожалению, не помогло :-(((
Invalid File Name
← →
Pat (2003-01-17 08:21) [3]Опытным путем (естественно, из-за моей ошибки :-))) нашел, что все русские символы "сдвигаются"...т.е.
а = р
б = с
в = т
.......
Есть бредовая идея сдвигать это все...А можно просто кодировка какая-нибудь не та испльзуется?
← →
a_k_v (2003-01-17 12:17) [4]Попробуй так:
var Path: PChar;
P2: PChar;
begin
P2 :="f:\Привет\";
ForceDirectories(P2);
CharToOem(P2, Path);
Path:=PChar(Path + Table1.TableName);
caption := P2;
Check(DbiCopyTable(Table1.dbhandle, True,
pchar(Table1.TableName), nil,
PChar(Path)))
end;
← →
Anatoly Podgoretsky (2003-01-17 12:21) [5]Так ясно, почему то функция работает с OEM вместо ANSI
← →
a_k_v (2003-01-17 13:37) [6]Да-с, абсолютное безобразие :)
← →
Pat (2003-01-17 14:22) [7]Вау!!!!! Рулез!!! БО-О-О-О-ОЛЬ-ШОЕ СПАСИБО!!!
Обыскал весь инет...у многих такая же проблема..решение нигде не было предложено...А здесь помогли.. :-))))
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.02.03;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.01 c