Eine Diskette formatieren - Formatierendialog anzeigen

[Daniel B]

Hallo,

hiermit kann man eine Diskette formatieren.

Delphi-Quellcode:

procedure TForm1.Button10Click(Sender: TObject);
begin
  ShellExecute(Application.Handle, PChar('Open'), PChar('Rundll32.exe'),
    PChar('Shell32.dll,SHFormatDrive'), nil, SW_SHOWNORMAL);
end;

Grüsse, Daniel

[Gast]

Oder direkt aufrufen ...

Liegt seit nunmehr 2 Jahren sinnlos auf meiner Seite rum. MS hatte diese API bis zu dieser Zeit noch nicht mal ins PSDK aufgenommen ... inzwischen ist sie drin. Laut PSDK gibts die aber erst seit Windows 2000 was simpel nicht stimmt!