Cum se instalează BDE - totul despre el și programare
Evident, BDE include un număr de versiune a structurii, cel puțin pentru fișierele Paradox. (Nu pot garanta pentru dBase și alte formate.) De fiecare dată când schimbați structura (de exemplu, baza de date Desktop) BDE incrementează numărul versiunii. Modulul următor conține o funcție care returnează versiunea struktu.
Încercați Tabl.Post, cu excepția începe la EDatabaseError do ShowMessage ( 'Nu pot trimite date (efectua Post)'); (Sender AS TDBEdit) .SetFocus; End; End, îmi dau seama de eroare și re parsare-aruncă o excepție (treci ierarhie handler următoare obiecte excluse.
(Aceasta este, atunci când programul a fost observată următoarea imagine: ca urmare a unui alt filtru a fost văzut de 4 intrări de la se adaugă la filtru opt litere este, să zicem, două Scoateți litera de unitate pe care tocmai l-ați adăugat în grila este încă văzută doar două intrări .. ) Această problemă a fost în Delphi 3.
Procedura TFDMUtils.GeneralError (DataSet: TDataSet; E: EDatabaseError; var Acțiune: TDataAction); vari: Word; ExtInfo. String; beginExtInfo: = ''; în cazul în care (E este EDBEngineError) thenbeginif (EDBEngineError (E) .Errors [0] .NativeError = 0) thenbegin // Local Errorif EDBEngineError (E) .Errors [0.
încerca tMyTable.Post, cu excepția E. EDBEngineError fac dacă E.Message = 'violare cheie' începe apoi MessageDlgC ( 'înregistrare duplicarea nu este permisă.' mtError, [MBOK], 0); // Nu sunt sigur că ar trebui să se facă: tMyTable.Cancel; se încheie altceva Ridicati; sfârșit; Un bun exemplu este o proiecție.