@ sharky er kommt ja nicht mal bis zur
sql anweisung...
Delphi-Quellcode:
procedure TForm1.cb_takeClick(Sender: TObject);
Var
versflid, SetStr : String;
ProcessedRecs, i, SetCount : Integer;
SetVals : Array Of String;
Begin
versflid := ADOQuery1.FieldByName('Bearbeiter').asString; //hier springt er dann raus mit der fehlermeldung
If (tb_Bearbeiter.Text = '') Then
ShowMessage('Bitte was eintragen.');
Und das leben geht weiter.....