APPEND FROM ... SDF

[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?

[Antonio Linares]

Paulo,

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

[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)

[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

[pauloperes]

Enviei para seu e-mail.

[Antonio Linares]

Paulo,

Añade el texto de esta forma:

Code: Select all

#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

[Antonio Linares]

El color del SAY funciona bien aqui. Estás usando temas de XP ?

[pauloperes]

Paulo,

Añade el texto de esta forma:

Code: Select all

#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

[pauloperes]

El color del SAY funciona bien aqui. Estás usando temas de XP ?

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.

[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

[pauloperes]

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?

[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

[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?

[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

[pauloperes]

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