Forum: Datenbanken
Delphi
by Vader,
23. Mär 2006
( '*'+(Sender as TEdit).Text+'*')
wieder dsa gleiche, daten sind weg !
mfg vader
Forum: Datenbanken
Delphi
by Vader,
23. Mär 2006
wieder das gleiche , es sind die daten weg !!!!!
procedure TForm1.Edit1Change(Sender: TObject);
begin
Table1.Filter := 'Nachname = '+QuotedStr( '%'+(Sender as TEdit).Text+'%')+' or Vorname='+QuotedStr( '%'+(Sender as TEdit).Text+'%')+' or Strasse = '+QuotedStr( '%'+(Sender as TEdit).Text+'%');
Table1.Filtered := True;
end;
mfg vader
Forum: Datenbanken
Delphi
by Vader,
23. Mär 2006
es schaut jetzt so aus:
procedure TForm1.Edit1Change(Sender: TObject);
begin
Table1.Filter := 'Nachname = '+QuotedStr( (Sender as TEdit).Text)+' or Vorname='+QuotedStr( (Sender as TEdit).Text)+' or Strasse = '+QuotedStr( (Sender as TEdit).Text);
Table1.Filtered := True;
end;
wenn ich jetzt in das suchedit was eingebe, sind alle daten in meinem DBGrid verschwunden ?
mfg vader
Forum: Datenbanken
Delphi
by Vader,
23. Mär 2006
hallo
du schreibst:
1.FilterOptions foCaseInsensitive habe ich auf true gesetzt
2.Setzt den Filter auf 'Name = '''%'+Edit1.Text+'%''' , wo muß ich das setzten bzw. reinschreiben, im objektinspektor - eigenschaft "Filter" ?
mfg vader
Forum: Datenbanken
Delphi
by Vader,
22. Mär 2006
du schreibst:
bezieht sich das auf TTable vom beitrag #1, oder bezieht sich das auf TQuery ??
mfg vader
Forum: Datenbanken
Delphi
by Vader,
22. Mär 2006
nein, ich hab aber TTablezugriff und nicht TQueryzugriff in meinen project,
siehe beitrag #1
mfg vader
Forum: Datenbanken
Delphi
by Vader,
22. Mär 2006
aber was ist mit meiner variable " suche " meine sucheingabe ist über ein editfeld ??
mfg vader
Forum: Datenbanken
Delphi
by Vader,
22. Mär 2006
procedure TForm1.Button5Click(Sender: TObject);
var suche: string;
begin
suche:= edit1.Text;
Table1.Locate('<Nachname>;<Vorname>;<Strasse>', VarArrayOf(), );
end;
Unit1.pas(134): Undefinierter Bezeichner: 'Gruber'
ich krieg das nicht auf eine reihe ?
Forum: Datenbanken
Delphi
by Vader,
22. Mär 2006
hallo
Unit1.pas(134): Undefinierter Bezeichner: 'Wert1'
und wo bringe ich meine variable "suche" unter in deiner codezeile ?
mfg vader
Forum: Datenbanken
Delphi
by Vader,
22. Mär 2006
super,danke
und wie funktioniert das, wenn man in mehreren tabellenfelder suchen möchte zb. ich habe 3 felder
(nachname, vorname und strasse ) jetzt weiß ich zb. nur die strasse ?
mfg vader
Forum: Datenbanken
Delphi
by Vader,
22. Mär 2006
hallo,
wenn ich so suche muß ich den ganz richtigen namen eingeben in das suchfeld sonst findet er mir nichts !
procedure TForm1.Button5Click(Sender: TObject);
var suche: string;
begin
suche:= edit1.Text;
Table1.Locate('Nachname', suche, );
Showmessage('Folgende Nachname wurde gefunden');