Ergebnis der Suchanfrage

• Forum: Datenbanken

  AW: Sql-Befehl anpassen

   
    by DeddyH, 6. Mai 2011
  Hatte ich das nicht bereits in #3 geschrieben? Außerdem habe ich noch den Feldnamen als Parameter deklariert, falls das Feld einmal nicht ID heißt.
• Forum: Datenbanken

  AW: Sql-Befehl anpassen

   
    by DeddyH, 6. Mai 2011
  Die Funktion zählt keine ID hoch, sondern liest nur die höchste aus.
  function tFormMain.MaxID(const Tablename, KeyField: string): Integer ;
  begin
  qu.Close ;
  qu.SQL.Text := Format('Select max(%s) as MaxID from %s', ) ;
  qu.Open ;
  Result := qu.FieldByName('MaxID').AsInteger;
  end;
  Ungetestet, sollte aber funktionieren.