De Visual FoxPro para xHarbour

[Endrigo Rodrigues]

Olá.

Sou novato em xHarbour, e gostaria de saber se tem alguém que conhece o Visual FoxPro, pois gostaria de comparativos para poder migrar do VFP para o xHarbour.

Se puderem me esclarecer algumas dúvidas, baixei o xHarbour Buider Demo e o RDD e achei interessante o Visual xHarbour.

* No VFP nos controles de edição, possuo uma propriedade chamada ControlSource onde eu especifico a variável ou campo que receberá o conteúdo da edição (ControlSource = "Variavel" ou ControlSource = "TABELA.CAMPO") ou seleção. Como faço isso no Visual xHarbour?
* Tenho também as propriedades Format e InputMask onde eu defino o PICTURE do @ GET. Onde faço isso no Visual xHarbour?
* No ComboBox e ListBox tenho as propriedades RowSourceType e RowSource que defino o tipo da origem dos dados da lista e a origem, que podem ser Manual, Por uma lista separada por virgula, um Alias, Instrução SQL, Matriz, Campos, Arquivos e Estrutura de um Alias. Como faço isso ou algo parecido no xHarbour/Visual xHarbour?

E alias, o Visual xHarbour é a melhor IDE a ser utilizada? Poís, vejo que muitos utilizam outras IDEs para trabalhar com xHarbour.

Se tiverem um tutorial de migração, agradeço.
Existe um "Ramalho" para o xHarbour e Visual xHarbour?


Agradeço quem puder me ajudar.

[Endrigo Rodrigues]

E relatórios, como faço no Visual xHarbour?
No Visual FoxPro eu utilizo o próprio gerador de relatórios que ele possui.


Agradeço mais uma vez.

[sygecom]

Respondendo sua pergunta no outro topico:
Desculpa, mas eu não conheço nem o Visual xHarbour e nem o Visual Fox Pro, o que eu conheço é o Xailer, mas é pago assim como o Visual xHarbour.
O Xailer eu sei que é bem avançado se falando em IDE, mas eu uso hoje em dia a Hwgui com a IDE mantida pelo Colega Luis Basso, consigo fazer tudo com ela, alem de claro aproveitar parte dos meus codigos clipper.

[Endrigo Rodrigues]

Seria possível acrescentar recursos para o HwGUI?

Como por exemplo, adicionar a leitura de arquivos DBFs com os formatos dos formulários (.SCX), relatórios (.FRX), etiquetas (.LBX) e menus (.MNX) do Visual FoxPro. Pois os formulários, relatórios, etiquetas e menus criados no Visual FoxPro são gravados em arquivos DBFs mas com extensões diferentes.

E através desses arquivos gerar o executável com o código gerado pelo conteúdos desses DBFs.

[sygecom]

Seria possível acrescentar recursos para o HwGUI?

A Hwgui é OpenSource, se não tem o que vc procura nela e você sabe como implantar isso , é só baixar os Source pelo TortoiseCVS adicionar seus novos recursos e recompilar a LIB.

Como por exemplo, adicionar a leitura de arquivos DBFs com os formatos dos formulários (.SCX), relatórios (.FRX), etiquetas (.LBX) e menus (.MNX) do Visual FoxPro. Pois os formulários, relatórios, etiquetas e menus criados no Visual FoxPro são gravados em arquivos DBFs mas com extensões diferentes.

Não sei nada de Visual FoxPro, mas com a Hwgui você utiliza que nem no clipper, porem com poucas mudanças visual, e os comandos como @ 10,10 SAY , @ 10,10 GET permanece.

[Endrigo Rodrigues]

Leonardo, é tipo assim, alguma vez você já criou ou já viu algum código de gerador de relatórios onde você grava as informações dos relatórios em um DBF?

É exatamente assim que o Visual FoxPro trabalha, a IDE do VFP é na verdade um grande manipulador de DBFs, o tempo todo você está trabalhando com DBFs. Eu crio o formulário (assim como é feito no HwGUI) em tempo de criação (designtime), e o VFP cria um DBF mas com a extensão SCX.

Entendeu?

Abaixo vai a estrutura do arquivo Teste.scx (Todos os formulários criados no VFP usa essa estrutura física).

Código: Selecionar todos

