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

setting sorted to false should be propagated to internal stringlist (by jesusrmx)

Browse Source 
git-svn-id: trunk@7007 -
This commit is contained in:
micha 2005-03-22 20:55:26 +00:00
parent c0e9b1683c
commit 8abc0f0530
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
lcl/include/customcombobox.inc
View File

@ -806,13 +806,10 @@ begin
TWSCustomComboBoxClass(WidgetSetClass).Sort(Self, Items, FSorted)
else if FItems is TStringList then
begin
if FSorted then
begin
// remember text
lText := Text;
TStringList(FItems).Sorted := FSorted;
ItemIndex := FItems.IndexOf(lText);
end;
// remember text
lText := Text;
TStringList(FItems).Sorted := FSorted;
ItemIndex := FItems.IndexOf(lText);
end;
end;
@ -820,6 +817,9 @@ end;
{
$Log$
Revision 1.60 2005/03/22 20:55:26 micha
setting sorted to false should be propagated to internal stringlist (by jesusrmx)
Revision 1.59 2005/03/19 12:40:42 micha
sort combobox items in own stringlist when no handle allocated yet