Herzlich willkommen in der Delphi-PRAXiS, Tobias.
Den Schlüsselbereich würde ich in der Datenbank selbst verwalten. Die Erzeugung der Kundennummer, welche aus einem Präfix und einer Zahl fester Länge besteht, ist dann so möglich:
Delphi-Quellcode:
const
KDNR_PREFIX = '
DP';
NUM_LENGTH = 6;
var
kdnr:
String;
next: Cardinal;
function GetNext(prefix:
String): Cardinal;
begin
// ... deine Schlüsselverwaltung
end;
begin
// ...
kdnr := Format('
%s%.*d', [KDNR_PREFIX, NUM_LENGTH, GetNext(KDNR_PREFIX)]));
// ...
end;
Freundliche Grüße vom marabu