fabin01

opa valews amigo to conseguindo fazer as instalaçoes aqui Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C

Boa Tarde Galera... Gostaria de saber se tem como fazer o instalador do programa com todos os arquivos que estou utilizando pararodar ele e se tem como instalar e escondelos para o usario nao alterar ou excluir algo? valew t+ Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Editado por - fabin01 on 27/11/2009 14:42:51

Boa Tarde Galera... Gostaria de saber se tem como fazer o instalador do programa com todos os arquivos que estou utilizando pararodar ele e se tem como instalar e escondelos para o usario nao alterar ou excluir algo? valew t+ Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Editado por - fabin01 on 27/11/2009 14:42:51

citação:Use o sqlDate id=code>id=code>Luis Fernando Jr. (Luisão) "The important thing in life is to believe that while you are alive, it's never to late" FWH8.1 + SQLLIB 1.9d + xHB 1.10 + xDev 0.65 + @SAY id=quote>id=quote>luizao fiz as aletraçoes porem esta acontecendo este erro o que pode ser?? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Editado por - fabin01 on 26/11/2009 08:29:51

citação:Veja e este exemplo.. Redefine Radio oRad Var cRadio ID 105,106,107 of odlg; On change vFiltra(cRadio) Function vFiltra(cRadio) If cRadio==1 msgAlert("Vc. Selecionou opção 1") ElseIf cRadio==2 msgalert("Vc. Selecionou opção 2") ElseIf cRadio==3 msgalert("Vc. Selecionou opção 3") endif Return .t. id=code>id=code>Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- ico.corumba@gmail.com -- Não Abandone Seu Tópicoid=red> id=quote>id=quote>no caso ico meu radiobutton ta funcionando perfeitamente, acho que nao estou sendo claro na minha duvida... é o seguinte vamos supor que tenho um relatorio com campos codigo nome endereço certo tenho uma tela que tem duas radio buttons na radiobutton um ta assim codigo e nome e na radiobutton 2 ta assim nome e endereço, lembrando que o relatorio que fiz tem codigo nome e endereço ai queria saber se tem como se o usuario escolher o radiobutton1 no relatori so vir o codigo e o nome entenderam agora? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C

por exemplo evaldo... vc viu ai como eu fiz a estrutura do relatorio neh as colunas e tals... porem tem pesquisa que preciso que so apareça por exemplo nome e codigo ai as outras colunas nao precisa ai citei o exempllo se radiobutton == 1 ai apareça no ralatorio so campos x entendue onde quero cehgar?? e em relaçao a data do between vou tentar aqui valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C

