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

Вниз

Как узнать каталог Windows?   Найти похожие ветки 

 
Maxim Pshevlotsky ©   (2003-06-11 07:39) [0]

Как узнать каталог Windows, только чтобы он "узнавался" как на Win9x., так и на NT платформах


 
Spawn ©   (2003-06-11 07:56) [1]

GetWindowsDirectory


 
Maxim Pshevlotsky ©   (2003-06-11 08:13) [2]

Spawn © (11.06.03 07:56)

Как я понял результат возвращается в переменную ipBuffer, количество символов возвращается в результат, размер строки задается параметром uSize

??? Ничего не получается :((( ???

Var WinDir: PChar;
Begin

GetWindowsDirectory(WinDir,10);
WriteLn(WinDir);


 
Spawn ©   (2003-06-11 08:16) [3]

Все ок

procedure TForm1.Button1Click(Sender: TObject);
var
buf:array[0..255] of AnsiChar;
begin
GetWindowsDirectory(Buf,256);
ShowMessage(Buf)
end;


 
Spawn ©   (2003-06-11 08:18) [4]

Хотя я что то большой массив взял :)) Сделай размерность 20 где нить


 
Lord Warlock ©   (2003-06-11 08:36) [5]

Существует множество подходов к получению значений в переменные типа PChar, вот один из них:

var A: PChar;
S: String;
begin
GetMem(A,MAX_PATH);
GetWindowsDirectory(A,MAX_PATH);
S:=A;
FreeMem(A);
ShowMessage(S);
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
4-84828
fifo
2003-04-22 18:12
2003.06.26
Как кликнуть левой кнопкой мышки по чужому окну?


6-84511
Gandalv
2003-04-19 18:12
2003.06.26
TWebBrowser


1-84375
dRake
2003-06-07 00:56
2003.06.26
Как заставить прогу свернуться в трей?


7-84809
GIMLI
2003-04-16 19:32
2003.06.26
Список дисков


1-84152
McSimm2
2003-06-11 10:33
2003.06.26
Плавный переход цвета из одного в другой