J.Francisco

Pessoal Obrigado ,Resolvido no proprio editor MedCX e pelo XdevStudio,basta selecionar no editar pelo DOS oem e pronto. obrigado J.Francisco - FWH27 xHarbour 099.71

Pessoal,como faco para usar acentuacao na barra de menu? J.Francisco - FWH27 xHarbour 099.71

Pessoal,como faco para usar acentuacao na barra de menu? J.Francisco - FWH27 xHarbour 099.71

Obrigado kapiaba,valeu! great teacher thank you! J.Francisco - FWH27 xHarbour 099.71

Bom ! Vou tentar expor melhor.Nos PRG gerado no Gasfw tem uma function para a criacao do banco d dados.dbf.Que cria qdo não existe no sistema,com esta descrito abaixo.O erro da nessa linha oText:SetText( " Processando, Aguarde... Criando BANCOS.DBF " ) Se eu retiro essa linha me cria com sucesso. Entao imagino que essa funcao deveria aparecer com na Indexacao dos arquivo. //->Criacao do Banco de Dados do Programa - Usando MSGMETER() STATIC FUNCTION CRIABANC( oMeter, oText, oDlg, lEnd ) IF .NOT. FILE( "BANCOS.DBF" ) Erro => oText:SetText( " Processando, Aguarde... Criando BANCOS.DBF " ) DbCreate( "BANCOS.DBF", { { "CDBCO", "N", 03, 00 }, ; { "DESCRI", "C", 20, 00 }, ; { "STBCO", "N", 01, 00 } } ) DbCloseAll() ENDIF RETURN NIL J.Francisco - FWH27 xHarbour 099.71

Kapiaba, nessa funcao apresenta erro no oText:SetText ,se eu elimino a linha cria o banco, mas o oMeter nao atua ,Sera que ainda nao estou Desatualizado? Usando Gasfw2.12/FHW dez 2006 /FWH27 Harbour 099.61 /099.70 /1 em todas rotina criada no Gasfw. //->Criacao do Banco de Dados do Programa - Usando MSGMETER() STATIC FUNCTION CRIAEMPR( oMeter, oText, oDlg, lEnd ) IF .NOT. FILE( "EMPRESA.DBF" ) oText:SetText( " Processando, Aguarde... Criando EMPRESA.DBF " ) DbCreate( "EMPRESA.DBF", { { "CDEMP", "C", 02, 00 }, ; { "NRCGC", "N", 15, 00 }, ; { "NRIES", "C", 15, 00 { "NRENTR", "N", 06, 00 } } ) DbCloseAll() ENDIF RETURN NIL J.Francisco - FWH27 xHarbour 099.71

Kapiaba, nessa funcao apresenta erro no oText:SetText ,se eu elimino a linha cria o banco, mas o oMeter nao atua ,Sera que ainda nao estou Desatualizado? Usando Gasfw2.12/FHW dez 2006 /FWH27 Harbour 099.61 /099.70 /1 em todas rotina criada no Gasfw. //->Criacao do Banco de Dados do Programa - Usando MSGMETER() STATIC FUNCTION CRIAEMPR( oMeter, oText, oDlg, lEnd ) IF .NOT. FILE( "EMPRESA.DBF" ) oText:SetText( " Processando, Aguarde... Criando EMPRESA.DBF " ) DbCreate( "EMPRESA.DBF", { { "CDEMP", "C", 02, 00 }, ; { "NRCGC", "N", 15, 00 }, ; { "NRIES", "C", 15, 00 { "NRENTR", "N", 06, 00 } } ) DbCloseAll() ENDIF RETURN NIL J.Francisco - FWH27 xHarbour 099.71

Resolvido! J.Francisco - FWH27 xHarbour 099.71

Kapiaba ja esta no seu email kmt_karinha@pop.com.br J.Francisco - FWH27 xHarbour 099.71

Kapiaba ,matou certo.Então mais uma bucha para o gasfw!!! Fiz teste com o bancos superior a 40campos e o gasfw na linha do oLbx:justify so gera 14 gets diferente do gerado no array, oLbx:aJustify := { .T., .F., .F., .F., .F., .F., .F., .F., .F., .F., .F., .F., .F., .F., .F.} //-> Array dos Objetos aGets := ARRAY(40) oObjs := ARRAY(40) oSays := ARRAY(40) oBtns := ARRAY(12) Resolvido!!! J.Francisco - FWH27 xHarbour 099.71

Estou com esse erro ao mover o tbrowser ,qdo o numero de colunas chega acima do 13* coluna da esse error. Error BASE/1132 Bound error:array access from Errorsys,line:0 que erro é esse? J.Francisco - FWH27 xHarbour 099.71

Estou com esse erro ao mover o tbrowser ,qdo o numero de colunas chega acima do 13* coluna da esse error. Error BASE/1132 Bound error:array access from Errorsys,line:0 que erro é esse? J.Francisco - FWH27 xHarbour 099.71

