Hallo uwe,
danke für Deine Erklärung.
Mir ist ein Fehler bei meiner Antwort unterlaufen.
Bisher hatte ich das natürlich nicht mittels Locate gemacht, sondern ich bin alle Datensätze durchgegangen und habe mit dem jeweils nächsten abgeglichen und dann immer die höhere Kundennummer als neue Referenz benutzt:
Delphi-Quellcode:
var
Dummy_MaxStr : String;
Dummy_MaxInt: Integer;
begin
Dummy_MaxInt := 0;
ABSTable1.Open;
ABSTable1.First;
repeat
Dummy_MaxStr := ABSTable.FieldByName('KUNDENNUMMER').AsString;
if isinteger(Dummy_MaxStr) then
if Dummy_MaxStr.ToInteger > Dummy_MaxInt then
Dummy_MaxInt := Dummy_MaxStr.ToInteger;
ABSTable.Next;
until ABSTable1.EOF;
ShowMessage(Dummy_MaxInt.ToString);
Das hatte ich bisher in etwa so gemacht, hatte aber bei einer großen Datenbank lange gedauert.
LG
