hi
irgendwie geht mein gotonearest nicht :
Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9:
| procedure TForm1.Edit1Change(Sender: TObject); begin With Table1 Do begin SetKey; FieldByName('Nachname').AsString := Edit1.Text; Table1.GotoNearest; end; end; |
zwar läuft das programm, aber wenn ich in edit1 etwas eingebe springt der zeiger in der dbgrid nirgendwo hin. in der datenbankoberfläche habe ich ein
* hinter Nachname. In der Eigenschaft TTable habe ich bei
IndexFiledName Nachname drin stehen. weiss nun nicht was falsch ist ??
kann mir jemand auf die Sprünge helfen wo der fehler liegt ??
danke euch
patrick
Glauben heißt nichts wissen ...