Nada demais, só o default da dlg do demoall CLIPPER NOEXIT NOEXITESC
E um bloco de código, acho que melhorado, do ponto de vista auto-explicativo.
nPos pra indicar posição do GET ao invés de I
nGetCount pra indicar quantidade de GETs, feito uma vez só
( nPos := nPos + nSkip ) trocado pra ( nPos += nSkip )
À primeira vista, nada que cause problema, mas pode facilitar manutenção futura.
Nota: as cláusulas na dialog evitam que o demoall encerre tudo ao teclar ENTER no último GET, ou ESC numa edição.
Atualização hwgui
Moderador: Moderadores
-
JoséQuintas
- Administrador
- Mensagens: 20365
- Registrado em: 26 Fev 2007 11:59
- Localização: São Paulo-SP
- Curtiram: 1 vez
Atualização hwgui
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"
https://github.com/JoseQuintas/
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"
https://github.com/JoseQuintas/