procedure THIMainForm._work_doIcon;begin
if _data.data_type=data_icon then begin
Control.Icon:=PIcon(_data.idata).handle;
if isMain then
Applet.Icon:=Control.Icon;
end;
end;
Администрация
Ответов: 15295
Рейтинг: 1519
|
|||
Ну да можно писать, например, так:
|
|||
карма: 27 |
|