PC Toledo

Olá pessoal, mais uma duvida de tantas que tenho

Estou tentando colocar na entrada ao sistema, uma janela com Usúario e senha, a ideia e que após ter carregado a tela principal com os menus e os Ownerbutton, abra o dialog pedidndo Usuario e senha, mas não consigo, se adiciono no INIT a clausula ON INIT Entrada(), abre o dialog antes de carregar a tela principal e logo ingresar os dados, abre a tela principal e os menus, porén os OwnerButton não abre, coloco a continuação o exemplo:

Código: Selecionar todos

 INIT WINDOW oTelaPrincipal TITLE "Tela Inicial";         
         COLOR COLOR_3DLIGHT+0;  
         AT 0,0; // BACKGROUND BITMAP oBmp;                   
         ICON oIcon//ON INIT {|| Entrada('Entrada', '1')}      
                                                           

   @ 0,0 PANEL oPanel SIZE 0,37

   @02,3 OWNERBUTTON oBoton2 OF oPanel ON CLICK {||Ped_inc(.t.)} ;
       SIZE 32,32;// FLAT
       BITMAP cImageDir + "Pedidos.bmp" Transparent;
        COORDINATES 0,4,0,0 TOOLTIP "Pedidos"
   @ 750,3 OWNERBUTTON oBoton1 OF oPanel ON CLICK {||saida(),eNDwINDOW()} ;
       SIZE 32,32;// FLAT
       BITMAP cImageDir + "Exit.bmp"; 
       COORDINATES 0,4,0,0 TOOLTIP "Sair do sistema"


   MENU OF oTelaPrincipal
      MENU TITLE "Parametros"
         MENUITEM "&Gerais"       ACTION  IIF(Valida_senha('Parametros', '1'), Parametros(), '' ) 
         MENUITEM "&Promoções"   ACTION  Para_promo()  //BITMAP "
         MENUITEM "&Data e Turno" ACTION  Para_data()              
         SEPARATOR
         MENU TITLE "&Tela"
           MENUITEM "&Tela"     ACTION  Tela_Inteira(.t.)
           MENUITEM "&Janela"  ACTION  Tela_inteira(.f.)
         ENDMENU
         MENUITEM "Trocar &Senha" ACTION  Troca_senha('Alteracao de Senha', '20')
         SEPARATOR
         MENUITEM "Sobre"      ACTION  Informe() 
         SEPARATOR
         MENUITEM "Sai&r"       ACTION oMain:Close() 
         ENDMENU

   ENDMENU

   ACTIVATE WINDOW oTelaPrincipal  MAXIMIZED

   Return Nil

Obrigado pessoal, Daniel...

[/code]

Daniel tentou colocar fora do ON INIT antes de mostrar os Menus ?

Ola Leonardo, tentei sim, porem não aparece, tentei tambem depois do menu e so aparece o dialog pedindo a senha quando fecho o programa, e quando coloco no init abre o dialogo antes de abrir a tela principal.

Vi um exemplo com Minigui e usam a clausula ON INIT entrada(), e o dialogo aparece apos carregar a tela principal, mas na HWGUI não acontece isso, qual será a solução???

vou dar uma olhada nesse exemplo da Minigui...vc deve esta se referindo ao FINANCE vou ver e volto aqui ...

Leonardo, o prg e o f_menu, vai aqui o exemplo em minigui

Código: Selecionar todos

DEFINE WINDOW Form_0		;
		AT 0,0			;
                WIDTH 800 HEIGHT 600    ;
		TITLE SISTEMA		;
		ICON 'ICONE01'		;
		MAIN			;
		NOMAXIMIZE		;
		FONT 'Arial' SIZE 10		;
		BACKCOLOR GRAY		;
		ON INIT Ambiente_Inicial()	;
		ON RELEASE Abandona_Sistema()

Pois é, eu vi esse exemplo ai...vou dar uma olhada com calma...até agora meu sistema sempre abrir primeiro a caixa de DIALOG com usuario e senha...mas vou ver pq ele naum aceita pela MDI abrir depois a dialog....mais atrde ou amanha volto com alguns resultados !!!

Abraços

Valeu, fico no aguardo...
Daniel

Tche, sem chance !!! eu não faço ideia de como seja....se souber de algo...me passa que fiquei interesado tmb....e vi o modelo do Minigui....apenas uma observação naquele modelo se fechar com ALT+F4 ele passa batido....

PC Toledo

Entrada com Senha

Entrada com Senha