Manual da WVWTools
Enviado: 02 Mai 2010 09:49
Olá amigos!
Algém tem um manual da WVWTools?
Ela tá atualizada, ou parou no tempo como a GTwvw?
Algém tem um manual da WVWTools?
Ela tá atualizada, ou parou no tempo como a GTwvw?
Código: Selecionar todos
Function Main
Local oMainWnd, oFont
Local aCombo := {"Primeiro","Segundo" }
PREPARE FONT oFont NAME "MS Sans Serif" WIDTH 0 HEIGHT -13
INIT WINDOW oMainWnd TITLE "Exemplo" ;
FONT oFont ;
ON EXIT {||MsgYesNo("Deseja Realmente Finalizar ?")}
@ 20,10 EDITBOX "Olá, Mundo!" ;
SIZE 200,30 ;
STYLE WS_DLGFRAME+ES_LEFT
@ 270,10 COMBOBOX aCombo ;
STYLE WS_TABSTOP ;
SIZE 100, 150 TOOLTIP "Combobox"
@ 120,60 BUTTON "Fecha" ;
SIZE 150,30 ;
ON CLICK {||EndWindow()}
MENU OF oMainWnd
MENUITEM "Sobre" ACTION MsgInfo("Primeiro Aplicativo
HwGUI ")
ENDMENU
ACTIVATE WINDOW oMainWnd
ReturnTem como sim, basta linkar as lib's da HWGUI em seu projeto e sair usando.clodoaldomonteiro escreveu: 1- Tem como usar alguma função da hwgui com um sistema que está com a GTwvw?
Tem como, mas como não uso xDev não sei te dizer como fazer isso ! mas sei que tem gente que usa com sucesso.2- Tem como compilar sistemas só com a hwgui + xDev?
Código: Selecionar todos
#include "hwgui.ch" // esse não pode faltar onde houver telas da Hwgui
Function Main
Local oMainWnd, oFont, oCOMBO, cCOMBO:=""
Local aCombo := {"Primeiro","Segundo" }
PREPARE FONT oFont NAME "MS Sans Serif" WIDTH 0 HEIGHT -13
INIT WINDOW oMainWnd TITLE "Exemplo" ;
FONT oFont ;
ON EXIT {||MsgYesNo("Deseja Realmente Finalizar ?")}
@ 20,10 SAY "Olá, Mundo!" ;
SIZE 200,30 ;
STYLE WS_DLGFRAME+ES_LEFT
@ 270,10 COMBOBOX oCOMBO VAR cCOMBO ITEMS aCombo SIZE 100, 150 TEXT;
STYLE WS_TABSTOP ;
TOOLTIP "Combobox"
@ 120,60 BUTTON "Fecha" ;
SIZE 150,30 ;
ON CLICK {||EndWindow()}
MENU OF oMainWnd
MENUITEM "Sobre" ACTION MsgInfo("Primeiro Aplicativo HwGUI ")
MENUITEM "Conteudo da Combobox" ACTION MsgInfo(cCOMBO)
ENDMENU
ACTIVATE WINDOW oMainWnd
Return