Форум: "Основная";
Поиск по всему сайту: 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.022 c
4-9333            mIg                   2001-12-19 10:46  2002.03.04  
Скажите, как отловить событие открытие файла на чтение...


1-9136            Leshuz                2002-02-16 21:24  2002.03.04  
модуль Билдера.


7-9304            amamed_3071           2001-11-22 08:49  2002.03.04  
Програмно читать Barcod


1-9212            Stormick              2002-02-15 00:40  2002.03.04  
Ну не ужели никто не знает


6-9262            Alligator             2001-12-13 15:15  2002.03.04  
ClientSocket >>как перекачать файл <<ServerSocket?