Код:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
VD_UnInstallDriver;
end;
Удалить из папки system32\drivers VirtualDisk.sys, перезагрузить компьютер
То есть так извиниюсь
Код:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
FileDisk := TFileDisk.Create(Self);
FileDisk.Initialize;
FileDisk.UninstallDriver;
end;