mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-11-22 15:29:35 +01:00
IDE, keymap selection: SchemeRadiogroup.ItemIndex:=...; did not work on Windows if BeginUpdate for items was used.
git-svn-id: trunk@30648 -
This commit is contained in:
parent
962ba75d92
commit
d5632feea6
@ -84,7 +84,6 @@ begin
|
|||||||
ButtonPanel.HelpButton.OnClick := @HelpButtonClick;
|
ButtonPanel.HelpButton.OnClick := @HelpButtonClick;
|
||||||
|
|
||||||
with SchemeRadiogroup.Items do begin
|
with SchemeRadiogroup.Items do begin
|
||||||
BeginUpdate;
|
|
||||||
Clear;
|
Clear;
|
||||||
// keep order of TKeyMapScheme
|
// keep order of TKeyMapScheme
|
||||||
Add(lisKMLazarusDefault);
|
Add(lisKMLazarusDefault);
|
||||||
@ -92,7 +91,6 @@ begin
|
|||||||
Add(lisKMMacOSXApple);
|
Add(lisKMMacOSXApple);
|
||||||
Add(lisKMMacOSXLaz);
|
Add(lisKMMacOSXLaz);
|
||||||
// do not add custom
|
// do not add custom
|
||||||
EndUpdate;
|
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user