Proleme bei Locate

[Jumpy]

Zitat von Flash68:

Ich denke mal das in dem Fall wohl das with bleiben muß.

Alles was mit with geht, muss ohne erst recht gehen. Diejenigen, die Beispiele genannt haben sind wohl davon ausgegangen, dass sort eine globale Variable ist. Um mal eines der Beispiele aufzugreifen:

Delphi-Quellcode:

procedure TFRM_Main.DBG_BuecherTitleClick(Column: TColumn);
var
  sort, fieldname: string;
begin
    fieldname := DM_Buecher.ADS_Buecher.Column.Field.FieldName;
    sort := DM_Buecher.ADS_Buecher.sort;
    if sort = fieldname then
      sort := fieldname + ' DESC'
    else
      sort := fieldname;
    DM_Buecher.ADS_Buecher.sort:=sort;
end;