Abfrageformulierung mit SQL

[marabu]

Von Table1 war doch eigentlich nie die Rede?

Vorausgesetzt es gibt eine Datei PROJEKT.DBF im Verzeichnis P:\SQL, dann funktioniert das hier:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  with Query1 do
  begin
    DatabaseName := Edit1.Text;   // 'P:\SQL'
    SQL.Text := Memo1.Lines.Text; // 'select * from projekt'
    try
      Open;
      Last;
      ShowMessage(Format('%d Datensätze', [RecordCount]));
      Close;
    except
      on E: Exception do
        ShowMessage(E.Message)
    end;
  end;
end;

Bei dBase-Tabellen versteht man unter DatabaseName das Verzeichnis, in dem die Tabellen abgelegt sind.

Grüße vom marabu