PC Toledo

:?: :?: :?:
Boa Noite,,, gostaria que me ajudassem a solucionar um problema de configuração, estou usando a FGLIB para apresentação da tela de entrada, atraves de uma função de usuario, mas não consigo voltar a tela normal, gostaria de saber como alternar entre a tela gráfica e tela normal,
seria mais ou menos assim


#include "mcursors.ch" // For some mousepointer shapes
#include "fgl.ch" // General include
#include "fgbutton.ch" // A handle include for standard buttons
#include "box.ch"
#include "inkey.ch"

SET SCOREBOARD OFF
SET CURSOR OFF
SetColor("N/W,N/W*")
SETBLINK(.F.) // no blinking
SET INTENSITY OFF

FGLSetMode(FGL_GRAPHICS_640_480_16)
FGLMShow()
Gradient(3)
Font := FGLFontLoad("font\door.fnt")
FGLFontSet(Font)
FGLSetColor(clWhite)
YMAX := FGLSetMode()[FGL_MODE_GRAPH_MAXY]
XMAX := FGLSetMode()[FGL_MODE_GRAPH_MAXX]

Length := FGLWriteAt("AugSoft' Automacao Comercial")
Xpos := INT((XMAX/2) - (Length/2))
FGLWriteAt(Xpos,0,,,"AugSoft' Automacao Comercial")

Length := FGLWriteAt("Version 2004")
Xpos := INT((XMAX/2) - (Length/2))
FGLWriteAt(Xpos,YMAX-30-Font[FGL_FNT_HEIGHT],,,"Version 2004")
FGLFontErase(Font)
FGLMShow()

**** ESSA SERIA TELA DE ENTRADA DO SISTEMA *****

DEPOIS O AMBIENTE DEVERIA VOLTAR AO NORMAL MAIS NAO CONSIGO,,, PERMANECE A TELA DE ENTRADA E O APLICATIVO RODANDO POR TRAS,...

Obrigado a todos,,,,

postar resposta aqui, ou pro e-mail augsoft@horizon.com.br