Problem z properties

0

Stworzylem komponent i ma on cos takiego:

private

FData : Integer;
procedure SetData(Value: Integer);

published

property Data: Integer read FData write SetData;

I chodzi o to, zeby ustawic na poczontku Data na np 10. Probowalem AfterConstruction;override; ale dzieje sie cos takiego: najpierw jest wykonywany konstruktor, potem AfterConstruction, a nastepnie SetData(1). Czy ktos mi moze to wyjasnic?--Delphi 4

Skysh The God, Your Slave

0

property Data: Integer read FData write SetData default 10;

contructor TTwojaklasa.Create(AOwner : TObject);
begin
inherited Create(AOwner);
FData := 10;
end;

0

Probowalem tak, ale mam dziwnom rzecz. Ustawia siem na poczontku na te 10 czy 1111, ale jak biore prace krokowom, to jest jak moofilem, po konsstruktorze jest wywolywana przez COS SetData(1) i zmienia na 1. Za chiny nie wiem CO to wywoluje. I dlaczego PO konstruktorze?--Delphi 4

Skysh The God, Your Slave

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0