Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Onclick-Ereignis (!??!??)

    Delphi
    by soulies, 10. Aug 2007
  wenn ich es richtig verstanden habe geht auch folgendes:
  
  
  procedure TForm1.Edit1Click(Sender: TObject);
  var a : integer;
  begin
  for a:=0 to ComponentCount-1 do
  begin
  if Components is TEdit then (Components as TEdit).Font.Style:=;
  if Components is TLabel then (Components as TLabel).Font.Style:=;