Показать сообщение отдельно
  #1  
Старый 05.05.2012, 12:41
Аватар для Aristarh Dark
Aristarh Dark Aristarh Dark вне форума
Модератор
 
Регистрация: 07.10.2005
Адрес: Москва
Сообщения: 2,907
Версия Delphi: Delphi XE
Репутация: выкл
По умолчанию Получить указатель на объект

Чота туплю совсем.
Создаю метку:
Код:
  //Legend
  with TLabel.Create(FSMSOwner) do
    begin
      Parent:=(FSMSOwner as TWinControl);
      Name:=Format('Legend%d',[FValueCount]);
      Caption:=Title;
      Alignment:=taLeftJustify;
      AutoSize:=False;
      Left:=Xb;
      Top:=FBlockStart.Y;
      Width:=allWidth div 2;
      Height:=Canvas.TextHeight(Title)+4;
      hLegend:=Height;
      SetLength(FObjectsInfo,Length(FObjectsInfo)+1);
      FObjectsInfo[High(FObjectsInfo)].Control:=????
    end;
как получить указатель на нее в том месте где вопросики?
__________________
Некоторые программисты настолько ленивы, что сразу пишут рабочий код.

Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты.
Ответить с цитированием