SET PROCE TO GENERICA

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

tonyx
Usuário Nível 3
Usuário Nível 3
Mensagens: 303
Registrado em: 07 Jul 2004 15:26

SET PROCE TO GENERICA

Mensagem por tonyx »

no cliper ei tinha
public variaveis...

set procedure to generica
set procedure to prog1
set procedure to prog2

-- ler opcao
case ocao = 1
prog1()
case opcao = 2
prog2()
============== compilava legal e dereto

como que e agora no XHARBOUR ---
NO HBMAKER TENHO QUE SELECIONAR TODOS OS MINI PROG´S
PARA A COMPILACAO
===== O SET PROCEDURE NAO FUNCIONA MAIS NO XHARBOUR ====
tonyx
Usuário Nível 3
Usuário Nível 3
Mensagens: 303
Registrado em: 07 Jul 2004 15:26

RESP

Mensagem por tonyx »

JA ALGUEM USOU OU EXISTE AGUMA COISA COMO ??
SET CLASSLIB
CREATEPOBJECT(prog)
NEWOBJECT(PROG)
tonyx
Usuário Nível 3
Usuário Nível 3
Mensagens: 303
Registrado em: 07 Jul 2004 15:26

RESP

Mensagem por tonyx »

descobri sozinho ==== no HBMAKE - na opcao compilar apenas o modulo /M - basta ficar em branco que aceita o tal
SET PROCEDURE TO PROG.PRG
e dentro do tal PROG.PRG --- basta COLOCAR na primeira linha
FUNCTION PROG --- E LA NO FINAL RETURN(NIL)

==============
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Re: SET PROCE TO GENERICA

Mensagem por sygecom »

tonyx escreveu:no cliper ei tinha
public variaveis...

set procedure to generica
set procedure to prog1
set procedure to prog2

-- ler opcao
case ocao = 1
prog1()
case opcao = 2
prog2()
============== compilava legal e dereto

como que e agora no XHARBOUR ---
NO HBMAKER TENHO QUE SELECIONAR TODOS OS MINI PROG´S
PARA A COMPILACAO
===== O SET PROCEDURE NAO FUNCIONA MAIS NO XHARBOUR ====
Vc deve linkar todos os PRG na hora da criação do Makefile.
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Re: RESP

Mensagem por sygecom »

tonyx escreveu:JA ALGUEM USOU OU EXISTE AGUMA COISA COMO ??
SET CLASSLIB
CREATEPOBJECT(prog)
NEWOBJECT(PROG)
Qual a duvida ?
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Responder