kapiaba, Agora apresenta erro na abertura do banco DIRXB somente na verredura do xHarbour,Qdo selecionado individual blz.Na Varredura do fwh e bcc55 esta ok .Segue log. "obs"testado em 2 cpus. Application =========== Path and name: C:\gasfw\GASFW.EXE (32 bits) Size: 970,240 bytes Time from start: 0 hours 0 mins 36 secs Error occurred at: 27/01/2010, 10:09:27 Error description: (DOS Error 2) DBFCDX/1001 Erro de abertura: DIRXB.dbf Args: Stack Calls =========== Called from: => DBUSEAREA(0) Called from: FUNCOES.prg => VARRE_HD_XHARBOR(552) Called from: GASFW.prg => (b)CAMINHOS_PATH(897) Called from: .\source\function\MSGRUN.PRG => (b)MSGRUN(36) Called from: .\source\classes\DIALOG.PRG => (b)TDIALOG:TDIALOG(86) Called from: => TDIALOG:DISPLAY(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT(915) Called from: => DIALOGBOXINDIRECT(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(273) Called from: .\source\function\MSGRUN.PRG => MSGRUN(42) Called from: GASFW.prg => (b)CAMINHOS_PATH(897) Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK(176) Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT(1411) Called from: WINDOW.prg => _FWH(3351) Called from: => SENDMESSAGE(0) J.Francisco - FWH27 xHarbour 099.71

Kapiaba,Estou com sua vs2.10 e tem dado erro na hora de configurar o Path nunca vai de primeira.Os diretorios estão como sugere.Ate para localizar os caminhos da erro e desliga. Voltei para vs2.0 e não ocorre com frequencia.Segue log. Application =========== Path and name: C:\gasfw\GASFW.EXE (32 bits) Size: 2,937,344 bytes Time from start: 0 hours 0 mins 59 secs Error occurred at: 23/01/2010, 09:22:20 Error description: Error DBCMD/1011 Nome de alias duplicado: GAS Args: Stack Calls =========== Called from: => DBUSEAREA(0) Called from: GASFW.prg => GRAVAR_DIRETORIOS(1136) Called from: GASFW.prg => (b)CAMINHOS_PATH(930) Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK(176) Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT(1411) Called from: WINDOW.prg => _FWH(3351) Called from: => SENDMESSAGE(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND(407) Called from: => TWINDOW:HANDLEEVENT(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT(928) Called from: => DIALOGBOX(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(273) Called from: GASFW.prg => CAMINHOS_PATH(941) Called from: GASFW.prg => (b)GERADOR_FW(467) Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK(176) Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT(1411) Called from: WINDOW.prg => _FWH(3351) Called from: => SENDMESSAGE(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND(407) Called from: => TWINDOW:HANDLEEVENT(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT(928) Called from: => DIALOGBOX(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(273) Called from: GASFW.prg => GERADOR_FW(585) Called from: GASFW.prg => MAIN(95) System ====== CPU type: Intel® Pentium® 4 CPU 2.80GHz 2800 Mhz Hardware memory: 2031 megs Free System resources: 90 % GDI resources: 90 % User resources: 90 % Compiler version: xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 6406) Windows version: 5.1, Build 2600 Service Pack 3 J.Francisco - FWH27 xHarbour 099.71

Kapiaba,Estou com sua vs2.10 e tem dado erro na hora de configurar o Path nunca vai de primeira.Os diretorios estão como sugere.Ate para localizar os caminhos da erro e desliga. Voltei para vs2.0 e não ocorre com frequencia.Segue log. Application =========== Path and name: C:\gasfw\GASFW.EXE (32 bits) Size: 2,937,344 bytes Time from start: 0 hours 0 mins 59 secs Error occurred at: 23/01/2010, 09:22:20 Error description: Error DBCMD/1011 Nome de alias duplicado: GAS Args: Stack Calls =========== Called from: => DBUSEAREA(0) Called from: GASFW.prg => GRAVAR_DIRETORIOS(1136) Called from: GASFW.prg => (b)CAMINHOS_PATH(930) Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK(176) Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT(1411) Called from: WINDOW.prg => _FWH(3351) Called from: => SENDMESSAGE(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND(407) Called from: => TWINDOW:HANDLEEVENT(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT(928) Called from: => DIALOGBOX(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(273) Called from: GASFW.prg => CAMINHOS_PATH(941) Called from: GASFW.prg => (b)GERADOR_FW(467) Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK(176) Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT(1411) Called from: WINDOW.prg => _FWH(3351) Called from: => SENDMESSAGE(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND(407) Called from: => TWINDOW:HANDLEEVENT(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT(928) Called from: => DIALOGBOX(0) Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(273) Called from: GASFW.prg => GERADOR_FW(585) Called from: GASFW.prg => MAIN(95) System ====== CPU type: Intel® Pentium® 4 CPU 2.80GHz 2800 Mhz Hardware memory: 2031 megs Free System resources: 90 % GDI resources: 90 % User resources: 90 % Compiler version: xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 6406) Windows version: 5.1, Build 2600 Service Pack 3 J.Francisco - FWH27 xHarbour 099.71