Показать сообщение отдельно
  #5  
Старый 24.08.2016, 16:01
icWasya icWasya вне форума
Местный
 
Регистрация: 09.11.2010
Сообщения: 499
Репутация: 10
По умолчанию

Например, так
Код:
procedure R15(panel:TControl;lb:TControl);
begin
  lb.Left:=panel.Width-15+lb.Width;
end;

procedure Form1.OnRecize(Sender:TObject);
begin

   
  R15(Panel1,Label1);
  R15(Panel1,Label2);

end;
Ответить с цитированием