![]() |
|
#1
|
|||
|
|||
![]() Вообщем как сделать так, чтобы на один компонент нажимаешь он выводится в свой размер при все притом что остальные скрываются, и на оборот по бальшой обратно шмешь все станоится на места: примерный код дальше я не допетрил чет:
Код:
procedure TForm1.Image1Click(Sender: TObject); begin image1.Align:=alCustom; Image1.AutoSize:=True; image2.Visible:=False; image3.Visible:=False; image4.Visible:=False; end; end. Вот рисунок для визуального понимания: ![]() |