pessoal tirem algumas duvidas que estou estou fazendo um relatorio deste modo Function Relatorio_Atendimento_Opcoes(cRadio3,cRadio4,Label1,DtaI1,DtaF1,Label3,DtaI2,DtaF2,Label5,DtaI3,DtaF3) Local oFont1,oPen1,oPen2 Local cSQL:="" cSQL:="Select * from atendimentos " ? cRadio4 ? cRadio3 IF cRadio4 == 1 if cRadio3 == 1 cSQL += "ORDER BY codatendimento" elseif cRadio3 == 2 cSQL += "ORDER BY empresa" elseif cRadio3 == 3 cSQL += "ORDER BY programa" elseif cRadio3 == 4 cSQL += "ORDER BY status" endif ELSEIF cRadio4 == 2 if cRadio3 == 1 cSQL += "WHERE empresa = "+Label1+" AND dataatendimento BETWEEN" +DtaI1+" and "+DtaF1+" ORDER BY codatendimento" elseif cRadio3 == 2 cSQL += "WHERE empresa = "+Label1+" AND dataatendimento BETWEEN" +DtaI1+" and "+DtaF1+" ORDER BY empresa" elseif cRadio3 == 3 cSQL += "WHERE empresa = "+Label1+" AND dataatendimento BETWEEN" +DtaI1+" and "+DtaF1+" ORDER BY programa" elseif cRadio3 == 4 cSQL += "WHERE empresa = "+Label1+" AND dataatendimento BETWEEN" +DtaI1+" and "+DtaF1+" ORDER BY status" endif ELSEIF cRadio4 == 3 if cRadio3 == 1 cSQL += "WHERE empresa = "+Label3+" AND dataatendimento BETWEEN" +DtaI2+ "and" +DtaF2+ " ORDER BY codatendimento" elseif cRadio3 == 2 cSQL += "WHERE empresa = "+Label3+" AND dataatendimento BETWEEN" +DtaI2+ "and" +DtaF2+ " ORDER BY empresa" elseif cRadio3 == 3 cSQL += "WHERE empresa = "+Label3+" AND dataatendimento BETWEEN" +DtaI2+ "and" +DtaF2+ " ORDER BY programa" elseif cRadio3 == 4 cSQL += "WHERE empresa = "+Label3+" AND dataatendimento BETWEEN" +DataI2+ "and" +DataF2+ " ORDER BY status" endif ELSE if cRadio3 == 1 cSQL += "WHERE empresa = "+Label5+" AND data atendimento BETWEEN" +DtaI3+ "and" +DtaF3+ " ORDER BY codatendimento" elseif cRadio3 == 2 cSQL += "WHERE empresa = "+Label5+" AND data atendimento BETWEEN" +DtaI3+ "and" +DtaF3+ " ORDER BY empresa" elseif cRadio3 == 3 cSQL += "WHERE empresa = "+Label5+" AND data atendimento BETWEEN" +DtaI3+ "and" +DtaF3+ " ORDER BY programa" elseif cRadio3 == 4 cSQL += "WHERE empresa = "+Label5+" AND data atendimento BETWEEN" +DtaI3+ "and" +DtaF3+ " ORDER BY status" endif ENDIF ? csql USE "atendimentos" as cSQL Alias "CADATE" New Via "MySQL" Define FONT oFont1 NAME "Times New Roman" SIZE 0,10 DEFINE PEN oPen1 WIDTH 1 Define PEN oPen2 WIDTH 3 Report oReport5; Pen oPen1; Font oFont1; Title "Relção de Todos os Atendimentos Realizados",; "",; OemtoAnsi("Atendimentos Ordenado por"),; "" ; HEADER "Data: "+dtoc(date()),; "Hora: "+time(); Right; FOOTER OemtoAnsi("Pagina : ")+str(oReport5:nPage,3); CENTERED ; PREVIEW COLUMN TITLE "Codigo"; DATA CADATE->codatendimento; Size 5; GRID COLUMN TITLE "Dta Atendimento"; DATA CADATE->dataatendimento; Size 11; GRID COLUMN TITLE "Hora Inicial"; DATA CADATE->horainicial; Size 9; GRID COLUMN TITLE "Hora Final"; DATA CADATE->horafinal; Size 8; GRID COLUMN TITLE "Status"; DATA CADATE->status; Size 8; GRID COLUMN TITLE "Empresa"; DATA CADATE->empresa; Size 8; GRID COLUMN TITLE "Programa"; DATA CADATE->programa; Size 8; GRID COLUMN TITLE "Grupo Aten."; DATA CADATE->grupoatendimento; Size 10; GRID /*COLUMN TITLE "Codigo do Atendimento"; DATA CADATE->codatendimento; Size 7; GRID*/ END Report Activate Report oReport5; ON STARTPAGE Bitmaps_Relatorio_Opcoes() Close CADATE Return NIL id=code>id=code>porem esta acontecendo o erro no fivewin aquele de enviar relatorios de erro... acho que seja na data que estou pegando de outro campo que esta no formato dd/mm/aaaa e estava lendo e between trabalha com aaa-mm-dd isso tem diferença o erro seria isso? teri aque mudar o formato do meu picture? e a outra duvida é no relatorio fiz todos os campos mas tem como eu fazer aparecer assim? tenho algumas radiobuttons... por exemplo se radiobutton == 1 apareça somente campos X entenderam? tem como eu fazer isso? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C

