Aqui você poderá oferecer suas Contribuições, Dicas e Tutoriais (Texto ou Vídeo) que sejam de interesse de todos.
25 Jun 2015 20:34
Ola!
Não precisa de nada instalado, apenas faça e veja o resultado!
Para as pessoas que estão vindo do clipper e quer uma coisa bem fácil!
Aprenda a programar em modo visual sem traumas.
Saudações,
Itamar M. Lins Jr.
- Anexos
-
-
- tutorial.rar
- Tutorial Hwgui, veja a sintaxe e execute, não precisa de nada instalado.
- (1.82 MiB) Baixado 326 vezes
28 Jun 2015 21:46
Prezado Itamar,
Baixei o tutorial, segui as orientações do tópico Instruction e atualizei as tags conforme abaixo no arquivo "tutor.xml", porém quando dou um duplo clic para compilar, apresenta a mensagem de erro "compile erro".
<init>
<hilight>
<keywords> init window activate dialog menu menuitem endmenu action font click tooltip editbox button combobox and case class data do else elseif end endcase enddo endif exit for func function get if local loop method next or private proc procedure prompt public request return say set seek skip static use while </keywords>
<functions> aadd abs adel aeval afill ains alert alias alltrim array asc ascan asize asort at bof chr col ctod curdir date day dtoc dtos empty eof eval fclose fcreate ferase file fopen found fread fseek fwrite isalpha isdigit islower left recno right set str stuff substr updated upper val valtype year </functions>
<single_line_comment> // </single_line_comment>
<multi_line_comment> /* */ </multi_line_comment>
</hilight>
<tutorial file="tutor_eng.xml" />
<hwgui_dir path="C:\hwgui\tutorial" />
<harbour_inc path="C:\hb32\include" />
<harbour_bin path="C:\hb32\bin" />
</init>
Você poderia me ajudar?!..
Grato,
Araújo
30 Jun 2015 00:05
Ola!
Refiz novamente.
Precisa do Harbour.exe e da Hwgui. Adicionei eles no arquivo.
Já modifiquei o tutor.xml
Saudações,
Itamar M. Lins Jr.
- Anexos
-
- tutorial.rar
- (3.8 MiB) Baixado 424 vezes
26 Ago 2015 17:15
Muito legal, Itamar! Dei uma olhada rápida e gostei, vou dar uma boa olhada depois.
Corrija-me se eu estiver errado: a HwGui parece ser a lib visual mais parecida com a notação do Clipper, não é? Em outras palavras, pra quem quer caminhar na direção da interface gráfica pela primeira vez, a HwGui é a mais próxima daquilo que se escreve em Clipper puro?
28 Ago 2015 15:59
Sim, sem dúvida.
A Hwgui foi feita pelo Russo Alexander um dos gurus do Harbour.
Outra muito legal é a Minigui com sintaxe parecida com VB.
Na época eu foquei na Hwgui e uso ela. Achei mais fácil de entender/migrar o sistema console.
Vantagens da Hwgui é que a sintaxe p/ usar no LINUX é a mesma e a sintaxe p/ usar no Android também muito similar.
Saudações,
Itamar M. Lins Jr.
25 Set 2019 17:53
Boa noite,
Estou conseguindo compilar meu programa Clipper em HB32.
Agora surgiu a necessidade de uma tela em modo gráfico, para marcação com mouse.
Verifiquei o seu tutorial, mas como não sou um expert, fiquei perdido.
Eu já utilizo a compilação:
set path=C:\hb32\bin;C:\hb32\comp\mingw\bin;%path%
set HB_COMPILER=mingw
hbmk2 CCPBNB
e para o modo gráfico, muda tudo ?
25 Set 2019 18:24
Marcelo Baliza escreveu:Agora surgiu a necessidade de uma tela em modo gráfico, para marcação com mouse.
Traduz isso.
Quer usar o mouse, é isso? ou precisa de uma tela gráfica?
Se for só mouse... poderia ter usado no Clipper há 30 anos atrás.... e pode usar do mesmo jeito no Harbour.
Correção: pode usar mais fácil ainda no Harbour.
25 Set 2019 18:31
Como faço uma tela dessas do Itamar e compilo ?
25 Set 2019 18:35
Estou utilizando uma tabela no Excel e estou querendo implantá-la no Harbour.
É um DBF com 4 campos e uns 200 registros.
Preciso de uma forma ágil de responder o questionário.
São os seguintes:
Pergunta, sim, nao, naoaplica
Apresentou identidade? Sim(x) Não( ) Não aplica( )
Preciso marcar um campo acima e gravar no DBF.
26 Set 2019 16:55
ITENS DE CADASTRO - SIM NÃO NSA
Certidao de casamento X
Comprovante de endereco X
Comprovante de renda X
Comprovante de renda - DAP X
Documento de identidade X
Roteiro p/ controle qualidade X
É isso que estou querendo fazer. Tenho um roteiro de mais de 200 questões para responder de cada cliente e estou tendo de chamar cada um na edição. Se eu tivesse uma tela com barra de rolagem, facilitaria muito, pois eu iria somente clicar em uma das 3 respostas com o mouse.
Não estou conseguindo fazer. Algum mestre me ajuda ?
01 Out 2019 16:53
Poderia usar uma grid editável
04 Out 2019 17:08
o que seria uma grid editável ?
vc teria um código exemplo ?
04 Out 2019 21:51
Ola!
Já está montado o ambiente para Hwgui ?
Precisamos de mais informações.
Coloca um micro exemplo em clipper para ser convertido em harbour+hwgui.
Itamar M. Lins Jr.
07 Out 2019 16:29
- Código:
#include "inkey.ch"
#include "hbgtinfo.ch"
SET WRAP ON
SET ESCAPE ON
SET SAFETY OFF
SET STATUS OFF
SET TALK OFF
SET CONSOLE OFF
SET SCOREBOARD OFF
SET INTENSITY ON
**************************VIRADA DO MILENIO******
set epoc to 2000
**************************VIRADA DO MILENIO******
REQUEST HB_LANG_PT
REQUEST HB_CODEPAGE_PT850
REQUEST HB_GT_WVT_DEFAULT
REQUEST HB_GT_WIN_DEFAULT
MAIN()
FUNCTION MAIN()
IF !FILE('MTESTE.DBF')
MTESTE := {}
AADD(MTESTE, {'QUESTAO ', 'C', 65, 0})
AADD(MTESTE, {'SIM ', 'C', 1, 0})
AADD(MTESTE, {'NAO ', 'C', 1, 0})
AADD(MTESTE, {'NAOAPLI ', 'C', 1, 0})
DBCREATE('MTESTE.DBF', MTESTE)
RELEASE MTESTE
ENDIF
USE MTESTE
IF RECCOUNT()=0
APPEND BLANK
REPL QUESTAO WITH 'Apresentou Cedula de Identidade ? '
APPEND BLANK
REPL QUESTAO WITH 'Apresentou Carteira de Habilitacao ? '
APPEND BLANK
REPL QUESTAO WITH 'Apresentou Comprovante de Endereco ? '
APPEND BLANK
REPL QUESTAO WITH 'Apresentou Prova de Quitacao com Servico Militar ? '
APPEND BLANK
REPL QUESTAO WITH 'Apresentou Comprovante de Renda ? '
APPEND BLANK
REPL QUESTAO WITH 'Apresentou Certificado de Conclusao de Ensino Medio ? '
APPEND BLANK
REPL QUESTAO WITH 'Apresentou Cartao de Vacina ? '
APPEND BLANK
REPL QUESTAO WITH 'Apresentou Titulo de Eleitor ? '
APPEND BLANK
REPL QUESTAO WITH 'Apresentou Ultima Declaracao IRRF ? '
APPEND BLANK
REPL QUESTAO WITH 'Apresentou Nota Fiscal da Compra ? '
ENDIF
GO TOP
LIN=5
DO WHILE !EOF()
@ LIN,02 SAY QUESTAO
@ LIN,70 GET SIM
@ LIN,74 GET NAO
@ LIN,78 GET NAOAPLI
READ
IF LASTKEY()=27
CLOSE DATABASES
RETURN
ENDIF
LIN++
SKIP
LOOP
ENDDO
CLOSE DATABASES
RETURN
07 Out 2019 16:51
Assim é minha compilação:(BAT)
set path=C:\hb32\bin;C:\hb32\comp\mingw\bin;%path%
set HB_COMPILER=mingw
hbmk2 MTESTE.hbp
Powered by phpBB © phpBB Group.
phpBB Mobile / SEO by Artodia.