Suchfunktion in Paradoxtabelle ?

[Vader]

hallo,

wenn ich so suche muß ich den ganz richtigen namen eingeben in das suchfeld sonst findet er mir nichts !

Delphi-Quellcode:

procedure TForm1.Button5Click(Sender: TObject);
var suche: string;
begin
suche:= edit1.Text;
Table1.Locate('Nachname', suche, [loCaseInsensitive]); 
Showmessage('Folgende Nachname wurde gefunden');
end;

wie geht das,das ich zb. nur 2 anfangsbuchstaben eingeben muß damit er mir den namen findet ?
mfg vader

[mkinzler]

loPartialKey zu LocateOptions hinzufügen

[Vader]

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

[mkinzler]

Delphi-Quellcode:

Table.Locate('<Feldname1>;<Feldname2>;<Feldname3>', VarArrayOf([ Wert1, Wert2, Wert3]), [loCaseInsensitive,loPartialKey]);

[Vader]

hallo

Delphi-Quellcode:

[Fehler] Unit1.pas(134): Undefinierter Bezeichner: 'Wert1'

und wo bringe ich meine variable "suche" unter in deiner codezeile ?
mfg vader

[mkinzler]

Wert1, Wert2, wert3 stand hier für gesuchter wert von DatenbankFeld1 usw.

z.B. wenn die Felder 'Name;Vorname;Strasse' ist ist Wert1 für z.B. 'Maier', Wert2 z.B. 'Peter' ...

[Vader]

[/delphi]procedure TForm1.Button5Click(Sender: TObject);
var suche: string;
begin
suche:= edit1.Text;
Table1.Locate('<Nachname>;<Vorname>;<Strasse>', VarArrayOf([ Gruber, Gerhard, Allestrasse]), [loCaseInsensitive,loPartialKey]);
end;

Delphi-Quellcode:

[Fehler] Unit1.pas(134): Undefinierter Bezeichner: 'Gruber'[delphi]

ich krieg das nicht auf eine reihe ?
mfg vader

[mkinzler]

So müßte es funktionieren:

Delphi-Quellcode:

Table1.Locate('Nachname;Vorname;Strasse', VarArrayOf([ 'Gruber', 'Gerhard', 'Allestrasse']), [loCaseInsensitive,loPartialKey]);

[Vader]

aber was ist mit meiner variable " suche " meine sucheingabe ist über ein editfeld ??
mfg vader

[mkinzler]

Ich gehe mal davon aus das Edi1-< Nachname, Edit2 -> Vorname, Edit3 -> Strasse ist.

Delphi-Quellcode:

Table1.Locate('Nachname;Vorname;Strasse', VarArrayOf([ Edit1.Text, Edit2.Text, Edit3.Text]), [loCaseInsensitive,loPartialKey]);