Hola no se que hago mal pero no consigo imprimir este carácter de la base de datos. He creado un campo en mi bases de datos que es tipo de dieta. Y he añadodo los registros DIETA 9€, DIETA 12€ y DIETA 15€. Cuando voy a ver la base de datos con un visor (DBF manager) en vez de la € hay DIETA 9Ç, DIETA 12Ç y DIETA 15Ç. En mi programa en el browse aparece correctamente con la linea:
El OEM me lo muestra correcto en el browse. Pero cuando quiero tratarlo para introducirlo en un documento de texto plano (txt), no me funcionan las transformaciones.
Si lo dejo sin transformar : alltrim(DIETA) me presenta DIETA 9?, si lo tranformo ANSI: OEMTOANSI(alltrim(DIETA)) me pone DIETA 9Ç, si lo tranformo OEM: ANSITOOEM(alltrim(DIETA)) me pone DIETA 9_ . Como puñetas puedo sacar el simbolo del €
//Añado una columna por cada campo de la base de datos
for nPos := 1 to Len(f_expd) // Array con NOMBRE DE CAMPOS
ADD COLUMN TO BROWSE oBrw; //
HEADER f_nomd[nPos] OEM; // Array con TITULOS DE LAS COLUMNAS
DATA FieldWBlock( f_expd[nPos] , Select()) // Aca se genera el CodeBlock para el CAMPO
nextEl OEM me lo muestra correcto en el browse. Pero cuando quiero tratarlo para introducirlo en un documento de texto plano (txt), no me funcionan las transformaciones.
Si lo dejo sin transformar : alltrim(DIETA) me presenta DIETA 9?, si lo tranformo ANSI: OEMTOANSI(alltrim(DIETA)) me pone DIETA 9Ç, si lo tranformo OEM: ANSITOOEM(alltrim(DIETA)) me pone DIETA 9_ . Como puñetas puedo sacar el simbolo del €
Saludos
Andrés González desde Mallorca
Andrés González desde Mallorca