طريقة حذف ملف بلغة الدالفي :
Code Supprimer dossier :
procedure TFace.Supprimer1Click(Sender: TObject);
begin
//if Not
FileExists('C:\Windows\System\_sqldb.dll')then
RAise exception.Create('Version Démo !');
if
data.Dossiers.RecordCount=0 then
Raise
exception.Create('Aucun Dossier a supprimer');
S_Dossier.ShowModal;
end;
