Forum: Datenbanken
by Kleine,
6. Mai 2011
I hoabs jet :D
function TFormMain.MaxUnivID(tb: string): Integer;
var
lMax : Integer ;
begin
qu.Close ;
qu.SQL.Clear ;
qu.SQL.Add( Format( 'Select max(ID) as MaxID from %s', ) ) ;
qu.Open ;
lMax := qu.FieldByName('MaxID').AsInteger;
Forum: Datenbanken
by Kleine,
6. Mai 2011
Nein, die funktion ermittelt die maximale id der tabelle.
also kann man eine funktion nicht so aufbauen, das sie je nachdem die höchste id von adresse oder kontakte ermittelt?
Das heißt dann jawohl mal 2 functionen :)
Forum: Datenbanken
by Kleine,
6. Mai 2011
Also meine Datenbank besitzt 2 Tabellen. Ich hab nun eine Funktion erstellt, die die ID hcohzählen soll.
function tFormMain.MaxID : Integer ;
var
lMax : Integer ;
begin
qu.Close ;
qu.SQL.Clear ;
qu.SQL.Add('Select max(ID) as MaxID from Adressen ') ;
lMax := qu.FieldByName('MaxID').AsInteger;
qu.Open ;