Página 1 de 1

Como criar uma tela , se utilizando de um array no minigui ?

Enviado: 12 Set 2005 16:05
por Antonio Carieli
:-O

Estou criando um sistema no minigui onde os arquivos .dbf , farão a criação da estrura dos arquivos utilizados , seus indices e telas dos cadastros . Consegui criar até os browse de entrada , a coisa fica feia na hora de criar as telas ..

Quando crio os arrays e tento coloca-los nas labels e textbox me aparecem erros ,que não estou conseguindo solucionar .. as variaveis são as label_inc1
exemplo :

#include "minigui.ch"

alabel[1] := "label_inc1"
alabel[2] := "Nome "


Function Main

DEFINE WINDOW Form_Main ;
AT 0,0 ;
WIDTH 640 HEIGHT 480 ;
TITLE 'Main Window' ;
MAIN

@ 200,250 LABEL alabel[1] ;
WIDTH 150 HEIGHT 40 ;
VALUE alabel[2] ;
ACTION MsgInfo('Label Clicked!!!') ;
FONT 'Arial' SIZE 24 CENTERALIGN

* FONT 'Verdana' SIZE 12

END WINDOW

Form_Main.Label_2.Value := 'Hello All, This Is An AutoSIzable Label!!!'

CENTER WINDOW Form_Main

ACTIVATE WINDOW Form_Main

Return



Antonio
podem me ajudar.....

Re: Como criar uma tela , se utilizando de um array no minig

Enviado: 12 Set 2005 21:45
por Stanis Luksys
Antonio Carieli escreveu: alabel[1] := "label_inc1"
alabel[2] := "Nome "

@ 200,250 LABEL alabel[1] ;
WIDTH 150 HEIGHT 40 ;
VALUE alabel[2] ;
ACTION MsgInfo('Label Clicked!!!') ;
FONT 'Arial' SIZE 24 CENTERALIGN
O problema esta na definicao do nome do objeto, que nao deve ser uma string, e sim um valor literal.

O valor esta ok, tem q ser string msm...

Como faço para criar esta variavel literal

Enviado: 13 Set 2005 08:01
por Antonio Carieli
No fivewin vc criaria um objeto , mas como estou utilizando um array como faria ....

alabel[1] := Olabel_inc1

Não da certo....

Enviado: 16 Set 2005 08:42
por Clipper
Na minha opnião é melhor usar a Minigui, é mais simples e tem melhor suporte.

Até logo.

Marcelo

Enviado: 16 Set 2005 10:01
por Sandro R R Freire
Marcelo, concordo, a Minigui tem um suporte melhor, tudo bem.

Mas vamos por analogia
Aqui temos um codigo Minigui

DEFINE WINDOW Form1 ;
AT 0,0 ;
WIDTH 340 ;
HEIGHT 200 ;
TITLE "Teste da DLL DllInscE32" ;
MAIN

@ 10,10 LABEL Label1 VALUE "Inscrição Estadual"
@ 40,10 TEXTBOX TextBox1 VALUE "" ;
TOOLTIP "Digite o número da inscrição estadual (somente dígitos)"

notem que para cada controle acima, será gerado uma variável Publica, ou seja, você interage na Variavel, pois ela é que recebe o handle.
Partindo do principio que a variavel contem o handle do textbox, a Minigui faz um jogo de xCommand para criar a seguinte situação

textbox.value, sendo que neste caso, ele traduz a um retorno do conteudo da variavel.
Eu pessoalmente não gosto por causa deste motivo.

Agora, vamos abortar um trecho da HwGUI

@ x, y GET oGet VAR vGet PICTURE "@e 999,999.99"
Este controle, que esta demonstrado em forma de comando acima, é um objeto, ou seja
oGet, foi instanciado como OOP, e vc pode interegir com este objeto, retirando dele os dados ou enviado ou então capturando os dados implementados na variável vGet, agora vc gosta do clipper pode fazer assim
@ x, y GET vGet PICTURE "@e 999,999.99"

Agora vamos parar com essa briga, pois as duas no nível C, acessar as API do Windows, apenas em nível xBase, a forma de montagem e estruturação esta diferente.

É melhor unirmos forças pela comunidade xBase, e deixarmos os usuários decidirem, pelo que lhe atenda as necessidades, HwGUI, Minigui, etc.
Como você disse, em outra conserva, todos Windows são péssimos, então o jeito é usar a HwGUI para Linux.

Certo

Um grande Abraço

Sandro Frerie

Enviado: 16 Set 2005 10:08
por Sandro R R Freire
Amigos, esqueci de mencionar,
Vocês também podem baixar pelo CVS a xHGTK, é uma gui Open Source também 100% brasileira, e ela foi baseada na GTK, ou seja todas as funções dela, tem a mesma sintaxe e trabalham como a GTK, servindo a documentação da GTK para ela.
Afinal de contas o que ela é?
É uma GUI para GTK, possibilitando ao usuario programar em xHarbour, usando a GTK, e subindo o nível a linguagem xBase.
Pesquisem no sourceforge pela xHgtk.
Enfim, trabalhamos pela comunidade xBase, desculpem se falhamos no suporte, mas muitas vezes precisamos trabalhar também pelo sustento e nem sempre pelo prazer, que as GUIS nos proporcionam.
Um grade abraço a todos, e estou a disposição para quaisquer esclarecimentos.