Autowerte bei Firebird setzen

[Marcel Gascoyne]

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