Página 1 de 1
Utilizando a Visual Lib
Enviado: 08 Mar 2005 10:51
por Manoel
Olá pessoal, bom dia.
Não dominar uma determinada lib é um problema, não é mesmo ?
:-O
Na realidade nem sei expressar direito o que estou precisando.
Utilizando a Visual lib, preciso que, nas opções de menu, ao invés de passar aquele bloco de código, passar uma procedure.
Na biblioteca do clipper, quando passamos uma procedure tipo " Do Cadastro" e esta rotina não está no módulo principal que está sendo compilado ela busca automaticamente a rotina no diretório atual. Preciso que seja desta forma pois, do contrário, o programa ficará imenso e isto dificulta a manutenção.
Espero que tenham entendido!
Atenciosamente.
Enviado: 08 Mar 2005 11:05
por janio
Olá Manuel,
Recebeu o e-mail?
Não vejo nenhum problema em passar uma FUNCTION ou PROCEDURE, utilizando a visual lib, que não esteja no PRG principal, veja como faço sem problemas:
Código: Selecionar todos
mMENU := NewBarMenu()
mCONPAG := NewDownMenu()
mCADPAG := NewDownMenu()
mLANPAG := NewDownMenu()
mRELPAG := NewDownMenu()
...
...
AddBarItem( mMENU, "Contas a &Pagar" , "<F05> Calculadora - <F06> Caldendario" , mCONPAG )
AddDownItem( mCONPAG, "&Cadastros Gerais",, mCADPAG )
AddDownItem( mCONPAG, "&Lancamentos Diarios",, mLANPAG )
AddDownItem( mCONPAG, "&Relatorios Gerais",, mRELPAG )
// Sub menu de CADASTROS
AddDownItem( mCADPAG, "Cadastra &Fornecedores",, { || P17CCRE() } )
Eu tenho o meu PRG principal, chamado MENU.PRG, e os PRG´s que são chamados a cada chamada de menu. No exemplo acima, o P17CCRE.PRG é um arquivo à parte que é chamado sem problema a partir do PRG principal...
Espero ter ajudado, se é que entendi direito o que vc tá querendo...
Um Abraço,
Janio :xau
Enviado: 08 Mar 2005 11:21
por Clipper
Prezado Manoel
O que deve estar acontecendo é que você não está passando os módulos no arquivo LNK. Exemplo :
CLIPPER PROG1 /M
CLIPPER PROG2 /M
CLIPPER PROG3 /M
CLIPPER FUNC1 /M
CLIPPER FUNC2 /M
RTLINK FI PROG1,PROG2,PROG3,FUNC1,FUNC2
Desta forma você pode chamar a função de qualquer parte do sistema que irá funcionar beleza.
Creio que você esteja fazendo mais ou menos assim :
CLIPPER PROG1 (que é o que chama todos os outros através do DO)
RTLINK FI PROG1
Desta forma não funciona porque o PROG1 não encontrará as funções.
Isso foi só um exemplo básico, se preferir poste o seu BAT ou LNK aqui.
Até logo.
Marcelo
Enviado: 08 Mar 2005 11:22
por Manoel
Olá Jânio!
É exatamente o que preciso. Vou testar.
Quanto ao arquivo, ainda não recebi. Vou passar alguns outros porque você sabe né, provedor é complicado.
mmfonseca@acessa.com
mm-fonseca@ig.com.br
manoelmessiasfonseca@hotmail.com
Atenciosamente.
Enviado: 08 Mar 2005 11:35
por janio
Manoel escreveu:Quanto ao arquivo, ainda não recebi. Vou passar alguns outros porque você sabe né, provedor é complicado.
mm-fonseca@ig.com.br
Pela QUARTA vez... enviado para
mm-fonseca@ig.com.br.
ou pegue aki
http://www.magnoman.vcnet.com.br/caclipper/funcao.shtml
Um Abraço,
Janio
Enviado: 08 Mar 2005 12:40
por Manoel
Valeu, obrigado.
Recebi na conta do Ig.
Pra você ver como são as coisas, nem tendo conta paga de e-mail ela não funciona. No Ig que é gratis recebi.
Forte abraço.