Ein Edit mehrere Spalten durchsuchen

Robert.Wachtel · Verfasst: Di 11.03.08 10:31

Wie

alzaimar schon ganz richtig sagte: Grundlagen! Du kannst doch nicht programmieren wollen ohne auch die einfachsten Grundlagen lernen zu wollen...

Du kannst Strings nicht mit einem logischen Oder verknüpfen und das Ergebnis dann auch noch einem String zuweisen. Das OR ist doch Teil des Filterausdrucks:

markieren

Quelltext

1:	ADOTable1.Filter := '(Bezeichnung='+ QuotedStr(Edit1.Text) + ') or (' + 'ICAO='+ QuotedStr(Edit1.Text) [...]

Fliegerbenny · Beiträge: 23

Es hat funktioniert!!! Ich danke euch!

Ich werde mal in Bibliothek stampfen und mir ein Grundlagen Buch besorgen

DANKE

Benny

zuma · Verfasst: Di 11.03.08 11:14

der Filter ist meines Erachtens nicht richtig:

Versuchs mal so:
leg dir ne zwischenvariable vom Typ String an:

markieren

Quelltext

1:	var lTmpStr : String;

und befülle sie so:

markieren

Quelltext

1:
2:
3:
4:

lTmpStr := Format('Bezeichnung= ''%s'' or ICAO= ''%s'' or IATA= ''%s'' or Rufname= ''%s'' or Land= ''%s''', [QuotedStr(Edit1.Text)]);

ADOTable1.Filter := lTmpStr;
ADOTable1.Filtered := true;

wobei ich mir nicht sicher bin, ob das %s in doppelte Hochkomma gefaßt werden muss oder nicht (evtl. einfach mal die Hochkomma vor und nach einem %s weglassen

_________________
Ich habe nichts gegen Fremde. Aber diese Fremden sind nicht von hier! (Methusalix)
Warum sich Sorgen ums Leben machen? Keiner überlebts!

alzaimar · Verfasst: Di 11.03.08 13:32

@zuma: So isses besser:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

Const
  sFilter = '(Bezeichnung=%0:s= or (ICAO=%0:s) or (IATA=%0:s) or (Rufname=%0:s) or (Land= %0:s)';

Begin
  MyTable.Filter := Format (sFilter,[QuotedStr(Edit1.Text)]);
  MyTable.Filtered := True;
...

_________________
Na denn, dann. Bis dann, denn.

alzaimar · Verfasst: Di 11.03.08 13:37

alzaimar hat folgendes geschrieben:

@zuma: So isses besser:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

Const
  sFilter = '(Bezeichnung=%0:s) or (ICAO=%0:s) or (IATA=%0:s) or (Rufname=%0:s) or (Land= %0:s)';

Begin
  MyTable.Filter := Format (sFilter,[QuotedStr(Edit1.Text)]);
  MyTable.Filtered := True;
...

[/edit:] Syntaxerror in Line 2[/edit]

_________________
Na denn, dann. Bis dann, denn.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme