PC Toledo

será que nao teria como colocar uma certa aba para ficar visivel ou invivel, ou ate enable ou disable?

é isso mesmo que estava procurando, juntando a sugestao feita por Maligno de passar uma matriz como referencia, ficou beleza,

so tenho um problema agora,

como baixo a atualizacao da HWGui?

desculpa a falta de experiencia, mais estou comecando em xHarbour agora.

so mais uma coisa,

sera que nao ...

eu posso fazer um refresh() em uma variavel passada por referencia, no caso seria um get,
o meu problema alem de alimentar a variavel com dados e tambem manipular os componentes.

pessoal, bom dia,

queria saber se tem como acessar uma variavel local de uma outra procedure ou function, por exemplo:

function primeira()
local nCodigo:=1, cNome:='teste 1'
...
MsgInfo("Codigo: "+str(ncodigo)+"- Nome: "+cNome ,"Teste") // mostra Codigo: 1 - Nome: teste 1
...
segunda()
MsgInfo ...

tem sim,

function FixaData(cData,cHora)
SetTime(cHora)
SetDate(cData)
Return .t.

pessoal, ja resolvi,

ficou assim:

oRichedit1:SetText(vRichedit1)
SetFocus(ConfigSCEC:handle)

pessoal, sempre que tento dar um refresh em um dialog acontece o erro abaixo:

Error BASE/1004 Message not found: HDIALOG:REFRESH
Called from tobject.prg->HDIALOG:ERROR(172)
Called from tobject.prg->HDIALOG:MSGNOTFOUND(205)
Called from tobject.prg->HDIALOG:REFRESH(0)
Called from SCECW.PRG->MAIN(262 ...

so uma duvida,

como o preview do Designer funcionou sem erro?

pessoal, foi so eu tirar o GET que funcionou,

tava assim:
@ 12,45 GET LISTBOX oListbox1 ITEMS {""} SIZE 323,363 ;
FONT HFont():Add( 'MS Sans Serif',0,-13,700,,,)
eu coloquei assim porque o Designer gerou o codigo assim,

porem ao seguir a dica de Leonardo e olhei o exemplo do DemoHList.prg ...

#include "hwgui.ch"

FUNCTION _ConfigSCEC
PRIVATE ConfigSCEC
PRIVATE oListbox1

INIT DIALOG ConfigSCEC TITLE "SCEC - Configurando Sistema" ;
AT 352,126 SIZE 347,448 ;
FONT HFont():Add( 'MS Sans Serif',0,-13,700,,,) ;
STYLE DS_SYSMODAL +DS_CENTER +WS_VISIBLE

@ 12,45 GET LISTBOX oListbox1 ITEMS ...

pessoal, preciso da ajuda de voces,

ao copilar com um LISTBOX, o sistema apresenta o erro abaixo:

xHarbour Compiler build 1.0.0 (SimpLex)
Copyright 1999-2007, http://www.xharbour.org http://www.harbour-project.org/
Compiling 'CONFIGSCEC.PRG'...
100 200 300 400 500 600 700 800 900 1000 1100 1200 ...

bom dia, Leonardo

desculpe ta te encomodando, mais eu tentei e nao consegui resouver o problema do bitmap, da erro, e alem disso nao to conseguindo usar o CLIPPER NOEXIT, em alguns campos so ta saindo quando do um click com o mouse em um outro, e tambem to tendo dificuldades em manipular as cores ...

Function Main
local GetList:={}
local oIcon := HIcon():AddRESOURCE( "MAINICON" )
local cICliente := HBitmap():AddResource("1001")

//AddFile( "Img\clientes.bmp" )

local oMainWindow, oStatus
local CUTMP2:='', HARQ:='', CUTMP:=''

//private oIconchild := HIcon():AddFile( "Img\prg.ico" )

Private ...

sygecom, eu copilei com o exemplo do bitmap assim mais de o erro abaixo:

Error BASE/1070 Argument error: ==
Called from drawwidg.prg->HBITMAP:ADDFILE(388)
Called from hownbtn.prg->HOWNBUTTON:NEW(81)
Called from SCECW.PRG->MAIN(141)

HwGUI 2.16 xHarbour build 1.0.0 Intl. (SimpLex)
Date:09/06/2008 ...

sygecom, mais uma vez muinto obrigado por mim responder,

a lib e GT_LIB.LIB, utilizo as funcoes GT_Decode() e GT_Encode(), preciso que sejam compativeis com essas pois estou convertendo o sistema aos poucos, e tanto o sistema em xHarbour quanto o sistema em clipper tem que abrir os mesmos bancos de ...