Показать сообщение отдельно
  #13  
Старый 07.03.2015, 07:44
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

Продолжение позерства:
Код:
procedure TForm1.ComboBox2Change(Sender: TObject);
begin
 LabeledEdit1.Visible:=True;
 LabeledEdit2.Visible:=True;
 LabeledEdit3.Visible:=False;
 LabeledEdit4.Visible:=false;
 LabeledEdit5.Visible:=false;
 LabeledEdit6.Visible:=false;
 Image1.Visible:=false;
 Image1.Picture.LoadFromFile(inttostr(ComboBox2.itemindex)+'.jpg');
 LabeledEdit3.Visible:=(ComboBox2.itemindex = 3);
 Image1.Visible :=True;
end;

__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием