ola pessoal...
algum de vocês podem me mandar um exemplo de programação orientada a objeto no xharbour??
estou com dificuldades para criar classes, estou errando muito na sintaxe tbm..
desde ja agradeço...

Moderador: Moderadores
JoséQuintas escreveu:http://www.pctoledo.com.br/forum/viewtopic.php?f=43&t=16760&hilit=classe
sr. Susviela..
eu tentei compilar seus codigos, porém, sempre da erro em " #include <hmg.ch> "
aparece essa mensagem de erro -->
class.prg(3) Error F0029 Can't open #include file: 'hmg.ch'
Pré requisitos :
- HMG ( 3.4.4 - 32 bits)
hbmk2: Error: Referenced, missing, but unrecognized Harbour function(s):
OCADASTRO_NEW(), OCADASTRO_CRIARTABELA()
JoséQuintas escreveu:Deve ter dado a mesma mensagem que aqui:hbmk2: Error: Referenced, missing, but unrecognized Harbour function(s):
OCADASTRO_NEW(), OCADASTRO_CRIARTABELA()
"referenciado, perdido, funções não reconhecidas pelo Harbour..."
# include "hbclass.ch"
create class oCadastro
var nNome init ""
var cIdade init ""
var nNumTel init 0
var nCpf init 0
var nId init 0
METHOD New(cArqDB) CONSTRUCTOR
METHOD CriarTabela()
endclass
*---------------------------------------------------------------------------
METHOD New(cArqDB) CLASS oCadastro // <== FALTANDO ISSO mesmo PRG
*---------------------------------------------------------------------------
// códigos aqui ...
Return Self // construtor retorna self
*---------------------------------------------------------------------------
METHOD CriarTabela() CLASS oCadastro // <== FALTANDO ISSO mesmo PRG
*---------------------------------------------------------------------------
// códigos outro método aqui ...
Return .T.
Usuários vendo este fórum: Google [Bot] e 7 visitantes