Получить указатель на объект
Чота туплю совсем.
Создаю метку:
Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | 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:=<font color="Red">????</font>
end;
|
как получить указатель на нее в том месте где вопросики? |
05.05.2012, 12:41
Древовидный вид