Mesmo prg em Linux e Windows mas tela tamanhos diferentes

[sergiosouzalima]

Olá!

Estou fazendo testes com o HwGUI. Compilei o mesmo programa de teste em Linux e Windows.

A execução é feita normalmente nos dois sistemas, mas as telas aparecem com tamanhos diferentes.

Alguem sabe a razao disto?

Linux

Windows10

O mesmo programa:

Código: Selecionar todos

#include "hwgui.ch"
Function Main()
    Local oMainWnd, oFont
    Local aCombo := {"First","Second" }

   PREPARE FONT oFont NAME "MS Sans Serif" WIDTH 0 HEIGHT -13

   INIT WINDOW oMainWnd TITLE "Example" ;
      FONT oFont ;
      ON EXIT {||hwg_MsgYesNo("Really want to quit ?")}

   @ 20,10 EDITBOX "Hello, World!" SIZE 200,30

   @ 270,10 COMBOBOX aCombo SIZE 100, 150 TOOLTIP "Combobox"

   @ 120,60 BUTTON "Close" SIZE 150,30 ;
      ON CLICK {||oMainWnd:Close()}

   MENU OF oMainWnd
      MENUITEM "About" ACTION hwg_MsgInfo("First HwGUI Application")
   ENDMENU

   ACTIVATE WINDOW oMainWnd

   hwg_writelog( "Program terminated " + Dtoc(Date()) + " at " + Time() )

RETURN NIL

[sygecom]

Você pode definir o tamanho da tela no SIZE do INIT WINODW

[sergiosouzalima]

olá!

Obrigado pela resposta.

Realmente usando SIZE no INIT WINDOWS os tamanhos ficaram mais parecidos nos dois sistemas.

Parece que o ambiente gráfico não é totalmente compatível em Linux e Windows.

No Linux esse campo dropdown com as opções first e second, abre normalmente.

No Windows só aparece a 1a.opção.

A caixa de diálogo com "yes, no", fica com os botões invertidos para Linux e Windows.

Envio a seguir o programa fonte que fiz para estes testes.

Código: Selecionar todos

#include "hwgui.ch"

Function Main()
    Local oMainWnd, oFont
    Local aCombo := {"First","Second"}

   PREPARE FONT oFont NAME "MS Sans Serif" WIDTH 0 HEIGHT -13

   INIT WINDOW oMainWnd TITLE "Example" ;
      AT 100, 100 SIZE 1700, 800 ;
      FONT oFont ;
      ON EXIT {||hwg_MsgYesNo("Really want to quit ?")}

   @ 20,10 EDITBOX "Hello, World!" SIZE 200,30

   @ 250,10 COMBOBOX aCombo SIZE 130, 30 TOOLTIP "Combobox"

   @ 120,60 BUTTON "Close" SIZE 100,30 ;
      ON CLICK {||oMainWnd:Close()}

   @ 20, 120 say "teste" SIZE 100, 30

   MENU OF oMainWnd
      MENUITEM "About" ACTION hwg_MsgInfo("First HwGUI Application")
   ENDMENU

   ACTIVATE WINDOW oMainWnd

   hwg_writelog( "Program terminated " + Dtoc(Date()) + " at " + Time() )

RETURN NIL

[Itamar M. Lins Jr.]

Olá!

Código: Selecionar todos

   @ 250,10 COMBOBOX aCombo SIZE 130, 30 TOOLTIP "Combobox" DisplayCount 3 

Pq, no Linux tem meia dúzia de usuários e poucos reportam erros para o Kresin.
No windows tem mais recurso STYLE nos GETs por exemplo no Linux não tem.

Saudações,
Itamar M. Lins Jr.