Wie weet raad
Hoe kan ik key violation opvangen in een try finally of een try except zodanig dat de gebruiker de foutieve incvoergegevens kan verbeteren
Groetjes
Benny
Wie weet raad
Hoe kan ik key violation opvangen in een try finally of een try except zodanig dat de gebruiker de foutieve incvoergegevens kan verbeteren
Groetjes
Benny
try
tblOrder.Post;
except
on E:Exception do begin
Showmessage ('Er is een fout opgetreden');
end; { on }
end; { if / try / except }
Beter is natuurlijk om voor de .Post een check te doen of het record reeds bestaat.
Hiervoor moet je een nieuwe tabel openen die wijst naar de zelfde tabel en een findkey doen met de primary key velden.
Indien je met Queries werkt kun je een
SELECT COUNT(*) FROM ORDER WHERE Sleutelveld=:Sleutelveld
en checken of deze > 0 retourneerd.
a Delphi User
Ik kies juist meestal voor de optie om de fout gewoon op te laten treden (en af te vangen natuurlijk). Hoe vaak zal het voorkomen dat de key al bestaat? Stel dat dat 1 op de 100 keer is, dan voer je 99 keer een zinloze query uit om te controleren. Laat je de fout gewoon gebeuren en vang je deze af dan voer je dus nooit een zinloze query uit.
Marcel
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks