Page 1 of 2

APPEND FROM ... SDF

PostPosted: Fri Jun 08, 2007 7:58 pm
by pauloperes
Atualizei minhas versão tanto do Fivewin quanto Xharbour para FHW7.05 e Xharb99.71 e me deparei com dois problemas até o momento:

1- @ 0.35,8.5 SAY " " RAISED BOX COLOR CLR_BLACK,CLR_WHITE SIZE 95,50 OF oDlg
Versões anteriores fazia um box de linha preta e findo branco, agora fax somente o box com a linha preta e não aceito o fundo que defino não importa a cor

2- Dou um APPEND FROM TEXTO.TXT SDF e não funciona nesta nova versão

O que posso fazer?

PostPosted: Fri Jun 08, 2007 11:39 pm
by Antonio Linares
Paulo,

Estas usando este xharbour ?
www.fivetechsoft.com/files/xharbour.exe

PostPosted: Fri Jun 08, 2007 11:56 pm
by pauloperes
Sim estou usando esse versão, baixei novamente para ter certeza.
Mas continua sem funcionar o APPEND FROM TEXTO.TXT SDF e as cores do SAY.
Estou usando FWH7.05 + Xharbour 0.99.71 (simplex)

PostPosted: Sat Jun 09, 2007 9:45 am
by Antonio Linares
Paulo,

> APPEND FROM TEXTO.TXT SDF

Por favor envíame por email en un fichero ZIP incluyendo Texto.txt y la DBF en donde vas a añadirlo

Vamos a revisar el tema de los colores que nos comentas

PostPosted: Sat Jun 09, 2007 3:36 pm
by pauloperes
Enviei para seu e-mail.

PostPosted: Sat Jun 09, 2007 6:26 pm
by Antonio Linares
Paulo,

Añade el texto de esta forma:
Code: Select all  Expand view
#include "FiveWin.ch"

function Main()

   local cText := MemoRead( "texto.txt" ), n

   DBCREATE( "NOTICW.DBF", {{ "LINHA","C",255,0 }} )

   USE NOTICW.DBF

   for n = 1 to MLCount( cText )
      APPEND BLANK
      field->Linha := MemoLine( cText,, n )
   next   

   GO TOP
   Browse()

return nil

PostPosted: Sat Jun 09, 2007 6:34 pm
by Antonio Linares
El color del SAY funciona bien aqui. Estás usando temas de XP ?
Image

PostPosted: Sat Jun 09, 2007 8:45 pm
by pauloperes
Antonio Linares wrote:Paulo,

Añade el texto de esta forma:
Code: Select all  Expand view
#include "FiveWin.ch"

function Main()

   local cText := MemoRead( "texto.txt" ), n

   DBCREATE( "NOTICW.DBF", {{ "LINHA","C",255,0 }} )

   USE NOTICW.DBF

   for n = 1 to MLCount( cText )
      APPEND BLANK
      field->Linha := MemoLine( cText,, n )
   next   

   GO TOP
   Browse()

return nil


Funcionou, mas não é igual a Função APPEND FROM TEXTO.TXT SDF, o arquivo gerado pela Função acima gerou um DBF diferente do DBF do APPEND FROM SDF.
Preciso que seja igual a APPEND FROM SDF

PostPosted: Sat Jun 09, 2007 8:50 pm
by pauloperes
Antonio Linares wrote:El color del SAY funciona bien aqui. Estás usando temas de XP ?
Image

Sim uso tema do WINDOWS num arquivo .manifest, tirei o arquivo .manifest e funcionou corretamente.
Porém em versões anteriores ele funcionava independente do arquivo .Manisfest.

PostPosted: Sun Jun 10, 2007 12:06 am
by Antonio Linares
Paulo,

> Preciso que seja igual a APPEND FROM SDF

Es un comportamiento propio de xharbour que tendrás que reportar en el foro de xharbour, gracias

PostPosted: Sun Jun 10, 2007 12:02 pm
by pauloperes
Antonio Linares wrote:Paulo,

> Preciso que seja igual a APPEND FROM SDF

Es un comportamiento propio de xharbour que tendrás que reportar en el foro de xharbour, gracias


O que fazer neste caso, eu uso a versão FWH7.05, qual outro build do xHarbour posso utilizar e como recomplicar as LIBs do FWH?

PostPosted: Sun Jun 10, 2007 12:07 pm
by Antonio Linares
Paulo,

La mejor solución es que comentes el problema en comp.lang.xharbour (puedes registrarte y escribir en él desde Google, groups). Seguramente lo arreglaran en sólo unos dias

PostPosted: Sun Jun 10, 2007 10:39 pm
by pauloperes
Como conseguir outro build compativel com a versão 7.05 para fazer testes, a versão do xHarbour 99.70 é compativel? Onde consegui-la?

PostPosted: Sun Jun 10, 2007 11:15 pm
by Antonio Linares
Paulo,

El pcode de otras versiones de xharbour no es compatible con FWH 7.05. Lo más fácil es que pidas ayuda en comp.lang.xharbour

Otra solución sería reconstruir FiveHX.lib con el build de xharbour que te funciona bien con el APPEND FROM ... SDF

PostPosted: Sun Jun 10, 2007 11:37 pm
by pauloperes
Antonio Linares wrote:Paulo,

El pcode de otras versiones de xharbour no es compatible con FWH 7.05. Lo más fácil es que pidas ayuda en comp.lang.xharbour

Otra solución sería reconstruir FiveHX.lib con el build de xharbour que te funciona bien con el APPEND FROM ... SDF


Como fazer para reconstruir a FiveHx.Lib? pretento testar com o build 99.70