Windows

← →
Anar (2002-10-23 12:19) [0]

Как узнать полный путь к папке Windows?

← →
Skier (2002-10-23 12:20) [1]

>Anar
GetWindowsDir(...) ?

← →
BillyJeans (2002-10-23 15:16) [2]

procedure TForm1.Button1Click(Sender: TObject);
var
WinDir : pChar;
begin
GetWindowsDirectory(p, 255);
Edit1.Text := WinDir;
end;

← →
ZZ (2002-10-23 16:53) [3]

BillyJeans
Ну и как? Неужели работает???

← →
Anatoly Podgoretsky (2002-10-23 17:00) [4]

Дай бог что бы откомпилировалось

← →
BillyJeans (2002-10-23 17:26) [5]

А так не догадаться...

GetWindowsDirectory( WinDir, 255);

← →
ZZ (2002-10-23 17:31) [6]

BillyJeans
Поставим вопрос по другому - что такое 255 в твоем примере?

← →
BillyJeans (2002-10-23 17:35) [7]

из Delphi Help:

uSize

Specifies the maximum size, in characters, of the buffer specified by the lpBuffer parameter. This value should be set to at least MAX_PATH to allow sufficient room in the buffer for the path.

← →
Anar (2002-10-23 17:58) [8]

Может подскажете нормальный пример?

BillyJeans - не работает в WinXP!!!

← →
ZZ (2002-10-23 18:03) [9]

BillyJeans
из Delphi Help:

uSize

Specifies the maximum size, in characters, of the buffer specified by the lpBuffer parameter. This value should be set to at least MAX_PATH to allow sufficient room in the buffer for the path.

Anar
Этот пример нигде и не должен работать :) Попробуй выделить память для WinDir... или в Яndexе поискать примеры (наверняка же есть :))

← →
Jack128 (2002-10-23 20:39) [10]

procedure TForm1.Button1Click(Sender: TObject);
var p : PChar;
begin
GetMem(p,MAx_path);
GetWindowsDirectory(p,max_path);
Caption := p;
end;

← →
Anar (2002-10-24 22:55) [11]

Да, я в принципе и до тебя справился, но всё равно спасибо.

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