View Single Post
  #11  
Old 19-06-2020, 13:49
bunti_o4u's Avatar
bunti_o4u bunti_o4u is offline
Registered User
 
Join Date: Aug 2017
Location: India
Posts: 162
Thanks: 29
Thanked 172 Times in 61 Posts
bunti_o4u is on a distinguished road
Quote:
Originally Posted by Cesar82 View Post
TRY:
I have done the same but forgot to put var in the procedure
Code:
procedure GetFileLines(const FileName: string; var Combo: TComboBox);
Thank you.. it worked but now I am facing another problem.

I have second Combobox which is dependent on first combobox for its filename. Procedure is generating Combobox1.Items.Text as Line1Line2Line3(...).ini

Pl tell me how to fix it..
Code:
  Combobox2:= TComboBox.Create(WizardForm);
  with Combobox2 do
  begin
    Parent := WizardForm;
    SetBounds(left, Top, Width, Height);
    Style := csDropDown;
    Color := clWhite;
    GetFileLines(ExpandConstant('{src}\'+ ComboBox1.Items.Text +'.ini'), Combobox2)
  end;

Last edited by bunti_o4u; 19-06-2020 at 13:52.
Reply With Quote