PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV 2024 → programming the scrollbar of the edit control
programming the scrollbar of the edit control
Started by Merijn van der Wijk, May, 27 2004 5:46 PM - 1 reply
Posted on May, 27 2004 - 5:46 PM
Hi,
Although I'm monitoring this forum for a year now and answered a single question, I would like to introduce myself. Last year I developed (using WD7.5) a quality management system (which generates html pages with procedure and process descriptions, etc) for software development groups.
Installing every single upgrade, hoping WD problems would be over, with the latest release in January, I'm satisfied with my development tool; crashing of WD stopped, browsing through help improved.....
But now for something completely different:
I use an edit control to log lines, with this statement:
edLog += CR + Left(TimeToString(TimeSys()),8) + " " + LoggingText
After reaching the bottom of the edit control the scrollbar (of the edit control) kicks in. And new logging can't be seen.
The solution I came up with (which works fine BTW):
edLog..CursorEnd = Length(edLog)
But is seems so stupid because I want to manipulate the scrollbar itself.
Any suggestions ?
Thanks,
Merijn



OrangeTree Project Solutions
Posted on May, 28 2004 - 12:38 PM
Hi Merijn,
>But now for something completely different:
Monthy Python fan ? :-)
But is seems so stupid because I want to manipulate the scrollbar itself.
Any suggestions ?

Don't know if its what you want but you can use the EM_LINESCROLL message
(it is not really manipulating the scrollbar)
Ex. scrolling 5 lines down
---
EM_LINESCROLL is int = 0x00B6
SendMessage(Handle(Edit1),EM_LINESCROLL,0,5)
---
More possibilities you have with the EM_SCROLL message (up, down...)
--
Peter