pessoal tirem algumas duvidas que estou estou fazendo um relatorio deste modo Function Relatorio_Atendimento_Opcoes(cRadio3,cRadio4,Label1,DtaI1,DtaF1,Label3,DtaI2,DtaF2,Label5,DtaI3,DtaF3) Local oFont1,oPen1,oPen2 Local cSQL:="" cSQL:="Select * from atendimentos " ? cRadio4 ? cRadio3 IF cRadio4 == 1 if cRadio3 == 1 cSQL += "ORDER BY codatendimento" elseif cRadio3 == 2 cSQL += "ORDER BY empresa" elseif cRadio3 == 3 cSQL += "ORDER BY programa" elseif cRadio3 == 4 cSQL += "ORDER BY status" endif ELSEIF cRadio4 == 2 if cRadio3 == 1 cSQL += "WHERE empresa = "+Label1+" AND dataatendimento BETWEEN" +DtaI1+" and "+DtaF1+" ORDER BY codatendimento" elseif cRadio3 == 2 cSQL += "WHERE empresa = "+Label1+" AND dataatendimento BETWEEN" +DtaI1+" and "+DtaF1+" ORDER BY empresa" elseif cRadio3 == 3 cSQL += "WHERE empresa = "+Label1+" AND dataatendimento BETWEEN" +DtaI1+" and "+DtaF1+" ORDER BY programa" elseif cRadio3 == 4 cSQL += "WHERE empresa = "+Label1+" AND dataatendimento BETWEEN" +DtaI1+" and "+DtaF1+" ORDER BY status" endif ELSEIF cRadio4 == 3 if cRadio3 == 1 cSQL += "WHERE empresa = "+Label3+" AND dataatendimento BETWEEN" +DtaI2+ "and" +DtaF2+ " ORDER BY codatendimento" elseif cRadio3 == 2 cSQL += "WHERE empresa = "+Label3+" AND dataatendimento BETWEEN" +DtaI2+ "and" +DtaF2+ " ORDER BY empresa" elseif cRadio3 == 3 cSQL += "WHERE empresa = "+Label3+" AND dataatendimento BETWEEN" +DtaI2+ "and" +DtaF2+ " ORDER BY programa" elseif cRadio3 == 4 cSQL += "WHERE empresa = "+Label3+" AND dataatendimento BETWEEN" +DataI2+ "and" +DataF2+ " ORDER BY status" endif ELSE if cRadio3 == 1 cSQL += "WHERE empresa = "+Label5+" AND data atendimento BETWEEN" +DtaI3+ "and" +DtaF3+ " ORDER BY codatendimento" elseif cRadio3 == 2 cSQL += "WHERE empresa = "+Label5+" AND data atendimento BETWEEN" +DtaI3+ "and" +DtaF3+ " ORDER BY empresa" elseif cRadio3 == 3 cSQL += "WHERE empresa = "+Label5+" AND data atendimento BETWEEN" +DtaI3+ "and" +DtaF3+ " ORDER BY programa" elseif cRadio3 == 4 cSQL += "WHERE empresa = "+Label5+" AND data atendimento BETWEEN" +DtaI3+ "and" +DtaF3+ " ORDER BY status" endif ENDIF ? csql USE "atendimentos" as cSQL Alias "CADATE" New Via "MySQL" Define FONT oFont1 NAME "Times New Roman" SIZE 0,10 DEFINE PEN oPen1 WIDTH 1 Define PEN oPen2 WIDTH 3 Report oReport5; Pen oPen1; Font oFont1; Title "Relção de Todos os Atendimentos Realizados",; "",; OemtoAnsi("Atendimentos Ordenado por"),; "" ; HEADER "Data: "+dtoc(date()),; "Hora: "+time(); Right; FOOTER OemtoAnsi("Pagina : ")+str(oReport5:nPage,3); CENTERED ; PREVIEW COLUMN TITLE "Codigo"; DATA CADATE->codatendimento; Size 5; GRID COLUMN TITLE "Dta Atendimento"; DATA CADATE->dataatendimento; Size 11; GRID COLUMN TITLE "Hora Inicial"; DATA CADATE->horainicial; Size 9; GRID COLUMN TITLE "Hora Final"; DATA CADATE->horafinal; Size 8; GRID COLUMN TITLE "Status"; DATA CADATE->status; Size 8; GRID COLUMN TITLE "Empresa"; DATA CADATE->empresa; Size 8; GRID COLUMN TITLE "Programa"; DATA CADATE->programa; Size 8; GRID COLUMN TITLE "Grupo Aten."; DATA CADATE->grupoatendimento; Size 10; GRID /*COLUMN TITLE "Codigo do Atendimento"; DATA CADATE->codatendimento; Size 7; GRID*/ END Report Activate Report oReport5; ON STARTPAGE Bitmaps_Relatorio_Opcoes() Close CADATE Return NIL id=code>id=code>porem esta acontecendo o erro no fivewin aquele de enviar relatorios de erro... acho que seja na data que estou pegando de outro campo que esta no formato dd/mm/aaaa e estava lendo e between trabalha com aaa-mm-dd isso tem diferença o erro seria isso? teri aque mudar o formato do meu picture? e a outra duvida é no relatorio fiz todos os campos mas tem como eu fazer aparecer assim? tenho algumas radiobuttons... por exemplo se radiobutton == 1 apareça somente campos X entenderam? tem como eu fazer isso? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C

