paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-07-25 21:36:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: Fix a crash in Components View. Issue #20305, patch from Bart Broersma

Browse Source 
git-svn-id: trunk@32446 -
This commit is contained in:
juha 2011-09-21 09:28:03 +00:00
parent 39d0a7fdfe
commit 751cd5b9ae
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ide/componentlist.pas
View File

@ -326,7 +326,8 @@ procedure TComponentListForm.ListboxComponentsKeyDown(Sender: TObject;
var Key: Word; Shift: TShiftState); var Key: Word; Shift: TShiftState);
begin begin
if Key = VK_RETURN then if Key = VK_RETURN then
ListboxComponentsDblClick(Sender); if (ListboxComponents.ItemIndex >= 0) then
ListboxComponentsDblClick(Sender);
end; end;
procedure TComponentListForm.SetFocusToDataList; procedure TComponentListForm.SetFocusToDataList;