Új hozzászólás Aktív témák

• #338 Hani aktív tag yksz #337

  Új Válasz 2004-12-11 10:42:36 #338

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Hani

  aktív tag

  válasz yksz #337 üzenetére

  Hümm.
  És mit szólnál ilyesmihez?
  (Persze a pontok nélkül - azok csak ''távtartónak'' vannak ott.)
  
  Procedure TForm1.SajatEvent(Sender :Tobject);
  Begin
  ... Edit2.Text:='a';
  End;
  
  Procedure TForm1.Button1Click(Sender: TObject);
  Begin
  ... Button2.OnClick:=SajatEvent;
  End;
  
  Egy próbát megér.
  
  Esetleg a SajatEvent után berakhatod zárójelbe a Sender-t.
  

Új hozzászólás Aktív témák