neto_23

comando setcolor com say não esta funcionando para janela folder; gostaria de saber o comando para mudar a cor do fundo e da letra do say de janela de folder fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

sei que não é um bom lugar para postar aqui no forum.... Quem poderia me indicar um curso rapido para criar pagina em internet com banco de dados... ou em são paulo mesmo ou pela internet.... fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

sei que não é um bom lugar para postar aqui no forum.... Quem poderia me indicar um curso rapido para criar pagina em internet com banco de dados... ou em são paulo mesmo ou pela internet.... fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

gostaria de saber uma rotina de email para enviar aha varios endereços.... ok fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

gostaria de saber uma rotina de email para enviar aha varios endereços.... ok fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

Agora sim funcionou aferra obrigado.... Falow fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

eita... a minha esposa esta colocando chifre em mim? é por isso que ando meio tapado kkkkkkkkkk... mas segue o codigo aferra.... define Dialog oCeca6; resource "CLIENTES" OF OWND1 REDEFINE FOLDER oFolder ; ID 4011 ; OF oCeca6 ; PROMPTS "Dados do Cliente","Adicionais I","Adicionais II","Adicionais III"; DIALOGS "CLIENTES1","CLIENTES2","CLIENTES3","CLIENTES4" //criação da tela e do folder redefine vget v_cidade1 var v_cidade picture"@!" id 4016; when bloq = 'S'; of oFolder:aDialogs[1]; UPDATE; color {nRgb(000,000,000), nRGB(255,255,255),nRgb(000,000,000),GetSysColor(20)},; {nRgb(255,255,255),nRgb(125,125,125),nRgb(255,255,255),nRgb(255,255,255)} // get para exemplo o codigo da atualização para refresh() v_nomava1 = nomava1 v_telava1 = telava1 v_profis1 = profis1 for i := 1 to len( oCeca6:aControls ) oCeca6:aControls:Refresh() next FOR i:=1 TO LEN(oFolder:aDialogs) oFolder:aDialogs:Refresh() NEXT id=code>id=code>aguardo a ajuda.. aferra... fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

não deu certo fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

não deu certo fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

vou testar ok fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

refresh() nos itens todos do folder de uma unica vez fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

refresh() nos itens todos do folder de uma unica vez fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

em terminais de rede, quando o usuario ao mesmos tempo acessa a tela de cadastro e recebe o mesmos codigo para inclusão de dados. gostaria de saber para que ao entrar na tela do cadastro o numero seguinte não duplicasse em outros terminais . para que não seja perdido dados.. fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

em terminais de rede, quando o usuario ao mesmos tempo acessa a tela de cadastro e recebe o mesmos codigo para inclusão de dados. gostaria de saber para que ao entrar na tela do cadastro o numero seguinte não duplicasse em outros terminais . para que não seja perdido dados.. fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

simplesmente o erro foi de nomeação na pasta include do bcc582... foi nomeado para nome de email resolvido fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

Estava programando na edição de gravação de dados; E de repente o xDev na compilação mostrou esse erro no arquivo hbvmpub: E2209 Unable to open include file assert.h o que eu tenho que fazer novamente .. lembrando que ja instalei o xharbour e o xdev mais não resolveu fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

Estava programando na edição de gravação de dados; E de repente o xDev na compilação mostrou esse erro no arquivo hbvmpub: E2209 Unable to open include file assert.h o que eu tenho que fazer novamente .. lembrando que ja instalei o xharbour e o xdev mais não resolveu fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

Valeu kapiaba deu certo ok Obrigado a todos fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

não deu certo ele vem ativado mesmos estando .f. depois que eu clicko em outro botao é que ele desabilitar.... não entra logo desabilitado.... mais memos assim obrigado pela força fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

fiz a rotina de permissão onde eu bloqueio o acesso do menu por completo ou por itens; mas quando coloco a clausura when para o botão ele só desabilita depois que click de duas a tres vezes nele ou em outro botão da ribbonbar menu, gostaria que quando fosse a condição .f. o botão ja vim desabilitado para o usuário. segue o code DEFINE WINDOW oWnd; TITLE "Empresa:"+ IIF(!EMPTY(nEmp)," - "+ALLTRIM(nEmp),"") ; + " - " + FWVERSION from 1,1 to 600,600; pixel MDI MENU oMenu brush oBrush1 DEFINE RIBBONBAR oRBar WINDOW oWnd PROMPT "Menu Bar"; HEIGHT 130 TOPMARGIN 25 // Vendas ADD GROUP oGr01 RIBBON oRBar TO OPTION 1 PROMPT "Cadastro" width 480 BITMAP "metal.bmp" @ 10, 10 ADD BUTTON oBtn01 GROUP oGr01 BITMAP "print.BMP" ; prompt "Cadastros"; POPUP MENU BuildArquivo(); SIZE 85, 62; when m100 = 'S'; message "Menu de cadastro!" id=code>id=code>a variavel m100 que torna S/N para o usuario. fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

