pChar и "+"

← →
AlexZ_CRC (2004-06-22 21:49) [0]

Ещё раз Здрасте =)
Суть в следующем:
Вызываю диалог выьора папки (SHBrowseForFolder). Получаем путь к папке в Path: array[0..100] of char... a"la:
MessageBox(Handle,Path,"",MB_OK); // показывает выбраный путь
далее CreateFile(Path+FileName,...); //Path: pChar; (бред)
Вобщем, вопрос: как склеить путь и имя файла? (чтобы CreateFile его признал, ато компилер ругается...)

← →
Игорь Шевченко © (2004-06-22 22:35) [1]

String(Path)+FileName ?

← →
AlexZ_CRC (2004-06-22 22:51) [2]

Дело в том, что CreateFile(X: pAnsiChar,....);
поэтому, String там недопустимо.
pChar(Path)+FileName // опять компилер ругается, - так нельзя...
---

Path: array[0..100] of char;
Filename: pChar;

Просто FileName, ессно проходит на "Ура". Но как привести к одному типу/"склеить" - незнаю.

← →
AlexZ_CRC (2004-06-22 22:52) [3]

Удалено модератором

← →
Игорь Шевченко © (2004-06-22 23:18) [4]

PChar(String(Path)+FileName) ?

← →
Игорь Шевченко © (2004-06-22 23:21) [5]

procedure TForm1.FormCreate(Sender: TObject); var Path: array[0..MAX_PATH] of char; FileName: string; begin GetTempPath(SizeOf(Path), Path); FileName := "aaa.tmp"; MessageBox(Handle, PChar(string(Path)+"\"+FileName), "Foo", MB_OK); end;

Ку?

← →
AlexZ_CRC (2004-06-22 23:55) [6]

Ку!
Огромное mercy!!! ответ #[4]- супер!
И спасибо, что не поленились написать #[5] (хотя из #4 всё понятно).
PChar(String(Path)+FileName); // C00L!
BIG THANKS!!! :) АПИ рулят!

))))

pChar и "+" Найти похожие ветки