Класс CCar только разновидность шаблона (template). Объект -
специфический car созданный на базе CCar.
Вы можете создать множество автомобилей!
PUBLIC street AS CCar'two objects of the same type are declared
PUBLIC offroad AS CCar
STATIC PUBLIC SUB Main()'now the two objects are made
DIM hForm AS Fmain
hForm = NEW Fmain
hForm.show
END
PUBLIC SUB _new()
street = NEW CCar("ford", 100, 200.45)
offroad = NEW CCar("jeep", 150, 2876.94)
END
PUBLIC SUB Button1_Click()
TextLabel1.Text=
street.getBrand() & "<br>" &
Str(street.getPS_Power()) & " PS<br>" &
Str(street.getKW_Power()) & " KW<br>" &
Str(street.getPrice())
END
PUBLIC SUB Button2_Click()
TextLabel1.Text=
offroad.getBrand() & "<br>" &
Str(offroad.getPS_Power()) & " PS<br>" &
Str(offroad.getKW_Power()) & " KW<br>" &
Str(offroad.getPrice())
END