| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

dbiCopyTable()

Pat ©   (2003-01-17 01:19:00) 

Как заставить эту гадость понимать русские символы? Т.е. я имею ввиду следующее:

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...как лечить??? :-(((((((((

---

Pat   (2003-01-17 14:22:00) [1]

Вау!!!!! Рулез!!! БО-О-О-О-ОЛЬ-ШОЕ СПАСИБО!!!
Обыскал весь инет...у многих такая же проблема..решение нигде не было предложено...А здесь помогли.. :-))))

---

a_k_v   (2003-01-17 13:37:00) [2]

Да-с, абсолютное безобразие :)

---

Anatoly Podgoretsky   (2003-01-17 12:21:00) [3]

Так ясно, почему то функция работает с OEM вместо ANSI

---

a_k_v   (2003-01-17 12:17:00) [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;

---

Pat   (2003-01-17 08:21:00) [5]

Опытным путем (естественно, из-за моей ошибки :-))) нашел, что все русские символы "сдвигаются"...т.е.
а = р
б = с
в = т
.......
Есть бредовая идея сдвигать это все...А можно просто кодировка какая-нибудь не та испльзуется?

---

Pat   (2003-01-17 03:10:00) [6]

К сожалению, не помогло :-(((
Invalid File Name

---

sniknik   (2003-01-17 02:12:00) [7]

виндовс нестандартные имена (с пробелами, в локальной кодировке) в кавычки "пакует" попробуй может выйдет
"D:\Progra m Files\Microsof t Office\Office10\MSACCESS.EXE "

---

Наверх