Hi all,

Attached is a patch for intfbasewinapi.inc. It's a very old patch what i
forgot to send. So i'm not sure anymore what this patch fixes. But it
has something to do with the positioning of a Label.

No-one ever noticed this, since this procedure is overridden by almost
all interfaces.

Please review and commit.

-- 
Met vriendelijke groeten,

  Joost van der Sluis
  CNOC Informatiesystemen en Netwerken
  http://www.cnoc.nl
Index: intfbasewinapi.inc
===================================================================
--- intfbasewinapi.inc	(revision 9030)
+++ intfbasewinapi.inc	(working copy)
@@ -433,7 +433,7 @@
   var
     J, wT,hT : Integer;
   begin
-    Rect:=theRect;
+    theRect:=Rect;
     {Initialize text width/height}
     wT := Tm.tmAveCharWidth*StrLen(Str);
     hT := TM.tmHeight;

Reply via email to