Einzelnen Beitrag anzeigen

LingNeu

Registriert seit: 18. Dez 2006
164 Beiträge
 
Delphi 7 Enterprise
 
#9

AW: SQL findet die Tabelle nicht

  Alt 16. Aug 2012, 17:19
hallo,
@mkinzler,danke für die Info. Es kommt keine Fehlermeldung mehr, aber es wird auch kein gewünschtes Ergebnis zurückgegeben.

@FBrust, auch bei Deiner SQL-Zeile kommt keine Fehlermeldung mehr, aber es wird kein gewünschtes Ergebnis zurückgegeben.

Gruss
LingNeu

Habe die kleine Routine nochmals aufgesplitet:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
// masterdb
// mID autoInc; mtyp string(50)
// detaildb
// dtyp Link; mname string(50)
MD.Close ; //Datenbankname
MD.Connected := true;

//MASTER
TBM.DatabaseName := 'MD';
TBM.TableName := 'masterdb';
TBM.Active := true;
DSM.DataSet := TBM; //für Tabelle Masterdb
//DETAIL
TBD.DatabaseName := 'MD';
TBD.TableName := 'detaildb'; //über Link mit masterdb verbunden
TBD.Active := true;
DSD.DataSet := TBD; //für Tabelle Detaildb
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
//autos ausgeben
TDBQ.Close ;
TDBQ.SQL.Clear ;
//TDBQ.SQL.Text := 'select * from masterdb where mtyp = "auto"';
//TDBQ.SQL.Text := 'select * from masterdb where mtyp = '+ QuotedStr('auto') ;
TDBQ.SQL.Text := 'select * from masterdb where mtyp = :typ;';
TDBQ.Open ;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
//busse ausgeben
TDBQ.Close ;
TDBQ.SQL.Clear ;
TDBQ.SQL.Text := 'select * from masterdb where mtyp = '+ QuotedStr('bus') ;
TDBQ.Open ;
end;
Wenn man denkt, dann denkt man nur, das man denkt!
  Mit Zitat antworten Zitat