| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Имя дисковода [D5, Win95/98, WinME, Win2k, WinXP]
Cooller © (2003-05-07 14:27:00)Мастера, а как узнать букву дисковода?
Alex44 (2003-05-08 10:40:00) [1]Lyuboj malo mal"ski uvazhayushij sebya user sdelaet search na GetDriveType i zamenit proverku na obhod. I budet prav. Nu ne Vashe eto delo otkuda on chto zapuskaet!
Cooller (2003-05-07 17:28:00) [2]Спасибо большое всем:)
jel (2003-05-07 17:24:00) [3]Упс :(
Надо подправить код так
GetDriveType(Pchar(ExtractFileDrive(ParamStr(0))+"\"));
jel (2003-05-07 17:18:00) [4]
> но где гарантия, что на другом компе эти буквы совпадают
>
Никаких гарантий. Для этого и вызывается Application.Exename или ParamStr(0). А чтобы проверить действительно ли это CD-ROM используй GetDriveType.
if GetDriveType(Pchar(ExtractFileDrive(ParamStr(0)))) = DRIVE_CDROM then begin
... Запустили с CD
end else
... Запустили с чего-то еще;
Cooller (2003-05-07 17:10:00) [5]Да, но где гарантия, что на другом компе эти буквы совпадают или установлен тольно 1 дисковод.
MalkoLinge (2003-05-07 17:03:00) [6]Короче
Application.ExeName - имя исполняемого файла с путем к нему. Есно, что первая буква - искомый диск :)
Cooller (2003-05-07 16:12:00) [7]Да. Она запускается и надо узнать имя диска с которого она запустилать (Это должен быть только CD. Но как определить, что это CD, я знаю). А как определить букву?
ParamStr(0) - а как это использовать(я новичёк и много ещё не знаю)
Ancara (2003-05-07 16:06:00) [8]Тебе че, надо определить с какого диска твоя прога запустилась?
Тогда ParamStr(0) самый простой способ, мне кажется...
Или надо определить, какой буквой обозначен привод CDROM?
Cooller (2003-05-07 15:47:00) [9]Да не знает он. Ввожу в поиске, скопировав в буфер.
А задача такая. Диск вставляется в CD. Запускается прога. Нужно определить букву того диска, куда вставлен в дисковод.
[lamer]Barmaglot (2003-05-07 15:27:00) [10]В справке есть...
The GetLogicalDriveStrings function fills a buffer with strings that specify valid drives in the system.
DWORD GetLogicalDriveStrings(
DWORD nBufferLength, // size of buffer
LPTSTR lpBuffer // address of buffer for drive strings
);
Parameters
nBufferLength
Specifies the maximum size, in characters, of the buffer pointed to by lpBuffer. This size does not include the terminating null character.
lpBuffer
Points to a buffer that receives a series of null-terminated strings, one for each valid drive in the system, that end with a second null character. The following example shows the buffer contents with <null> representing the terminating null character.
c:\<null>d:\<null><null>
Return Values
If the function succeeds, the return value is the length, in characters, of the strings copied to the buffer, not including the terminating null character. Note that an ANSI-ASCII null character uses one byte, but a Unicode null character uses two bytes.
If the buffer is not large enough, the return value is greater than nBufferLength. It is the size of the buffer required to hold the drive strings.
If the function fails, the return value is zero. To get extended error information, use the GetLastError function.
Remarks
Each string in the buffer may be used wherever a root directory is required, such as for the GetDriveType and GetDiskFreeSpace functions.
See Also
GetDriveType, GetDiskFreeSpace, GetLogicalDrives
Cooller (2003-05-07 15:05:00) [11]Он не знает
GetLogicalDriveStrings()
Нет в справке.
Слесарь Матерящийся (2003-05-07 14:57:00) [12]GetLogicalDriveStrings() + GetDriveType()
| |
