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

IDE: update active sourceeditor on MouseDown

Browse Source 
git-svn-id: trunk@39709 -
This commit is contained in:
mattias 2013-01-01 11:45:40 +00:00
parent f531875607
commit a70beb5187
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/sourceeditor.pp
View File

@ -4831,6 +4831,7 @@ end;
Procedure TSourceEditor.EditorMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
CheckActiveWindow;
if Assigned(OnMouseDown) then
OnMouseDown(Sender, Button, Shift, X,Y);
end;