citação:Fábio Vc deve alterar na chamada da função: Redefine Radio oRad Var cRadio4 ID 4008,4009,4010,4011 of oDLG27 on change (Revela_Gets(cRadio3,cRadio4,oGet14,obnt3,obnt4,obnt5)) Att João Bosco Clip 5.3b FW 2.8 FWH 2.8 xHb 1.1.0 WorkShop 4.5 PellesC SQLLIB id=quote>id=quote>ah tinha me esquecido de fazer a referencia deles na funçao... agora ta ok obrigado Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C

Galera estou com a seguinte duvida tenho algusn gets na tela que coloquei para iniciar inviisiveis e quando for clicado no radiobutton vai ativar o grupo correspondente dos gets porem nao estou conseguindo fazer, tentei com on change e on click mas nao consegui... vou colocar o codigo aqui para vcs tentarem em ajudar Local cRadio3:="" Local cRadio4:="" Local oget14[15] Local emp1,Label1,DtaI1,DtaF1,emp2,Label2,DtaI2,DtaF2,emp3,Label3,DtaI3,DtaF3,Label4,Label5,Label6 Define Dialog oDLG27 RESOURCE "SELECIONA_GERAL_ATENDIMENTO" Title "Atendimentos" Redefine Get oGet14[1] Var emp1 ID 4016 of oDLG27 when(.f.) Redefine Get oGet14[2] Var Label1 ID 4018 of oDLG27 Redefine Get oGet14[3] Var DtaI1 picture "99/99/9999" ID 4013 of oDLG27 Redefine Get oGet14[4] Var DtaF1 picture "99/99/9999" ID 4014 of oDLG27 Redefine Get oGet14[5] Var Label2 ID 4015 of oDLG27 Redefine ButtonBMP obnt3 prompt ""; ID 4017 of oDLG27 Redefine Get oGet14[6] Var emp2 ID 4021 of oDLG27 when(.f.) Redefine Get oGet14[7] Var Label3 ID 4023 of oDLG27 Redefine Get oGet14 Var DtaI2 picture "99/99/9999" ID 4012 of oDLG27 Redefine Get oGet14[9] Var DtaF2 picture "99/99/9999" ID 4019 of oDLG27 Redefine Get oGet14[10] Var Label4 ID 4020 of oDLG27 Redefine ButtonBMP obnt4 prompt ""; ID 4022 of oDLG27 Redefine Get oGet14[11] Var emp3 ID 4027 of oDLG27 when(.f.) Redefine Get oGet14[12] Var Label5 ID 4029 of oDLG27 Redefine Get oGet14[13] Var DtaI3 picture "99/99/9999" ID 4024 of oDLG27 Redefine Get oGet14[14] Var DtaF3 picture "99/99/9999" ID 4025 of oDLG27 Redefine Get oGet14[15] Var Label6 ID 4026 of oDLG27 Redefine ButtonBMP obnt5 prompt ""; ID 4028 of oDLG27 Redefine Radio oRad Var cRadio3 ID 4002,4003,4004,4005 of oDLG27 Redefine Radio oRad Var cRadio4 ID 4008,4009,4010,4011 of oDLG27 on change (Revela_Gets()) Redefine ButtonBMP obtn1 prompt "Emitir"; ID 4006 of oDLG27 Redefine ButtonBMP obnt2 prompt "Cancelar"; Action oDLG27:end(); ID 4007 of oDLG27 Activate Dialog oDLG27; on Init Gets_Invisiveis(oGet14,obnt3,obnt4,obnt5); CENTERED Function Revela_Gets(cRadio3,cRadio4,oGet14,obnt3,obnt4,obnt5) IF cRadio4 == 1 MSGINFO("TESTE") ELSEIF cRadio4 == 2 oGet14[1]:Show() oGet14[2]:Show() oGet14[3]:Show() oGet14[4]:Show() oGet14[5]:Show() obnt3:Show() ELSEIF cRadio4 == 3 oGet14[6]:Show() oGet14[7]:Show() oGet14:Show() oGet14[9]:Show() oGet14[10]:Show() obnt4:Show() ELSEIF cRadio4 == 4 oGet14[11]:Show() oGet14[12]:Show() oGet14[13]:Show() oGet14[14]:Show() oGet14[15]:Show() obnt5:Show() ENDIF Return .t. id=code>id=code>valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Editado por - fabin01 on 19/11/2009 15:54:34

