--- Colin Western <[EMAIL PROTECTED]> escribió:

> The attached fixes two problems I noticed that were exposed with a
> small 
> display area for a grid:
> 
> 1. A range check error if compiled with checks on

I couldn't reproduce this problem (in linux) how can I do
to reproduce?

if aPage<0 then
 aPage:=0;
ScrollInfo.nPage := APage;

would help?

> @@ -2162,7 +2162,8 @@
>      {$endif}
>      ScrollInfo.nMin := 0;
>      ScrollInfo.nMax := ARange;
> -    ScrollInfo.nPage := APage;
> +    if aPage > 0 then
> +      ScrollInfo.nPage := APage;
>      SetScrollInfo(Handle, Which, ScrollInfo, True);
>    end;
>  end;


Jesus Reyes A.


        
        
                
___________________________________________________________ 
Do You Yahoo!? 
La mejor conexión a Internet y <b >2GB</b> extra a tu correo por $100 al mes. 
http://net.yahoo.com.mx 

_________________________________________________________________
     To unsubscribe: mail [EMAIL PROTECTED] with
                "unsubscribe" as the Subject
   archives at http://www.lazarus.freepascal.org/mailarchives

Reply via email to