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

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

Путь к папке WINDOWS! [D5]


Zak ©   (2002-05-23 13:01:00) 

Необходимо получить полный путь к папке WINDOWS!


Skif   (2002-05-23 14:56:00) [1]

Я просто беру значение %SystemRoot% и хай ее хоть в "Мастдай инкорпорейтыд с друзьями" переименовывают.


Кулюкин Олег   (2002-05-23 14:51:00) [2]

2 Zak © (23.05.02 13:01)
> Необходимо получить полный путь к папке WINDOWS!
Вообще-то, это не вопрос, а утверждение. :)


Zak   (2002-05-23 14:02:00) [3]

Во... супер :) Спасибо ВСЕМ!
П.С. хм... про массив я и не догадался :)


Song   (2002-05-23 13:57:00) [4]

2Zak © (23.05.02 13:53)
Ok,

Function WindowsDirectory:String;
{$IFNDEF WIN32}
Const MAX_PATH=144;
{$ENDIF}
Var Arr:array [0..MAX_PATH] of Char;
Begin
GetWindowsDirectory(Arr,SizeOf(Arr));
Result:=StrPas(Arr);
End;

Тока пока будешь пользоваться чужими примерами - не поймёшь.


Zak   (2002-05-23 13:53:00) [5]

Так прочитал... вроде нормально переменые!
нО ПОЧЕМУ ТО ПРИ ВЫЗОВЕ ФУНКЦИИ ошибка памяти вылазиит всё время!!!
Помочь то можно. а не отсылать читать хелп... Если было бы понятно Мне что надо делать то не спросил, логично? :)


PVOzerski   (2002-05-23 13:49:00) [6]

pChar - это указатель на блок памяти. И выделить этот блок надо из Вашей
программы!
Я в подобном случае вообще делаю такую штуку:

var
s:shortstring;
begin
byte(s[0]):=GetWindowsDirectory(@s[1],255);
end;

Но если есть основания полагать, что 255 символов не хватит
(в чем я сильно сомневаюсь), надо делать иначе, используя
указатели на массивы или динамически выделенные блоки памяти
(включая длинные строки).


Song   (2002-05-23 13:39:00) [7]

Для второй переменной дают 255 например или MAX_PATH
А вот что сделать с первой Пушкин А.С. знает :))


goblinus   (2002-05-23 13:37:00) [8]

Дык нажми F1 в Delphi и разберёшься.


Zak   (2002-05-23 13:36:00) [9]

Так я начал...
Вроде переменые задал... так у меня после этого Ошибка доступа к памяти началась! может я параметры не так задал...
GetWindowsDirectory(s1,1000);
s1:pchar;


Song   (2002-05-23 13:31:00) [10]

Ну начинай делать сам, поможем


Zak   (2002-05-23 13:28:00) [11]

Так я с параметрами не могу разобраться... мне надо получить значение и занести этот путь в стринговую переменную!


Goblinus   (2002-05-23 13:05:00) [12]

GetWindowsDirectory :-))


Наверх

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