Ah!
O que estou querendo fazer é um formulário de vendas onde à medida que o usuário vai lançando os produtos ele vai aparecendo na tela - como é um caso de supermercado.

Moderador: Moderadores
JoséQuintas escreveu:https://github.com/JoseQuintas/allgui/blob/master/hmge/SAMPLES/Advanced/ACHOICE_2/demo.prg
show prezado professor asimoes. como disse o outro professor acima, já estou verificando o online q ele propôs...asimoes escreveu:Tem uma função "Achoice" na pasta: \MiniGUI
sim ... eu sei disso. talvez não me expressei corretamente. mas valeu mais uma vez por nos ajudar como sempre tem feito! ...JoséQuintas escreveu:Achoice() não é da minigui, é console.
prezado professor rubens estou sim há vários dias estudando os exemplos do GRID na HMG 3.4.2(4).rubens escreveu:Você vai ter que perder um tempinho e estudar os exemplos que vem com a HMG.
rsrsrsrJoséQuintas escreveu: se é o exemplo 2, então significa que tem o 1 também... rs
boa noite prezado professor JQuintas!JoséQuintas escreveu:https://github.com/JoseQuintas/allgui/blob/master/hmge/SAMPLES/Advanced/ACHOICE_2/demo.prg
Harbour 3.2.0dev (r1703241902)
Copyright (c) 1999-2016, http://harbour-project.org/
demo.prg(16) Error E0030 Syntax error "syntax error at 'CENTERWINDOW'"
demo.prg(69) Error E0030 Syntax error "syntax error at 'CTITLE'"
demo.prg(70) Error E0030 Syntax error "syntax error at 'ASELECTION_'"
demo.prg(71) Error E0030 Syntax error "syntax error at 'CHEADING'"
demo.prg(72) Error E0030 Syntax error "syntax error at 'CFONT'"
demo.prg(73) Error E0030 Syntax error "syntax error at 'NFONTSIZE'"
demo.prg(74) Error E0030 Syntax error "syntax error at 'LSORT'"
demo.prg(110) Error E0030 Syntax error "syntax error at 'WINDOW'"
demo.prg(113) Error E0030 Syntax error "syntax error at '.'"
demo.prg(123) Error E0030 Syntax error "syntax error at '.'"
10 errors
No code generated.
hbmk2[demo]: Erro: Executando o compilador Harbour (interno): 1
(C:\MVinfo\hmg.3.4.4\harbour\bin\harbour.exe) -n2 demo.prg -DHBMK_HAS_HMG32=1 -q -oC:\Users\WdePaula\AppData\Local\Temp\hbmk_zflx6p.dir\ -iC:\MVinfo\hmg.3.4.4\harbour\include -i. -iC:\MVinfo\hmg.3.4.4\include
// SET CENTERWINDOW RELATIVE PARENTfui obrigado a comentá-la pra funcionar.
// DEFAULT cTitle TO "Please select"
// DEFAULT aSelection_ TO {}
// DEFAULT cHeading TO "Available Options"
// DEFAULT cFont TO _HMG_DefaultFontName
// DEFAULT nFontSize TO _HMG_DefaultFontSize + 2
// DEFAULT lSort TO .F.
hb_Default(@cTitle, "Please select" )
Harbour 3.2.0dev (r1703241902)
Copyright (c) 1999-2016, http://harbour-project.org/
demo.prg(116) Error E0030 Syntax error "syntax error at 'WINDOW'"
demo.prg(119) Error E0030 Syntax error "syntax error at '.'"
demo.prg(129) Error E0030 Syntax error "syntax error at '.'"
3 errors
No code generated.
hbmk2[demo]: Erro: Executando o compilador Harbour (interno): 1
(C:\MVinfo\hmg.3.4.4\harbour\bin\harbour.exe) -n2 demo.prg -DHBMK_HAS_HMG32=1 -q -oC:\Users\WdePaula\AppData\Local\Temp\hbmk_xwl5yr.dir\ -iC:\MVinfo\hmg.3.4.4\harbour\include -i. -iC:\MVinfo\hmg.3.4.4\include
DEFINE WINDOW frmAchoice ;
CLIENTAREA nWidth, nHeight ;
TITLE cTitle ;
MODAL NOSIZE ;
ON MOUSECLICK ThisWindow.Release // [b]ESTA É A LINHA 116[/b] o erro pode estar em qualquer lugar nas 4 linhas acima
ON KEY ESCAPE ACTION ThisWindow.Release
ON KEY RETURN ACTION ( nRetVal := frmAchoice.grdChoice.Value, ThisWindow.Release ) // [b]ESTA É A LINHA 119[/b]
@ 0, 0 GRID grdChoice;
WIDTH frmAchoice.Width HEIGHT frmAchoice.Height - 3;
HEADERS { cHeading } WIDTHS { nCellWidth };
ITEMS aSelection_ VALUE 1;
FONT cFont SIZE nFontSize;
ON CHANGE ( nRetVal := This.CellRowIndex );
ON DBLCLICK ( nRetVal := This.CellRowIndex, ThisWindow.Release );
NOLINES;
JUSTIFY { GRID_JTFY_CENTER } // [b]ESTA É A LINHA 129[/b] o erro pode estar em qualquer lugar nas 9 linhas acima
END WINDOW
prezado professor... agora vc me confundiu ainda mais...MSDN escreveu:Amigo, pelo que percebi vc está misturando as versões da MiniGUI.
caro MSDN, nem o Criador de todas as coisas agradou a todos, vc vai esperar isso de mim? Cada um tem uma forma de se comunicar. Não consigo agradar a todos e aqui pelo que vejo não é um setor de polÃtica onde se pede alguma coisa dando um tapinha nas costas pra conseguir algo...MSDN escreveu:" professor "
a função foi oferecida pelo professor ASIMOES.asimoes escreveu:Tem uma função "Achoice" na pasta: \MiniGUI\SAMPLES\Advanced\ACHOICE e \MiniGUI\SAMPLES\Advanced\ACHOICE_2
JoséQuintas escreveu:https://github.com/JoseQuintas/allgui/blob/master/hmge/SAMPLES/Advanced/ACHOICE_2/demo.prg
Usuários vendo este fórum: Nenhum usuário registrado online e 13 visitantes