Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Вниз

Как узнать в каком каталоге находится моя прога? 


Zool   (2002-02-12 17:34) [0]

Здравствуйте уважаемые програмисты! Просвитите чайника! У меня возникло сразу два вопроса:
1. Как узнать в каком каталоге находится моя прога?
2. Как узнать имя CD-Rom"a компа?
Зарание огромное спасибо!



McSimm   (2002-02-12 17:43) [1]

1. ExtractFilePath(Application.Exename);
2. GetVolumeInformation



Fedorenko Igor   (2002-02-12 17:45) [2]

1)
var
ExePath : string;
initialization
ExePath := ExtractFilePath( paramstr( 0 ) );
2) Например
var
Drive : PChar;
Drive := "G:\";
if GetDriveType( Drive ) = DRIVE_CDROM then ...



McSimm   (2002-02-12 17:49) [3]

Возможно неправильно понял второй вопрос.
Если нужно найти БУКВУ первого CD-Rom, то:
- перечень всех дисков можно получить с помощью:
GetLogicalDrives или GetLogicalDriveStrings
- проверить тип :
GetDriveType



Vitek   (2002-02-13 13:10) [4]

А как проверить сетевой диск - CD-room или нет?



McSimm   (2002-02-13 13:16) [5]

Если не ошибаюсь, - никак. Сетевой диск это логическое устройтво клиента сетей. Физически это может быть папка, физическое устройство, в том числе и CD-ROM. Но со стороны клиента этих различий нет.



Zool   (2002-02-14 08:16) [6]

Thanks!!!




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.015 c
7-9318            DenKop                2001-11-26 21:20  2002.03.04  
Рабочий стол.


1-9149            Squall                2002-02-17 22:56  2002.03.04  
Скорость Progress Bar a!!!


1-9214            skywalker             2002-02-14 19:05  2002.03.04  
Данные динамического массива


1-9112            ДмитрийВ              2002-02-15 08:18  2002.03.04  
Динамический массив


1-9190            fag2000@ok.ru         2002-02-13 13:44  2002.03.04  
Как узнать код возврата