carlosmsi Posted February 11, 2007 Report Share Posted February 11, 2007 sou programador em clipper a muitos anos e agora estou começando a programar em fivewin se alguem puder me ajudar estou fazendo uns teste iniciais com gets fiz o programa abaixo mas o programa so executa se eu desabilito o RESOURCE e ao executar nao aparece as caixas de edicao de cada campo o ponteiro do mouse fica parado no canto esquerdo da tela. para que server O RESOURCE e como faço para aparecer os campos de cada get na tela. se eu usar o @ 01,05 GET cliente PICTURE "999999" funciona mas nao precisaria mais né Meu exemplo: #INCLUDE "FIVEWIN.CH" FUNCTION MAIN() LOCAL OD,OGet LOCAL Cliente,nome,cidade,estado,telefone cliente:= 0 nome:= SPACE(40) cidade:= SPACE(30) estado:= SPACE(02) telefone:= space(14) // DIALOGO COM GETS DEFINE DIALOG OD //RESOURCE "mirecurso" DEFINE FONT OF NAME "times new roman" size 10,20 REDEFINE GET oGet var Cliente ID 101 of OD color (rgb(255,255,000),rgb(128,128,000)) REDEFINE GET oGet var nome ID 102 of OD font of REDEFINE GET oGet var cidade ID 103 of OD on change tone(1000,1) REDEFINE GET oGet var estado ID 104 of OD valid(tone(1000,1),.t.) REDEFINE GET oGet var telefone ID 105 of OD ACTIVATE DIALOG OD centered RETURN(NIL) programas usados CLIPPER 5.3,BLINKER 7, FIVEWIN 7 Quote Link to comment Share on other sites More sharing options...
carlosmsi Posted February 11, 2007 Author Report Share Posted February 11, 2007 sou programador em clipper a muitos anos e agora estou começando a programar em fivewin se alguem puder me ajudar estou fazendo uns teste iniciais com gets fiz o programa abaixo mas o programa so executa se eu desabilito o RESOURCE e ao executar nao aparece as caixas de edicao de cada campo o ponteiro do mouse fica parado no canto esquerdo da tela. para que server O RESOURCE e como faço para aparecer os campos de cada get na tela. se eu usar o @ 01,05 GET cliente PICTURE "999999" funciona mas nao precisaria mais né Meu exemplo: #INCLUDE "FIVEWIN.CH" FUNCTION MAIN() LOCAL OD,OGet LOCAL Cliente,nome,cidade,estado,telefone cliente:= 0 nome:= SPACE(40) cidade:= SPACE(30) estado:= SPACE(02) telefone:= space(14) // DIALOGO COM GETS DEFINE DIALOG OD //RESOURCE "mirecurso" DEFINE FONT OF NAME "times new roman" size 10,20 REDEFINE GET oGet var Cliente ID 101 of OD color (rgb(255,255,000),rgb(128,128,000)) REDEFINE GET oGet var nome ID 102 of OD font of REDEFINE GET oGet var cidade ID 103 of OD on change tone(1000,1) REDEFINE GET oGet var estado ID 104 of OD valid(tone(1000,1),.t.) REDEFINE GET oGet var telefone ID 105 of OD ACTIVATE DIALOG OD centered RETURN(NIL) programas usados CLIPPER 5.3,BLINKER 7, FIVEWIN 7 Quote Link to comment Share on other sites More sharing options...
carlosmsi Posted February 11, 2007 Author Report Share Posted February 11, 2007 Eu posso estar falando asneira mas parece que entendi que O COMANDO RESOURCE COM o nome que esta em "" seria o nome da tela feito no WORKSHOP entao eu por enquanto nao utilizo ele por enquanto, seria isto agora a respeito do REDEFINE GET OS campos nao ficam aparecendo para que possa ser digitado estou so usando desta forna @ 01,01 GET Cliente PICTURE "999999" @ 02,01 GET Nome PICTURE "@!" @ 03,01 GET cidade PICTURE "@!" @ 04,01 GET ESTADO PICTURE "@!" @ 05,01 GET Telefone PICTURE "@!" quem pode me dar umas instrucões fico grato Quote Link to comment Share on other sites More sharing options...
personal Posted February 11, 2007 Report Share Posted February 11, 2007 _Codigo:=0 _Nome:=Space(40) DEFINE DIALOG oDlg From 0,0 To 200,200 OF oWnd Pixel TITLE "Minha Dialog" @ 010,010 Say "Código" OF oDlg Pixel Size 040,010 @ 010,060 Say "Nome" OF oDlg Pixel Size 150,010 @ 020,010 Get oCodigo VAR _Codigo Picture "999" OF oDlg Pixel Size 040,010 @ 020,060 Get oNome VAR _nome Picture "@!K" OF oDlg Pixel Size 150,010 ACTIVATE DIALOG oDlg id=code>id=code>Oliveira, Sérgio A. PERSONAL Comp. e Sitemas.id=green> Lins - SP ** sergio@personal.com.br FWH 2.5, xharbour 0.99.4, SqlLib, MySql, xMate. TWBrowse(),C5Menu,vPrinter. Windows XP, Vista Ultimate. Quote Link to comment Share on other sites More sharing options...
zekasan Posted February 11, 2007 Report Share Posted February 11, 2007 Olá Carlos, o redefine é usado para atribuir "novos comandos" aos controles que estão dentro do arquivo de resources(*.RES), igual a tela principal que você deduziu, por isso que eles não aparecem no seu executável, eles também foram construÃdos pelo Workshop ou o Pelles C Quote Link to comment Share on other sites More sharing options...
carlosmsi Posted February 12, 2007 Author Report Share Posted February 12, 2007 obrigado pelas dicas e pelo exemplo ate breve Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.