mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-01 09:12:30 +02:00
lcl: don't call EditingDone in every item selection of TListBox
git-svn-id: trunk@30409 -
This commit is contained in:
parent
25dec85a11
commit
c7df2d5f85
@ -320,8 +320,6 @@ end;
|
||||
procedure TCustomListBox.LMSelChange(var TheMessage);
|
||||
begin
|
||||
if [csLoading,csDestroying,csDesigning]*ComponentState<>[] then exit;
|
||||
if FLockSelectionChange=0 then
|
||||
EditingDone;
|
||||
DoSelectionChange(FLockSelectionChange = 0);
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user