fiz a rotina de permissão onde eu bloqueio o acesso do menu por completo ou por itens; mas quando coloco a clausura when para o botão ele só desabilita depois que click de duas a tres vezes nele ou em outro botão da ribbonbar menu, gostaria que quando fosse a condição .f. o botão ja vim desabilitado para o usuário. segue o code DEFINE WINDOW oWnd; TITLE "Empresa:"+ IIF(!EMPTY(nEmp)," - "+ALLTRIM(nEmp),"") ; + " - " + FWVERSION from 1,1 to 600,600; pixel MDI MENU oMenu brush oBrush1 DEFINE RIBBONBAR oRBar WINDOW oWnd PROMPT "Menu Bar"; HEIGHT 130 TOPMARGIN 25 // Vendas ADD GROUP oGr01 RIBBON oRBar TO OPTION 1 PROMPT "Cadastro" width 480 BITMAP "metal.bmp" @ 10, 10 ADD BUTTON oBtn01 GROUP oGr01 BITMAP "print.BMP" ; prompt "Cadastros"; POPUP MENU BuildArquivo(); SIZE 85, 62; when m100 = 'S'; message "Menu de cadastro!" id=code>id=code>a variavel m100 que torna S/N para o usuario. fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

obrigado, já resolvido como uso a sqllib mysql tinha fazer novamente o select e depois da refresh() ok agradeço a todos fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

não deu certo ... quando dou um duplo clik na linha que esta com a figura level2.bmp de não ele não mudar para a figura level1.bmp de sim lembrando que tenho dois listbox na mesma dialog... sera que é isso pq não consigo atualizar o listbox fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

Tenho uma dialog de permissão de usuário: com uma listbox que tem o bmp ligado=verde,desligado=vermelho; em tempo de execução se o usuario clickar duas vez na permissão tem que mudar para a cor verde, ou retornar para vermelha; não estou conseguindo fazer isso em execução; segue a rotina: local aHBitMaps:= { ReadBitmap( 0, "Level1.bmp" ), ; // BitMaps de 14 x 32 ReadBitmap( 0, "Level2.bmp" ) } REDEFINE listbox oTbr; fields acesso2sqla->descricao, aHBitmaps[ nLigado(acesso2sqla->ligado) ]; Head 'Descrição', 'I/O'; fieldsizes 350,50; on left dblclick(mostradesc(), otbr, .T.); update; ID 4005; of oceca_b function nLigado(nEatu) local nEst := 0 do case case nEatu = 'S' nEst := 1 case nEatu = 'N' nEst := 2 case nEatu = ' ' nEst := 2 endcase return nEst id=code>id=code>mas não muda de bitmap? como fazer para mudar fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;

Tenho uma dialog de permissão de usuário: com uma listbox que tem o bmp ligado=verde,desligado=vermelho; em tempo de execução se o usuario clickar duas vez na permissão tem que mudar para a cor verde, ou retornar para vermelha; não estou conseguindo fazer isso em execução; segue a rotina: local aHBitMaps:= { ReadBitmap( 0, "Level1.bmp" ), ; // BitMaps de 14 x 32 ReadBitmap( 0, "Level2.bmp" ) } REDEFINE listbox oTbr; fields acesso2sqla->descricao, aHBitmaps[ nLigado(acesso2sqla->ligado) ]; Head 'Descrição', 'I/O'; fieldsizes 350,50; on left dblclick(mostradesc(), otbr, .T.); update; ID 4005; of oceca_b function nLigado(nEatu) local nEst := 0 do case case nEatu = 'S' nEst := 1 case nEatu = 'N' nEst := 2 case nEatu = ' ' nEst := 2 endcase return nEst id=code>id=code>mas não muda de bitmap? como fazer para mudar fw10.8harbour-xDev.70 Studio-bcc582-Mysql-Pelles programadorcp80@hotmail.com.br ;