mit Edit.text in einer Datenbank suchen?

[Newb]

argg =( ich stehe doch unter zeitstress für die verdammte schule eigetnlich soll das morgen schon fertig sein =((

also so?


procedure TForm4.Button2Click(Sender: TObject);
begin
Table1.Edit;
Table1.Locate('Nr',strtoint(Edit1.Text), []);
Table1.fieldbyname('Verleihstatus').asString:='ja' ;
Table1.fieldbyname('Kundennrv').asString:=Edit2.Te xt;
Table1.post;

das funktioniert nämlich auch nicht, =( ich hab doch keine ahnung hab das projekt doch nur zugelost bekommen, hab doch erst 10 schulstunden delphi hinter mir. kannsu mir nicht bisl genauer sagen was ich machen muss? *verzweifelt guck*