Erkennen Sie, ob Floppy Diskette enthält

Erkennen Sie, ob Floppy Diskette enthält

Erkennen Sie, ob Floppy Diskette enthält : Mehreren tausend Tipps, um Ihr Leben einfacher machen.

Dieser Artikel erläutert das erkennen, wenn eine Diskette in das Laufwerk auf NT Systeme (w2k, XP) basieren

Windows hat die Angewohnheit fordert den Benutzer auf eine Diskette einzulegen. Normalerweise wäre dies kein Problem, aber angenommen, Sie möchten wissen, ob eine Diskette im Laufwerk oder nicht befindet.

Es gibt verschiedene Möglichkeiten, eine Diskette zu erkennen, eine einfache Methode ist die Funktion DirectoryExists die in filectrl.pas deklariert ist.
Wenn eine Diskette vorhanden ist, gelingt es. Wenn dies nicht der Fall ist, die Funktion fehl nur, nachdem der Benutzer 'Abbrechen', um die Frage-Wetter gedrückt hat, er/Sie, eine Diskette einzulegen will.

Dieses Verhalten kann geändert werden, indem die (temporäre) Einstellung der Windows Fehler Verhalten beim Aufrufen einer api. Durch diese Einstellung auf 'kritische nur ', wir effektiv verhindern, dass Windows Benutzer Abfragen.

Hier ist eine Beispielfunktion, die überprüft, ob eine Diskette in Laufwerk a ein.

Filectrl verwendet;
//.. //
Funktion IsFloppyInDrive:Boolean;
Var-Om: Integer; OlderrorModus
beginnen
Om: = SetErrorMode (SEM_FAILCRITICALERRORS);
Ergebnis: = DirectoryExists ('A:\');
SetErrorMode (Om);
Ende;