Estou observando aqui, que se usar uma API do Windows para fazer uma pergunta SIM ou NAO, o RestScreen não restaura a tela
salva com SAVESCREEN, mas se usar um GET, o restscreen restaura corretamete a tela desejada, isso compilando com GTWVG,
não da erro, mas não restaura corretamente.
No caso do GTWVT, restaura corretamente com API ou com GET.
tlclientes := SAVESCREEN(0,0,24,79)
Baixar := "N"
IF !PERGUNTA("Confirma Baixa dessa parcela ? ","BAIXAR UMA PARCELA") // Com essa linha o RestScreen nao funciona
*@05,03 SAY "BAIXAR" GET BAIXAR PICT "@!"
*IF BAIXAR = "N"
UNLOCK
RESTSCREEN(0,0,24,79,tlclientes) // Não restaura corretamente se pergunta for uma API DO WINDOWS, com GET da certo
ENDIF
Function Pergunta( cMsg, cTitle )
cTitle := HB_ANSITOOEM(cTitle)
#define IDYES 6
#define WIN_MB_YESNO 0x00000004
#define WIN_MB_DEFBUTTON2 0x00000100 // para que o foco fique no segundo botão
#define WIN_MB_ICONQUESTION 0x00000020
#define WIN_MB_SYSTEMMODAL 0x00000020
RETURN wapi_MessageBox( wapi_GetActiveWindow(), cMsg, hb_defaultValue( cTitle, "Confirma ?" ), WIN_MB_YESNO + WIN_MB_ICONQUESTION + WIN_MB_DEFBUTTON2 ) == IDYES