I have on a form a lot of editboxes (nearly 40). Each of them contains a short text. When the user clicks the editbox this editbox will be empty.
Type ebxName: TEdit;
procedure TfrmNew.ebxNameClick(Sender: TObject);
But I 'd like to have a common procedure for each editbox instead of the ~40 procedures.
Thanks for your support!