"resetowanie" komponentu

Johny_Morfina

2005-07-06T23:25:11+02:00

Rejestracja: dni
Ostatnio: dni
Postów: 448

Witam

Mam komponent w ktorym w czasie dzialania programu zmieniam bardzo duzo roznych parametrow. Chcialbym miec mozliwosc przywrocenia wszystkich parametrow do stanu poczatkowego. Czy jest na to jakas prosta metoda?
moze

Kopiuj

komponent.destroy;
komponent := Tcomponent.create;

ale po czyms takim wszystkie parametry maja wartosc 0, '' lub NIL
a ja potrzebuje, zeby byly takie jak ustawilem w Object Inspectorze - lacznie z obsluga zdarzen!
(pomocne byloby wiedziec skad kompilator bierze te wartosci podczas tworzenia komponentu)

a moze trzymac jeden nieuzywany komponent tej samej klasy
i w odpowiednim momencie zrobic cos w stylu

Kopiuj

KomponentRoboczy := KomponentWzorcowy;   // :D

czekam na Wasze pomysly

Szymek

2005-07-07T07:00:05+02:00

Rejestracja: dni
Ostatnio: dni

Jeśli już to używaj Free, a nie Destroy.
Rób tak:

Kopiuj

// Masz na formie położony KomponentBazowy
Komponent2:=TJakisKomponent.Create;
Komponent2.Assign(KomponentWzorcowy)
//Wykonujesz operacje na Komponent2
Komponent2.Free;