kako kreirati dogadjaje za dinamicki kreirane komponente?

Odgovori Nova tema

3 odgovora
4.549 pregleda

kako kreirati dogadjaje za dinamicki kreirane komponente? 09.09.2004. u 12:37 · pre 269 meseci #1

Ukoliko dinamicki izgradjujem komponente(u toku programa), kako onda da napisem dogadjaj za te komponente. Npr:
Dinamicki napravim komponentu tipa TButton:

Code:
with tbutton.Create(self) do
  begin
  parent:=panel1;
  left:=15;
  top:=56;
  width:=100;
  name:='dugme';
  caption:='poruka';
  end;

Kako sada da napisem dogadjaj onclick na to dugme koje ce se kreirati tek u programu?

Re: kako kreirati dogadjaje za dinamicki kreirane komponente? 09.09.2004. u 13:08 · pre 269 meseci #2

Definises metodu istu kao da komponenta nije dinamicka

Code:

procedure TForm1.PozoviMeNaKlik(Sender: TObject);
begin
{radi nesta}
end;

i kod kreiranja jos dodas

OnClick := PozoviMeNaKlik;

Re: kako kreirati dogadjaje za dinamicki kreirane komponente? 11.09.2004. u 02:29 · pre 269 meseci #3

Uspeo sam da ih kreiram. kako sada da ih unistim npr: klikom na neko dugme?

Re: kako kreirati dogadjaje za dinamicki kreirane komponente? 11.09.2004. u 09:20 · pre 269 meseci #4

Pa sa MojObjekat.Free ili FreeAndNil(MojObjekat).
Naravno za to moras da promenis tvoju proceduru za kreiranje:
MojObjekat := TButton.Create(Self)

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme