Tquery variabel die zweite

[fl63]

Hallo!

Ich habe 2 Tabellen in einer Firebird Datenbank.
Jetzt möchte ich beide Tabellen auf einmal abfragen, mit folgendem Quelltext:

Delphi-Quellcode:

procedure TForm1.AbfrageClick(Sender: TObject);
var SQLString1 , SQLString2 :String;
begin
Edit1.Text := AnsiUpperCase(Edit1.Text);
If Combobox1.Text = '' then Combobox1.Text := ' Tabelle1  Tabelle2';
Screen.Cursor := crHourGlass;
If Edit1.Text = '' then Edit1.Text := '..';
If Edit2.Text = '' then Edit2.Text := '..';
SQLString1:= StringReplace(Edit1.Text,'#','_',[rfReplaceAll]);
SQLString1:= StringReplace(SQLString1,'..','%',[rfReplaceAll]);
SQLString2:= StringReplace(Edit2.Text,'#','_',[rfReplaceAll]);
SQLString2:= StringReplace(SQLString2,'..','%',[rfReplaceAll]);
  with Query1 do
  begin
    Active:=False;
    SQL.Clear;
    SQL.Add('Select * from '+ combobox1.text +' where feld001 Like :text1 ');
    SQL.Add('And Upper (feld002) Like Upper (:text2) ');
    ParamByName('text1').asString := SQLString1;
    ParamByName('text2').asString := SQLString2;
    Active:=True;
  end;
Screen.Cursor := crDefault;
end;

Das Problem liegt bei

Delphi-Quellcode:

If Combobox1.Text = '' then Combobox1.Text := ' Tabelle1 and Tabelle2';

Ich habe schon die Möglichkeiten

Delphi-Quellcode:

... '' then Combobox1.Text := ' Tabelle1 and from Tabelle2';

sowie

Delphi-Quellcode:

... '' then Combobox1.Text := ' Tabelle1,  Tabelle2';

und einige weitere ausprobiert. Leider ohne Ergebnis.
Manchmal wird Tabelle1 abgefragt und Tabelle2 nicht, meist bekomme ich Fehler 104 .

Ich hoffe auf eure Hilfe.

[SirThornberry]

Kannst du dem Thema bitte einen aussagekräftigen Titel geben? "die zweite" sagt rein gar nichts zum Problem aus. Man kann also nur raten um was es in dem Thema geht.

[himitsu]

SQL JOIN :gruebel:

[Darlo]

Hi,

nur als Ansatz:

Code:

SELECT p.Feld1, f.Feld1 FROM tableP AS p, tableF AS f

Code:

SELECT p.Feld1, f.Feld1 FROM tableP AS p LEFT JOIN tableF AS f ON p.Feld1 = f.Feld1

[fl63]

Zitat:

Zitat von SirThornberry (Beitrag 1158600)

Kannst du dem Thema bitte einen aussagekräftigen Titel geben? "die zweite" sagt rein gar nichts zum Problem aus. Man kann also nur raten um was es in dem Thema geht.

"TQuery variabel" habe ich bereits vor einigen Monaten erstellt, damals noch mit BDE, diesmal läuft es über Firebird. "die Zweite" soll nur darauf hinweisen, daß es bereits in Thema dieses Namens gibt.

[SirThornberry]

Und wenn du "mit Firebird" anstelle von "die zweite" im Titel hinzufügst?

[fl63]

Zitat:

Zitat von Darlo (Beitrag 1158604)

Hi,

nur als Ansatz:

Code:

SELECT p.Feld1, f.Feld1 FROM tableP AS p, tableF AS f

Code:

SELECT p.Feld1, f.Feld1 FROM tableP AS p LEFT JOIN tableF AS f ON p.Feld1 = f.Feld1

ich versteh kein Wort.

@ himitsu

Verbindet join nicht nur voneinander abhängige Tabellen?

Ich möchte zwei unabhängige Tabellen nacheinander Abfragen und das Ergebnis in einem DBGrid darstellen.

[vagtler]

SQL UNION :gruebel:

[fl63]

Zitat:

Zitat von SirThornberry (Beitrag 1158608)

Und wenn du "mit Firebird" anstelle von "die zweite" im Titel hinzufügst?

Ich hoffe das System hat's geändert.

[DeddyH]

Zitat:

Zitat von vagtler (Beitrag 1158623)

SQL UNION :gruebel:

Hätte ich auch vorgeschlagen. Allerdings sollte man vielleicht dazusagen, dass Anzahl und Typ der Felder dabei exakt übereinstimmen müssen. Hat eine der beiden Tabellen weniger Felder, muss man dann eben Konstanten einfügen.