paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-18 01:28:49 +02:00
Code Issues Packages Projects Releases Wiki Activity

Cocoa: fix the crash when set TComboBox.DropDown with csDropDownList

Browse Source
This commit is contained in:
rich2014 2024-08-09 22:49:08 +08:00
parent e7c8818403
commit 7124597b46
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/interfaces/cocoa/cocoawsstdctrls.pas
View File

@ -1987,7 +1987,8 @@ begin
Exit; Exit;
if not ADroppedDown then exit; if not ADroppedDown then exit;
comboBox:= TCocoaComboBox(ACustomComboBox.Handle); comboBox:= TCocoaComboBox(ACustomComboBox.Handle);
comboBox.cell.performSelector_withObject_afterDelay( ObjCSelector('moveDown:'), nil, 0 ); if comboBox.cell.respondsToSelector(ObjCSelector('moveDown:')) then
comboBox.cell.performSelector_withObject_afterDelay( ObjCSelector('moveDown:'), nil, 0 );
end; end;