Also hier ist die Source für den Prozess wenn der Button Changep gedrückt wird:
Delphi-Quellcode:
procedure TFormKunden.bbChangePClick(Sender: TObject);
begin
DM.tbKunden.Locate('Ind', qKunden.FieldByName('Ind').AsInteger, []);
DM.tbKunden.Edit;
Panel1.Visible := True;
dbName.Text := DM.tbKunden.FieldByName('Name').AsString; // ein DBEdit
dbFirstName.Text := DM.tbKunden.FieldByName('FirstName').AsString; // ein DBEdit
dbPatName.Text := DM.tbKunden.FieldByName('PatName').AsString; // ein DBEdit
dbAge.Text := DM.tbKunden.FieldByName('Age').AsString; // ein DBEdit
dbAddress.Text := DM.tbKunden.FieldByName('Address').AsString; // ein DBEdit
dbPhone.Text := DM.tbKunden.FieldByName('Phone').AsString; // ein DBEdit
Edit1.Text := DM.tbKunden.FieldByName('Name').AsString; // ein DBEdit
end;
Also mein Panel öffnet sich dann mit den DBEdits wo schon die kunden daten drin stehen. Wenn ich dann egal in welches DBEdit klicke verschwindet zB der Name und ich kann nichts reinschreiben.