From 1737ab40faab5084b23bea58ea8cb28204f76daf Mon Sep 17 00:00:00 2001 From: mattias Date: Sat, 17 Aug 2002 23:41:23 +0000 Subject: [PATCH] fixed buffer overrun and added several checks git-svn-id: trunk@2448 - --- lcl/lclproc.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lcl/lclproc.pas b/lcl/lclproc.pas index b4edddbc95..ab5f7881bb 100644 --- a/lcl/lclproc.pas +++ b/lcl/lclproc.pas @@ -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);