Текущий архив: 2003.07.03;
Скачать: CL | DM;
Вниз
как узнать CD ROM? Найти похожие ветки
← →
ss300 © (2003-06-23 07:28) [0]привет знатоки!
как узнать имя диска CD. D или E или F ? и мне надо присвоить значение в стринговую переменную.
Заранее спс.
← →
Спрашивающий_ (2003-06-23 08:00) [1]procedure TForm1.Button1Click(Sender: TObject);
var
Drive: Char;
begin
for Drive := "A" to "Z" do
begin
If GetDriveType(PChar(Drive + ":/")) = DRIVE_CDROM Then Text:=Drive;
end;
end;
← →
Юрий Зотов © (2003-06-23 08:03) [2]> ss300 © (23.06.03 07:28)
Но их может быть и несколько...
← →
ss300 © (2003-06-23 08:49) [3]круто Спрашивающий, работает.
← →
Song © (2003-06-23 08:53) [4]Да ну? o-)
Страницы: 1 вся ветка
Текущий архив: 2003.07.03;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.016 c
