delphi-2006

    9Ciepło

    4Odpowiedz

    Dla każdej podstawce z klasy trzeba zaimplementować pewne logiki zdarzenia (OnChanging, onChanged): procedure TBlock.SetWeightIn(const Value: Double); var OldValue: Double; begin OldValue := FW