Zitat von
qb-tim:
OK... ich habe jetzt main Code geändert aber er erkennt "Sender" nicht als ein Edit an:
Hi,
wie wäre es mit einem Typecast?
Delphi-Quellcode:
procedure TForm2.CheckValues(Sender: TObject);
begin
if Sender is TEdit then
begin
if TEdit(Sender).Text = '' then
exit;
...