Dialog Vertical autoscroll attribute

[luvu2des]

Hello ~ Gintaras ~~!

I try to make simple log window with vertical autoscroll attribute and make below function and macro

I added VScroll and VAutoScroll attributes to dlg_log function

but V Scroll doesn't seem to work

Thank you in advance!


Function dlg_log

Code:

Copy      Help

\Dialog_Editor

str dd=
;BEGIN DIALOG
;0 "" 0x90C80AC8 0x0 0 0 252 160 "LOGwin"
;3 Edit 0x54231044 0x200 8 8 238 144 ""
;END DIALOG
;DIALOG EDITOR: "" 0x2040500 "*" "" "" ""

str controls = "3"
str e3
if(!ShowDialog(dd &sub.DlgProc &controls)) ret


#sub DlgProc
function# hDlg message wParam lParam

sel message
,case WM_INITDIALOG
,case WM_TIMER
,SetTimer hDlg 0 1000 0
,case WM_TIMER
,sel wParam
,,case 0
,case WM_DESTROY
,case WM_COMMAND goto messages2
,
ret
;messages2
sel wParam
,case IDOK
,case IDCANCEL
ret 1

Macro Macro3

Code:

Copy      Help

int N
str newLog oldLog
str logfile = "d:\log.txt"
str tmplog = "d:\log.tmp"
int w toDEL

del- tmplog

N=0
rep
,N+1
,wait 1.5
,oldLog.getfile(tmplog);err
,if(N>5)
,,toDEL = find(oldLog ".")
,,oldLog.remove(0 toDEL+1)
,oldLog.trim()
,newLog.format("%s[]LOG - %i." oldLog N);newLog.trim()
,newLog.setfile(logfile 0 -1 1)
,newLog.setfile(tmplog 0 -1 1)
,w=win("LOGwin" "")
,if(w) newLog.setwintext(id(3 w))

[Gintaras]

I cannot test, the code is invalid and difficult to read in this format.

[luvu2des]

Oh~! I fixed them. I'll delete post if I solve this problem.

please check this if you could. Thank you~

[Gintaras]

I still cannot test, error "cannot open file: The system cannot find the file specified", but what exactly means "V Scroll doesn't seem to work"? How it should work and how it works now?

[luvu2des]

like this, scroll doesn't work.

[luvu2des]

I edited upper source.

2 log files with 1 temporary (to setwintext to dlg_log id 3)

after 5lines, delete 1st line

[Gintaras]

setwintext does not move the text cursor to the end.
One of ways to scroll to the bottom:
SendMessage id(3 hDlg) WM_VSCROLL SB_BOTTOM 0

[luvu2des]

I got it and it works well.

Thank you Gintaras , for last 2 years with your help I make my life much better.

God bless you~~~