uruchamianie programu

0

jak sprawdzić czy, mój program został odpalony z CD-ROMu lub innego nośnika??
nie chcę sprawdzać czy w applicationexepath jest na samym początku literka D (bo u mnie CD-ROM to D), na innych kompach CD-ROM może mieć przecież inną literkę
jak to zrobić??

0

Sprawdż jaka jest literka, a potem sprawdź jaki rodzaj dysku jest pod tą literką w danym systemie. Było to kiedyś na forum.

0
function CzyToCdRom(Literka : Char) : Boolean;
begin
  Result := GetDriveType(PAnsiChar(Literka + ':\')) = DRIVE_CDROM;
end;

1 użytkowników online, w tym zalogowanych: 0, gości: 1