🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.delphi
Article #98

Re: cd rom

#98
From: yan... Krzysztof Jankowski
Date: Sun, 14 Sep 1997 00:00
33 lines
1159 bytes
Piotr Kodzis napisal:

>uzywam funkcji zamieszczonej ponizej do wydostania informacji, czy CD rom
>jest gotowy do odczytu.
>
[...]
a sprobuj tego:

function Ready (drive: byte): boolean;
begin
  Check:= DiskSize (drive) <>-1
end;

Funkcja przyjmuje (zgodnie z tym co i DiskSize) parametr 0-dla dysku
aktualnego, 1-A:, 2-B:, ..... (przepisane z Helpu). 

Problem, jaki musisz uwzglednic to taki, czy dysk w napedzie, to
CD-Audio, czy CD-Rom - ale to juz calkiem inna historia.

W ten sposob mozna bylo (i teraz tez) sprawdzic dowolny naped czy jest
w nim dyskietka lub istnieje dysk twardy o danym numerku w czasach TP.
Dziala to i teraz pod Delphi...


CUL8R, Yankee 8^)


yan...@polbox.com
yan...@dyd.pol.lublin.pl

===============================
Zadnych olimpiad w Zakopanem!!! 
Technical Details
Message-ID: <341b34e1.16797780@news.icm.edu.pl>
Path: mbox-mo1.pugleaf.net!unknown!not-for-mail
References: <5vdv53$ii0@info.nask.pl>

Show Full Headers
Complete Article Headers
From: yan...@polbox.com (Krzysztof Jankowski)
Subject: Re: cd rom
Date: 1997/09/14
Message-ID: <341b34e1.16797780@news.icm.edu.pl>
X-Deja-AN: 272277611
References: <5vdv53$ii0@info.nask.pl>
Organization: ICM
Newsgroups: pl.comp.lang.delphi
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit