*Text=Хранит список строк, разделённых символами 10 и 13|3|2

Text=Определяет текст в поле ввода|2|ComboBox

#pas
  with Control{$ifndef F_P}^{$endif} do
  begin
    Text := _prop_Text;
    ....
  end;

procedure THIComboBox.SetIconsManager;
begin
  if value <> nil then 
  begin
    fIconsManager := value;
    if Assigned(_prop_BoxDrawManager) then
      ItemHeight := max((value.imgsz + _prop_BoxDrawManager.AddSize * 2), Control.Canvas.TextExtent('W').cy);
  end;
  SetStrings(_prop_Strings); // <-- this
end;

Text := _prop_Text

Caption := _prop_Text

Text=Определяет текст в поле ввода|2|ComboBox

procedure THIComboBox.SetIconsManager;
begin
  if value <> nil then 
  begin
    fIconsManager := value;
    if Assigned(_prop_BoxDrawManager) then
      ItemHeight := max((value.imgsz + _prop_BoxDrawManager.AddSize * 2), Control.Canvas.TextExtent('W').cy);
  end;
  SetStrings(_prop_Strings);
  Control.Text := _prop_Text;  
end;

#pas
  inherited;
  with Control{$ifndef F_P}^{$endif} do
  begin
    SetStrings(_prop_Strings);
    Caption := _prop_Text;
    OnSelChange := _OnClick;
    if ManFlags and $8 > 0 then OnDrawItem  := _OnDrawItem;
  end;

#pas
  Control.Perform(WM_SETREDRAW, RDW_NO, 0);
  Control.Clear;

Add(MainForm,12406820,616,259)
{
 Width=376
}
Add(ComboBox,280448,665,245)
{
 Top=5
 Width=305
 Height=21
 Strings=#1:0|1:1|1:2|1:3|
 Text="Мой текст в поле ввода компонента"
 BoxDrawManager="draw"
 IconsManager="icon"
 Point(EditText)
}
Add(Message,3227233,679,315)
{
 link(Message,280448:EditText,[])
}
Add(Button,7146697,616,315)
{
 Left=305
 Top=5
 link(onClick,3227233:doMessage,[])
}
Add(BoxDrawManager,15910026,665,189)
{
 Name="draw"
}
Add(IconsManager,1125834,714,189)
{
 Name="icon"
 Icons=[]
}