طريقة اسرجاع ملف بلغة الدالفي :
Code restoration dossier /
procedure TFace.Resturation1Click(Sender: TObject);
begin
if Not
FileExists('C:\Windows\System\_sqldb.dll')then
RAise exception.Create('Version Démo !');
Restauration.showModal;
end;
//---------------------------------------------------------------------------