Galera estou com a seguinte duvida tenho algusn gets na tela que coloquei para iniciar inviisiveis e quando for clicado no radiobutton vai ativar o grupo correspondente dos gets porem nao estou conseguindo fazer, tentei com on change e on click mas nao consegui... vou colocar o codigo aqui para vcs tentarem em ajudar Local cRadio3:="" Local cRadio4:="" Local oget14[15] Local emp1,Label1,DtaI1,DtaF1,emp2,Label2,DtaI2,DtaF2,emp3,Label3,DtaI3,DtaF3,Label4,Label5,Label6 Define Dialog oDLG27 RESOURCE "SELECIONA_GERAL_ATENDIMENTO" Title "Atendimentos" Redefine Get oGet14[1] Var emp1 ID 4016 of oDLG27 when(.f.) Redefine Get oGet14[2] Var Label1 ID 4018 of oDLG27 Redefine Get oGet14[3] Var DtaI1 picture "99/99/9999" ID 4013 of oDLG27 Redefine Get oGet14[4] Var DtaF1 picture "99/99/9999" ID 4014 of oDLG27 Redefine Get oGet14[5] Var Label2 ID 4015 of oDLG27 Redefine ButtonBMP obnt3 prompt ""; ID 4017 of oDLG27 Redefine Get oGet14[6] Var emp2 ID 4021 of oDLG27 when(.f.) Redefine Get oGet14[7] Var Label3 ID 4023 of oDLG27 Redefine Get oGet14 Var DtaI2 picture "99/99/9999" ID 4012 of oDLG27 Redefine Get oGet14[9] Var DtaF2 picture "99/99/9999" ID 4019 of oDLG27 Redefine Get oGet14[10] Var Label4 ID 4020 of oDLG27 Redefine ButtonBMP obnt4 prompt ""; ID 4022 of oDLG27 Redefine Get oGet14[11] Var emp3 ID 4027 of oDLG27 when(.f.) Redefine Get oGet14[12] Var Label5 ID 4029 of oDLG27 Redefine Get oGet14[13] Var DtaI3 picture "99/99/9999" ID 4024 of oDLG27 Redefine Get oGet14[14] Var DtaF3 picture "99/99/9999" ID 4025 of oDLG27 Redefine Get oGet14[15] Var Label6 ID 4026 of oDLG27 Redefine ButtonBMP obnt5 prompt ""; ID 4028 of oDLG27 Redefine Radio oRad Var cRadio3 ID 4002,4003,4004,4005 of oDLG27 Redefine Radio oRad Var cRadio4 ID 4008,4009,4010,4011 of oDLG27 on change (Revela_Gets()) Redefine ButtonBMP obtn1 prompt "Emitir"; ID 4006 of oDLG27 Redefine ButtonBMP obnt2 prompt "Cancelar"; Action oDLG27:end(); ID 4007 of oDLG27 Activate Dialog oDLG27; on Init Gets_Invisiveis(oGet14,obnt3,obnt4,obnt5); CENTERED Function Revela_Gets(cRadio3,cRadio4,oGet14,obnt3,obnt4,obnt5) IF cRadio4 == 1 MSGINFO("TESTE") ELSEIF cRadio4 == 2 oGet14[1]:Show() oGet14[2]:Show() oGet14[3]:Show() oGet14[4]:Show() oGet14[5]:Show() obnt3:Show() ELSEIF cRadio4 == 3 oGet14[6]:Show() oGet14[7]:Show() oGet14:Show() oGet14[9]:Show() oGet14[10]:Show() obnt4:Show() ELSEIF cRadio4 == 4 oGet14[11]:Show() oGet14[12]:Show() oGet14[13]:Show() oGet14[14]:Show() oGet14[15]:Show() obnt5:Show() ENDIF Return .t. id=code>id=code>valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Editado por - fabin01 on 19/11/2009 15:54:34

