remove for PAM
I have been editing the Delphi source that John handed out with the last release so I could add in removing the drive after exiting.(Like u3) I am getting an error code 5. Could someone with more Delphi knowledge help?
Here is the code I added into the imgCloseClick event procedure:
var h: THandle; i: integer; Drive: String; dw: dword; bback:Boolean; errorstr:String; sq:integer; begin //This part will eject the drive and exit, but will throw an error if it can't. Drive:= ExtractFileDrive(Application.ExeName);