Forum: Win32/Win64 API (native code)
Delphi
by MadMax,
5. Mai 2003
Weiß vielleicht jemand wie man diese Code:23 (CRC-Prüfung) umgeht?
Forum: Win32/Win64 API (native code)
Delphi
by MadMax,
30. Apr 2003
Du musst
if Application.MessageBox('Neue Floppy Einlegen','Meldungsfenster', MB_OKCANCEL) = IDYES then
in
if Application.MessageBox('Neue Floppy Einlegen','Meldungsfenster', MB_OKCANCEL) = IDOK
ändern.
Forum: Win32/Win64 API (native code)
Delphi
by MadMax,
30. Apr 2003
Jetzt funktioniert es ausgezeichnet.
Nur bei der Schüssel Diskette tritt leider ein Code: 23 Datenfehler (crc-Prüfung) auf.
Forum: Win32/Win64 API (native code)
Delphi
by MadMax,
30. Apr 2003
Doch noch ein Problem: :bouncing4:
Das Tool Kopiert (klont) die Diskette aber ich finde (irgendwie) zu schnell. Teilweiße sind die geklonten Disketten sehr fehlerhaft. Gibt es vielleicht eine Möglichkeit denn Kopiervorgang etwas sicherer zu machen.
Forum: Win32/Win64 API (native code)
Delphi
by MadMax,
30. Apr 2003
Vielen Dank jetzt funtzt das Teil auch. Nur leider hat diese Schlüssel Diskette noch einen Schutz aber es war trotzdem eine gute Übung. Ich Poste noch mal den Code.
type TDiskGeometry = packed record
Cylinders: Int64;
MediaType: Integer;
TracksPerCylinder: DWORD;
SectorsPerTrack: DWORD;
BytesPerSector: Integer; // wichtig für die Reservierung des Buffer-Speichers...
Forum: Win32/Win64 API (native code)
Delphi
by MadMax,
29. Apr 2003
Hab jetzt das geändert;
Ich komm nur nicht ganz mit dem „buf“ klar. Kann es sein das bei win 200 der zugriff anderes als bei Win NT ist.
procedure TForm1.FormCreate(Sender: TObject);
begin
raw := RawOpenDrive('a');
end;
Forum: Win32/Win64 API (native code)
Delphi
by MadMax,
28. Apr 2003
Hallo,
Das „Verbinden“ mit dem Diskettenlaufwerk funtzt mit diesem Programm ganz gut, nur jetzt setzt mein Delphi wissen bisschen aus wie kann ich nun die Daten bit für bit auf eine andere Floppy Kopieren. Währe für paar Tipps sehr dankbar
type TDiskGeometry = packed record
Cylinders: Int64;
MediaType: Integer;
TracksPerCylinder: DWORD;
SectorsPerTrack: DWORD;
...