Página 5 de 6
Enviado: 15 Nov 2007 00:15
por Maligno
Peraí. Que negócio é esse de flag de índice no header do DBF? Fazia muito tempo que tinha visto a descrição da estrutura de um header de DBF. Olhei de novo só pra confirmar. Não tem qualquer informação acerca de índice nele.
Enviado: 15 Nov 2007 00:25
por Stanis Luksys
hehe...
Assim fica difícil né. Com o tempo, este tipo de afirmação, pode tirar a credibilidade das respostas obtidas aqui do forum.
Mas eu gostaria de ver mesmo como é que se cria uma propriedade numa classe em tempo real. Também quero aprender.
Enviado: 15 Nov 2007 00:43
por Maligno
Mas eu gostaria de ver mesmo como é que se cria uma propriedade numa classe em tempo real.
Em tempo de execução você quer dizer. Pois somos dois. Também fiquei curioso.
Enviado: 15 Nov 2007 00:48
por Stanis Luksys
Issooo... O famoso "run-time"...
Enviado: 15 Nov 2007 01:00
por Edsones
Olá a todos.
Me desculpem se o termo "DATA" complicou a pergunta, imaginei o contrário, mas realmente estava falando de propriedades da classe.
Tenho um sistema administrativo que cria formulários em tempo de execução por dicionário de dados, e estou passando essa rotina para OOP. E no projeto, seria muito útil, que eu conseguisse definir classes e suas propriedades, em tempo de execução.
ericmagaldi
Obrigado pela atenção e gostaria sim de sua ajuda se possível, pois sei que é possivel fazer isso no xhabour.
Enviado: 15 Nov 2007 13:09
por esbasso
è possivel sim manipular as CLASSES criando novas proriedades e metodos
Abaixo a lista
__ObjSetValueList() Set object with an array of DATA names and values
__objAddData() Add a DATA to an already existing class
__objAddInline() Add an INLINE to an already existing class
__objAddMethod() Add a METHOD to an already existing class
__objDelData() Delete a DATA (instance variable) from class
__objDelInline() Delete a METHOD INLINE from class
__objDelMethod() Delete a METHOD from class
__objDerivedFrom() Determine whether a class is derived from another class
__objGetMethodList() Return names of all METHOD for a given object
__objGetMsgList() Return names of all DATA or METHOD for a given object
__objGetValueList() Return an array of DATA names and values for a given object
__objHasData() Determine whether a symbol exist in object as DATA
__objHasMethod() Determine whether a symbol exist in object as METHOD
__objModInline() Modify (replace) an INLINE method in an already existing class
__objModMethod() Modify (replace) a METHOD in an already existing class
Re: xHarbour 100% Orientado a Objetos - Uma pequena introdução
Enviado: 18 Nov 2010 12:53
por dlemes
Uma dúvida,
harbour tem suporte a "métodos mágicos"? se alguém tem dúvidas do que eu estou falando veja
http://www.php.net/manual/pt_BR/languag ... ng.methods
se for possível da para criar os famosos métodos findByCampo como no RubyOnRails, Grails e outros tantos frameworks...
Re: xHarbour 100% Orientado a Objetos - Uma pequena introdução
Enviado: 22 Nov 2010 20:33
por lugab
Que sorte minha, terem upado esse tópico.
Não fosse assim eu nunca saberia da existência dele, que é uma ótima aula de programação pra mim...
Gabriel
xHarbour 100% Orientado a Objetos - Uma pequena introdução
Enviado: 06 Jan 2012 18:41
por raquelreis
Que ótimo esse tópico. Programo(tento né...) em Java, e não imaginei que pudesse trabalhar OOP com xHarbur(parecido com clipper).
Parabéns!
xHarbour 100% Orientado a Objetos - Uma pequena introdução
Enviado: 28 Abr 2012 20:25
por bencz
Olá (:
Eu estou tendo problemas com esse código...
segue foto:
Como posso resolver esse problema ??
xHarbour 100% Orientado a Objetos - Uma pequena introdução
Enviado: 28 Abr 2012 21:30
por alxsts
Olá!
O problema não é no código.
DOS Erro 2 - File not found. O programa está tentando abrir a tabela Clientes.Dbf e não a está encontrando no local especificado.
Revise o caminho especificado ou coloque o arquivo (e prováveis arquivos de índice) na pasta onde o programa os espera encontrar.
xHarbour 100% Orientado a Objetos - Uma pequena introdução
Enviado: 28 Abr 2012 22:07
por bencz
Olá
Eu simplesmente peguei o código do tutorial e copiei...
onde eu posso conseguir esse arquivo, ou criar ele ??
xHarbour 100% Orientado a Objetos - Uma pequena introdução
Enviado: 29 Abr 2012 11:25
por alxsts
Olá!
O código hipotético do exemplo não fornece a tabela. Salve o código abaixo e compile. Depois execute na pasta onde está o executável do exemplo.
Código: Selecionar todos
FUNCTION CriaTbCli()
LOCAL aArray, nInd, nLen
aArray := {}
AAdd( aArray, { "Codigo", "N", 3, 0 }, { "Nome", "C", 50, 0 } )
DbCreate( "Clientes", aArray )
aArray := {}
AAdd( aArray, { 1, "VARIG" } )
AAdd( aArray, { 2, "VASP" } )
AAdd( aArray, { 3, "TRANSBRASIL" } )
AAdd( aArray, { 4, "CRUZEIRO DO SUL" } )
AAdd( aArray, { 5, "PANAM" } )
AAdd( aArray, { 6, "BRANIFF" } )
USE Clientes EXCLUSIVE NEW
nLen := Len( aArray )
FOR nInd := 1 TO nLen
Clientes->( DbAppend() )
Clientes->codigo := aArray[ nInd, 1 ]
Clientes->nome := aArray[ nInd, 2 ]
NEXT
Clientes->( DbCloseArea() )
RETURN NIL
xHarbour 100% Orientado a Objetos - Uma pequena introdução
Enviado: 04 Mai 2012 01:25
por bencz
Ok, tive o seguinte erro...
main.prg(7) Error E0021 Incorrect number of arguments in AADD
xHarbour 100% Orientado a Objetos - Uma pequena introdução
Enviado: 04 Mai 2012 10:25
por Stanis Luksys
Opa,
Troque a linha por estas duas:
Código: Selecionar todos
AAdd( aArray, { "Codigo", "N", 3, 0 } )
AAdd( aArray, { "Nome", "C", 50, 0 } )
Note que no exemplo original, o código é tipo caracter, tamanho 5, e não numérico como foi colocado agora.
Abraços.