Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Sen 1668
  Where is Sen 1668?
 
 Indonesia
 Sen 1668
 Tags
Subject: GetScrollInfo in User32.Dll
Thread ID: 249065 Message ID: 249065 # Views: 3 # Ratings: 0
Version: Visual FoxPro 9 SP2 Category: Win32API programming
Date: Monday, December 28, 2009 5:09:49 AM         
   


Hi,

I'm trying to make RTF Control auto height, in order to do this the control using GetScrollInfo API to detect if vertical scrollbar is exist.

Declare integer GetScrollInfo In User32.dll as gsi Long aa, Long bb, String @cc

ihWnd = thisform.rtfcls1.oBJECT.Hwnd
iSType = 1

SCROLLINFO1=RIGHT(REPLICATE(CHR(0),4)+CHR(28),2)+REPLICATE(CHR(0),2)
SCROLLINFO2=RIGHT(REPLICATE(CHR(0),4)+CHR(23),2)+REPLICATE(CHR(0),2)
SCROLLINFO = SCROLLINFO1 + SCROLLINFO2 + REPLICATE(chr(0),20)
lret = gsi(ihWnd, iSType, @SCROLLINFO)

whether the RTF Control has vertical scroll or not, it always return 0 and the buffer @SCROLLINFO has no effect.

Where did I wrong? Could someone help please ?


Thx
Sen

ENTIRE THREAD

GetScrollInfo in User32.Dll Posted by Sen 1668 @ 12/28/2009 5:09:49 AM
RE: GetScrollInfo in User32.Dll Posted by Sen 1668 @ 12/28/2009 11:16:08 AM