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

C: Windows System   Найти похожие ветки 

← →
Александр из Минска ©   (2003-10-23 20:33) [0]

И как определить эту папку? Я нашел Windows.GetSystemDirectory, но я не знаю, что писать в параметрах. Напишите, пожалуйста, полный пример определения этой папки.

---

← →
Anatoly Podgoretsky ©   (2003-10-23 20:36) [1]

Да тамже параметров кот наплакал, адрес буфера и его длина

---

← →
default ©   (2003-10-23 20:37) [2]

в параметрах надо писать то, что написано в хелпе

---

← →
Александр из Минска ©   (2003-10-23 20:41) [3]

Не понял:( Напишите, пожалуйста, пример с параметрами. А в хелпе только 2-ой параметр я видел...

---

← →
Anatoly Podgoretsky ©   (2003-10-23 20:42) [4]

GetSystemDirectory(Buf,SizeOf(Buf))

---

← →
Александр из Минска ©   (2003-10-23 20:44) [5]

Извиняюсь за тупой вопрос, но какого типа Buf, и что ему присвоить?

---

← →
Anatoly Podgoretsky ©   (2003-10-23 20:45) [6]

Любого, присваивать ему ничего не надо

---

← →
default ©   (2003-10-23 20:46) [7]


procedure TForm1.Button1Click(Sender: TObject);
var
Buf: String;
begin

SetLength(Buf, 100);
SetLength(Buf, GetSystemDirectory(PChar(Buf), 100));
if Length(Buf) > 0 then Caption := Buf else ShowMessage("Где-то тупишь")

end;

совсем обленились

---

← →
Александр из Минска ©   (2003-10-23 20:47) [8]

Даже Integer подойдет?
И еще тип выводимого результата - Cardinal (как это в строку сделать (случайно не PChar(...))?)

---

← →
Александр из Минска ©   (2003-10-23 20:48) [9]

ОГРОМНОЕ СПАСИБО!!!

---

← →
Anatoly Podgoretsky ©   (2003-10-23 20:55) [10]

Что случилось, кто тебя заставил програмированием заниматься?

---

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

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



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