Delphi - vycet disku a mechaniky + winxp SP2 .. nefunguje!
Napsal: pát 8. říj 2004, 21:29
nevite nekdo co s tim?Mam v programu takovouhle vecicku:
....
DWORD(Drives) := GetLogicalDrives;
for D := 'A' to 'Z' do
begin
if (Ord(D) - Ord('A')) in Drives then
begin
index:=GetDriveType(PChar(D+':\'));
....
ktera mi vycte vsechny mechaniky a media zapojeny v pc.. na SP1 to funfuje.. funguje to i na win2k, win98SE.. . ale na SP2 u winXP to haze chybu, ze v discich nejsou vlozeny media... (disky i cdromky)
....
DWORD(Drives) := GetLogicalDrives;
for D := 'A' to 'Z' do
begin
if (Ord(D) - Ord('A')) in Drives then
begin
index:=GetDriveType(PChar(D+':\'));
....
ktera mi vycte vsechny mechaniky a media zapojeny v pc.. na SP1 to funfuje.. funguje to i na win2k, win98SE.. . ale na SP2 u winXP to haze chybu, ze v discich nejsou vlozeny media... (disky i cdromky)