Hallo,
bekomme immer eine Fehlermeldung
MyTable1: Datenmenge weder im Editier noch im Einfügemodus!
Verstehe ich nicht?
Delphi-Quellcode:
procedure TForm1.BitBtn7Click(Sender: TObject);
var
s: String;
begin
MyTable1.Edit;
s := MyTable1.FieldByName('EINSATZNUMMER').Text;
if InputQuery('InputBox', 'Geben sie einen Text ein!', s) then
begin
MyTable1.FieldByName('EINSATZNUMMER').Text := s;
MyTable1.Post;
end
else MyTable1.FieldByName('EINSATZNUMMER').Text := s;
MyTable1.Post;
end;