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

fixed buffer overrun and added several checks

Browse Source 
git-svn-id: trunk@2448 -
This commit is contained in:
mattias 2002-08-17 23:41:23 +00:00
parent 2f8a126b9b
commit 1737ab40fa
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/lclproc.pas
View File

@ -72,7 +72,7 @@ var
function SendApplicationMessage(Msg: Cardinal; WParam, LParam: Longint):Longint;
procedure OwnerFormDesignerModified(AComponent: TComponent);
function OffSetRect(var ARect: TRect; dx,dy: Integer): Boolean;
function OffsetRect(var ARect: TRect; dx,dy: Integer): Boolean;
procedure FreeThenNil(var AnObject: TObject);