paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 19:19:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

Converter: fix the default checked value for missing units checkboxes.

Browse Source 
git-svn-id: trunk@42464 -
This commit is contained in:
juha 2013-08-23 17:38:27 +00:00
parent f770004bfc
commit f0e3321128
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
converter/missingunits.pas
View File

@ -92,11 +92,11 @@ var
procedure AddUnitsToListBox(AMissingUnits: TStrings); procedure AddUnitsToListBox(AMissingUnits: TStrings);
var var
i: Integer; i, Ind: Integer;
begin // Add missing units to CheckListBox. begin // Add missing units to CheckListBox.
for i:=0 to AMissingUnits.Count-1 do begin for i:=0 to AMissingUnits.Count-1 do begin
UNFDialog.MissingUnitsCheckListBox.Items.Append(AMissingUnits[i]); Ind:=UNFDialog.MissingUnitsCheckListBox.Items.Add(AMissingUnits[i]);
UNFDialog.MissingUnitsCheckListBox.Checked[i]:=true; UNFDialog.MissingUnitsCheckListBox.Checked[Ind]:=true;
end; end;
end; end;