XProfan

English

Description:

SHFormatDrive shows a Formatierungsdialog on and format the angegebene drive.

Deklaration:

Def @FormatDrive(4) !SHELL32,SHFormatDrive

Parameter:

1.Parameter: lever the Fensters, on the the dialog attend should.

2.Parameter: number the Laufwerks => 0=A:; 1=B; 2=C;...

3.Parameter: Erweiterter Flag for Formatierung; to Time only $FFFF.

4.Parameter: of/ one of subesquent ? Happen? for Formatierungsart =>
$0 = normal
$1 = Quickformat
$2 = Systemdateien copy

Return Value:

with success The ID the last erfolgreichen Formatierungsvorgangs,
-3 if the drive (because of defektes) not formatierbar is.
-2 if The Formatierung aborted watts.
-1 if one sonstiger Error aufgetreten is.

Examples:

Compile Mark Separation

Def @FormatDrive(4) !"SHELL32","SHFormatDrive"
Declare FormatErgebnis&
Windowtitle "Diskette formatieren"
Windowstyle 31
Window 0,0-640,440
Let FormatErgebnis&=@formatDrive(%HWND,0,$FFFF,1)