Keine schlechte Variante um "unnötige"
OLE Exceptions abzufangen. Die 1000 ms zwischen den Versuchen finde ich jedoch etwas zu lang ... 500ms sollten
IMHO locker reichen ...
Zitat:
Anmerkung: Ich kann keinen Autowert oder
GUID für den eindeutigen Schlüssel verwenden.
Ein
GUID als Primary Key funktioniert...
SQL-Code:
INSERT INTO TABLE1 (
GUID,Vorname,Name)
VALUES (GetGUID,'
Hans','
Wurst')
Delphi-Quellcode:
// benötigt Unit ACTIVEX
function GetGuid: variant;
var
ID: TGUID;
begin
Result := '
';
if CoCreateGuid(ID) = S_OK
then
Result := GUIDToString(ID);
end;
Bei Identity Werten (Autoinc) wirds komplizierter..
Schöne Grüße,
Jens