Structure for table:    C:\TESTE.SCX
Number of data records: 6       
Date of last update:    28/02/2009
Memo file block size:   1
Code Page:              1252    
Field  Field Name      Type                Width    Dec   Index   Collate Nulls    Next    Step
    1  PLATFORM        Character               8                             No
    2  UNIQUEID        Character              10                             No
    3  TIMESTAMP       Numeric                10                             No
    4  CLASS           Memo                    4                             No
    5  CLASSLOC        Memo                    4                             No
    6  BASECLASS       Memo                    4                             No
    7  OBJNAME         Memo                    4                             No
    8  PARENT          Memo                    4                             No
    9  PROPERTIES      Memo                    4                             No
   10  PROTECTED       Memo                    4                             No
   11  METHODS         Memo                    4                             No
   12  OBJCODE         Memo (binary)           4                             No
   13  OLE             Memo                    4                             No
   14  OLE2            Memo                    4                             No
   15  RESERVED1       Memo                    4                             No
   16  RESERVED2       Memo                    4                             No
   17  RESERVED3       Memo                    4                             No
   18  RESERVED4       Memo                    4                             No
   19  RESERVED5       Memo                    4                             No
   20  RESERVED6       Memo                    4                             No
   21  RESERVED7       Memo                    4                             No
   22  RESERVED8       Memo                    4                             No
   23  USER            Memo                    4                             No
** Total **                                  109

E abaixo vai o conteúdo desse formulário (os registros desse DBF).

Código: Selecionar todos

Record#  PLATFORM UNIQUEID    TIMESTAMP CLASS                                                                                                CLASSLOC                                                                                             BASECLASS                                                                                            OBJNAME                                                                                              PARENT                                                                                               PROPERTIES                                                                                                                                                                                                                                                     PROTECTED                                                                                            METHODS                                                                                              OBJCODE                                                                                              OLE                                                                                                  OLE2                                                                                                 RESERVED1                                                                                            RESERVED2                                                                                            RESERVED3                                                                                            RESERVED4                                                                                            RESERVED5                                                                                            RESERVED6                                                                                            RESERVED7                                                                                            RESERVED8                                                                                            USER                                                                                                
      1  COMMENT  Screen                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 VERSION =   3.00                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                            
      2  WINDOWS  _2LE1CDY78  979154001 dataenvironment                                                                                                                                                                                           dataenvironment                                                                                      Dataenvironment                                                                                                                                                                                           Top = 0|Left = 0|Width = 0|Height = 0|DataSource = .NULL.|Name = "Dataenvironment"|                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                          1                                                                                                                                                                                                         1                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                            
      3  WINDOWS  _2LE1CDY79  979154001 form                                                                                                                                                                                                      form                                                                                                 Teste                                                                                                                                                                                                     Top = 0|Left = 0|Height = 207|Width = 263|DoCreate = .T.|BorderStyle = 2|Caption = "Formulário Teste"|Name = "Teste"|                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                               
      4  WINDOWS  _2LE1CDY7A  979154001 label                                                                                                                                                                                                     label                                                                                                Label1                                                                                               Teste                                                                                                Caption = "Código:"|Height = 17|Left = 16|Top = 24|Width = 40|Name = "Label1"|                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                      
      5  WINDOWS  _2LE1CDY7B  979154001 textbox                                                                                                                                                                                                   textbox                                                                                              txtCodigo                                                                                            Teste                                                                                                Alignment = 3|Value = 10|Format = "KL"|Height = 23|InputMask = "######"|Left = 64|Top = 24|Width = 72|Name = "txtCodigo"|                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           
      6  COMMENT  RESERVED                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                       Arial, 0, 9, 5, 15, 12, 32, 3, 0                                                                                                                                                                                                                              

Aqui está a imagem desse form em tempo de criação.


E aqui é o formulário em execução.

[sygecom]

Agora eu lhe entendi !!!
Na Hwgui tudo fica armazenado em XML, e você pode utilizar esses XML diretamente no seu aplicativo, e no caso de relatorios a Hwgui conta com uma IDE que se chama Hwreport que armazena a estrutura dos relatorios em .RPT

[Endrigo Rodrigues]

