Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

System directory [D5, Win2k, WinXP]


Andrewk88 ©   (2005-04-23 08:32:00) 

как узнать где установленн windows?


VMcL   (2005-04-24 23:53:00) [1]

>> Наташа   (24.04.05 22:10) [11]

Огромная просьба: не постить глюкокод в этот форум. По крайней мере, в тематические конференции.


Наташа   (2005-04-24 22:10:00) [2]

Я всегда пользуюсь функцией GetWindowsDirectory;
Например чтобы получить путь к каталогу ввинды:
procedure getwindir(Var P:pchar;Dir:String);
begin
getwinodwsdirectory(p,max_path);//получаем путь к каталогу винды в переменной р.
Dir:strpas(p);/привели Pchar к String, если нужно
end;
Теперь переменную dir моно использовать для доступа к файлам и папка. Или даже получить букву системного диска.


Хинт   (2005-04-24 10:01:00) [3]

Первый пост автора:
//Andrewk88 (23.04.05 08:32)
//как узнать где установленн windows?


Anatoly Podgoretsky   (2005-04-23 20:33:00) [4]

Не было такого вопроса, вопрос про систеиный каталог, а не про каталог виндоус.


Хинт   (2005-04-23 20:05:00) [5]

2Anatoly Podgoretsky
Что значит "не про то"? Вопрос - "как узнать где установлен windows?", Ответ - функция WinDir...


Anatoly Podgoretsky   (2005-04-23 12:59:00) [6]

VMcL ©   (23.04.05 10:46) [5]
Это мелочь по сравнению с самим ответом, он полностью не про то.


Anatoly Podgoretsky   (2005-04-23 12:57:00) [7]

Для чтения из System directory не надо знать где оно, просто читай свой ИНИ


VMcL   (2005-04-23 10:46:00) [8]

>> Хинт ©   (23.04.05 10:02) [4]

> iLength := 255;

Не 255, а MAX_PATH. "Читайте справку, оно рулез" ©


Хинт   (2005-04-23 10:02:00) [9]

function WinDir:string;
var
ilength:integer;
begin
iLength := 255;
setLength(Result, iLength);
iLength := GetWindowsDirectory(PChar(Result), iLength);
setLength(Result, iLength);
Result:=Result+'\';
end;


Palladin   (2005-04-23 09:49:00) [10]

наверно еще и писать?


Andrewk88   (2005-04-23 09:33:00) [11]

Palladin
нуна один ini отдуда читать


Palladin   (2005-04-23 08:33:00) [12]

а тебе оно зачем?


Наверх

Титульная страница Поиск, карта сайта Написать письмо