Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.30;
Скачать: CL | DM;

Вниз

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]

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



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

Текущий архив: 2002.12.30;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.014 c
1-99063
GrayWolf
2002-12-15 21:43
2002.12.30
MDI-приложения


3-99009
Alfred77777777
2002-12-10 19:53
2002.12.30
Валится ошибка


1-99108
Гас
2002-12-17 12:29
2002.12.30
Как убрать тень в хинтах в Delphi 7, WinXP?


4-99409
Maksss
2002-11-15 02:33
2002.12.30
без SYSUTILS.PAS


1-99134
DrFaust
2002-12-18 12:54
2002.12.30
Умные окна