Mas você entendeu o que eu gostaria de saber se é possível de ser feito no HwGUI? Ler esses arquivos DBFs (SCX) e montar no próprio HwGUI o formulário para que eu possa alterar meus formulários não mais no Visual FoxPro, mas sim no HwGUI, e compilar tudo no mesmo, e não mais utilizar o VFP.

Resumindo, quero deixar de usar o VFP, mas não quero reescrever meus programas, telas e relatórios.

[sygecom]

Entendi, mas você não vai conseguir utilizar esses DBF com seus formularios do VFP, você tera que redesenhar seus formularios usando a IDE da Hwgui, ai gera o XML(como se fosse seus dbf do VFP) e alem de gerar os XML que pode ser linkado diretamente no sistema a IDE tmb. gera os .PRG para vc pegar o codigo e compilar na sua app.

[Endrigo Rodrigues]

Sim até aí entendi, o que estou questionando é o seguinte, se temos em nossas mãos os fontes da IDE, eu não poderia alterá-lo para passar a ler esses DBFs ao invés dos XMLs? Entendeu o meu questionamento?

[sygecom]

Sim entendi, claro que você pode fazer afinal a Hwgui é open source,unica coisa que tudo que você fizer ficara para você, para poder commitar no CVS da Hwgui tens que fazer parte do grupo de desenvolvedores da Hwgui. Agora teria que analisar se isso é realmente viavel, e alem disso mesmo assim você não aproveitaria o conteudo dos DBF já existentes, porem poderia fazer na IDE da Hwgui a mesma coisa que a do VFP faz.

[vailton]

Uma pergutna que não tem nada haver... eu ja programei com VFP 3.x em Win98 ha uns 14 anos atrás. Qual é esta versão que vc usa aê?

[filizola]

grande Endrigo, se hoje programo em vfp foi por causa de um empurrão seu. me diz aí o motivo de mudar

[Endrigo Rodrigues]

A versão que estou utilizando é a 9.0 SP2.

[Endrigo Rodrigues]

grande Endrigo, se hoje programo em vfp foi por causa de um empurrão seu. me diz aí o motivo de mudar

Cara, como vai? A quanto tempo heim?

Aqui, estava pensando em mudar, estava estudando outras possibilidades em xBase, por causa da descontinuação do VFP, mas infelizmente ou felizmente não sei, quando acostumamos com as facilidades da IDE e da linguagem, recursos de Intellisense, gerador de relatórios e etiquetas nativo, acesso a qualquer banco de dados via ODBC ou ADO com programação nativa, criar, publicar e consumir WebServices, e por aí vai, sem precisar instalar ou recompilar componentes de terceiros, fica complicado quando nos deparamos com as situações que estou encontrando aqui.

Estou aprendendo a admirar o Harbour e o xHarbour, são ferramentas espetaculares, mas pecam D+, mas D+ mesmo por falta de uma IDE padronizada e acabada. Não tenho mais o pique que tinha em 1989 e 1990 quando progamava em Clipper (tudo na munheca, copiar e colar prá lá e prá cá, salvar como isso e aquilo), depois que conheci o FoxPro (que já possuia uma IDE fantástica no MS-DOS e no Unix) e o Visual FoxPro, acho que fiquei um pouco preguiçoso, o bicho faz tudo para você e não da problema.

Hoje já fiquei sabendo de boas notícias para o mundo xBase e principalmente para o Visual FoxPro ele está sendo continuado por outra empresa e funcionará para .Net pela empresa eTecnologia, o projeto já está convertido praticamente 91% das funções e 80% dos comandos existentes no VFP. Isso quer dizer que, não será nescessário mais abandonar o VFP, se você quiser dar uma olhada de como anda o projeto, a IDE está fantástica, principalmente que eles conseguiram manter o Command Window, para .Net cara, já pensou programar em VFP (padrão xBase) para .Net, PocketPC, Linux, Windows, 64bits e tudo mais, e tudo isso em VFP.
O link está aqui http://www.etecnologia.net/, vale a pena dar uma olhada.

Agradeço muito o pessoal da comunidade [x]Harbour, mas não vou largar mais o VFP, frente a essa notícia que tive hoje. Vocês foram fantásticos, me esclarecendo as dúvidas e tudo o mais. Se quiserem conhecer um pouco mais do VFP, estarei a disposição de quem quiser, abraços.