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