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