Von automatisch generieren PK's halte ich auch nicht sehr viel. Eine einfache Möglichkeit ist die Verwendung einer
GUID als PK, die kann man ganz einfach mit Delphi und auch aus anderen Anwendungen erzeugen:
Delphi-Quellcode:
var
MyGuid: TGUID;
MyPK: string;
begin
CreateGUID(MyGuid);
MyPK := StringReplace(Copy(GuidToString(MyGuid),2,36),'-','',[rfReplaceAll]);
end;
Der PK ist dann vom Typ varchar(32) in der Firebird Datenbank.
Gruß,
Marcel