citação:Vc. deve estar usando uma dialog que já usa em outro lugar né ??? é exactamente como vc. disse, fazer um a um, se tem outro jeito desconheço.. Luiz Arruda - Corumba(MS) FiveWin 9.04 [x]Harbour xDev WS -- ico.corumba@gmail.com -- Não Abandone Seu Tópicoid=red> id=quote>id=quote>quase isso é pq vou fazer o seguinte... tenho umas radiobuttons na tela ai fiz um grupo de editbox para cada uma ai de inicio quero que todas estejam invisiveis ai quando a radiobutton estiver selecionada aperce o grupo de editbox correspondente entendeu... posso fazer um if na dialog que consigo sem problemas?? exemplo if cradio1 == 1 oGet[x]:show() poderia fazer assim? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C

Bom dia Pessoal... é o seguinte tenho 12 gets e 3 botoes queria saber se para deixa-los invisiveis vou terque colocar no on init cada um como hide.. exemplo: ...on init oGet[1]Hide():,oGet[2]:hide()...obtn1:hide() ou tem como pelo menos os gets eu colocar todos eles de uma vez invisiveis vamo supor oGet[Geral]:hide()..obtn1:hide()... entenderam minha duvida valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C

Bom dia Pessoal... é o seguinte tenho 12 gets e 3 botoes queria saber se para deixa-los invisiveis vou terque colocar no on init cada um como hide.. exemplo: ...on init oGet[1]Hide():,oGet[2]:hide()...obtn1:hide() ou tem como pelo menos os gets eu colocar todos eles de uma vez invisiveis vamo supor oGet[Geral]:hide()..obtn1:hide()... entenderam minha duvida valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C

boa tarde galera... estou com seguinte duvida... tenho 6 radio button na tela conforme a imagem abaixo vou fazer um relatorio e o usuario vai escolehr a composiçao dele e a ordem ceto.. como faço isso... sei que é comando sql mas ai vou ter que fazer um por uma queria fazer assim ...SELECT * FROM tabela where radiobutton da composiçao ORDER BY radiobutton da ordem... ou nao tem jeito mesmo vou ter que fazer a pesquisa um por um separado... me entenderam? valews Obrigado pela ATENÇÃO e AJUDA! "O homem deve criar as oportunidades e não somente encontrá-las." Fábio Igor (BH-MG) fabio.igor@hotmail.com Iniciante FWH 2.8 [x]Harbour 9.61 xdev 0.70 Pelles C Editado por - fabin01 on 18/11/2009 11:04:01