Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как в Delphi получить букву системного диска? [D7]

Страницы: < 1 2
Garacio © (2007-02-02 14:48:00)
C:\, D:\, E:\... ?

clickmaker (2007-02-02 15:37:00) [21]
может это диск, на котором всё систематизировано?

Игорь Шевченко (2007-02-02 15:36:00) [22]
Что такое системный диск ?

clickmaker (2007-02-02 15:19:00) [23]

> Что за parametr[1]?

ParamStr(1)
:)

clickmaker (2007-02-02 15:19:00) [24]

> у такого красивого имени реализация случайно не result:=parametr[1]
> :)

нет, там наворот. Учитывает UNC-пути

Elen (2007-02-02 15:19:00) [25]

> инттересно, а у такого красивого имени реализация случайно
> не result:=parametr[1] :)

Что за parametr[1]?

Garacio (2007-02-02 15:14:00) [26]
Спасибо!
Буду изучать и пробовать!

Vlad Oshin (2007-02-02 15:07:00) [27]

> Что такое системный диск?

в данном случае то :)

> ExtractFileDrive

инттересно, а у такого красивого имени реализация случайно не result:=parametr[1] :)

Anatoly Podgoretsky (2007-02-02 15:04:00) [28]
Что такое системный диск?

tesseract (2007-02-02 14:59:00) [29]
Примерно так :

lpBuffer:PCHAR;
GetMem(lpBuffer,MAX_PATH);
GetSystemDirectory( lpBuffer, MAX_PATH);
SysDrive:=ExtractFileDrive(lpBuffer);
FreeMem(lpBuffer);

Elen (2007-02-02 14:58:00) [30]

> Garacio

var p:array[0..255] of char;
begin
GetWindowsDirectory(p, 255);
caption:=ExtractFileDrive(p);
end

Vlad Oshin (2007-02-02 14:57:00) [31]
function GetSystemDir: String;
The GetSystemDir function returns path to the system directory

Garacio (2007-02-02 14:54:00) [32]
получить системную папку, выцепить букву

Кодом не поделишься?

Vlad Oshin (2007-02-02 14:52:00) [33]
получить системную папку, выцепить букву

Страницы: < 1 2

Наверх

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