Показать сообщение отдельно
  #6  
Старый 04.08.2014, 02:14
Аватар для @Rafa3L
@Rafa3L @Rafa3L вне форума
Начинающий
 
Регистрация: 09.11.2011
Адрес: Москва
Сообщения: 144
Версия Delphi: XE2
Репутация: 11216
По умолчанию

Родительская форма фигуры не "видна" приложению т.к. она относится к скроллбоксу, нужно искать везде
Код:
...
meb.Parent:= FindComponent('Имя формы') as TForm;
...
З.Ы. или ещё лучше делать так
Код:
with TShape.Create(self) do
 begin
  Parent:= ScrollBox1.FindChildControl('Имя формы') as TForm;
  Left:= 0;
  Top:= 0;
  Width:= 50;
  Height:= 50;
  Name:= 'Имя фигуры';
 end;
4250
__________________
Помогаю платно.
Помогаю иногда бесплатно.
Ответить с цитированием