Jeg bruger et clientdataset og vil gerne fange fejl som "violation key" eller "field must have a value" og vise mine egen danske fejlbeskeder i stedet for Delphis indbyggede.
Dertil har jeg udset clientdataset'ets OnPostError event som det oplagte valg. (ret mig gerne hvis jeg tager fejl).
Jeg har dog ikke fundet ud af, hvordan den bruges. Min hjælp i Delphi virker ikke, skal reinstalleres, og online har jeg intet fundet.
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
procedure TVinForm.Table1BeforePost(DataSet: TDataSet); begin if Antal.Field.Value = 0 then showmessagepos('Værdien i antal skal være større end 0',500,500); if Antal.Field.Value = 0 then Datasetcancel1.Execute; end;
Du kan i eventen prøve flg. to kodestykker som inspiration. Måske kan de laves i en variant, der kan bruges hos dig.
if E.Message = 'Key violation.' then begin Showmessage('Fejl: '+ e.Message); abort; end;
If E.Classname = 'EDatabaseError' then begin ShowMessage('Fejl: '+e.classname); abort end;
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
