Announcement

Collapse
No announcement yet.

BDE Fehler bei Filter und Query im Netz

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • BDE Fehler bei Filter und Query im Netz

    Hallo
    Habe da eine Möglichkeit gefunden mit 10 Zeilen die Bde in die die Tonne zu werfen.
    Ich kreife Über Einen BDE- ALIAS ('TEST') auf eine Dbase Datei ('WAHL.DBF') zu. Einmal mit einer Query und ein weites mal mit einer TTABLE
    Local geht alles normal. Liegt der Alias im netz geht es ein mal. Beim 2. mal Filtered:=TRUE gehts krachen. Warum???

    Quelle

    procedure TForm2.Button1Click(Sender: TObject);
    begin
    with query1 do begin
    active:=true;
    first;
    while NOT eof do begin
    detail.Items.add(FieldByName('txt').asString);
    next;
    end;
    first;
    active:=false;
    end;
    end;

    procedure TForm2.Button2Click(Sender: TObject);
    begin
    with Wahl do begin
    Filtered:=False;
    filter:='[SCHL]=''firma''';
    Filtered:=True;
    First;
    end;
    end;

    procedure TForm2.FormCreate(Sender: TObject);
    begin
    wahl.Active:=TRUE;
    end;
    Gerd Kramer

  • #2
    Entschuldigung
    habe den Sql String vergessen

    select schl, txt
    from "wahl.dbf"
    where (SCHL="NAME")
    order by tx
    Gerd Kramer

    Comment

    Working...
    X