Скачать: CL | DM;

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!!! :) АПИ рулят!

---

← →
SammIk ©   (2004-06-23 14:49) [7]

))))

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c