
19-06-2020, 17:39
|
 |
Registered User
|
|
Join Date: May 2011
Location: Brazil
Posts: 1,074
Thanks: 1,814
Thanked 2,304 Times in 787 Posts
|
|
Quote:
Originally Posted by bunti_o4u
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;
|
TRY
Code:
var
I: Integer
Combobox2:= TComboBox.Create(WizardForm);
with Combobox2 do
begin
Parent := WizardForm;
SetBounds(left, Top, Width, Height);
Style := csDropDown;
Color := clWhite;
for I := 0 to Combobox1.Items.Count - 1 do
GetFileLines(ExpandConstant('{src}\' + ComboBox1.Items.Strings[I]), Combobox2)
end;
|