Xailer forum

XeviCOMAS

Como no puedo postear en el Foro Pro... Daniel, mira la ayuda de Xailer TEdit:SetSel Selecciona un rango de texto del control. Los valores indicados son de raiz cero, es decir, la primera posición comienza por cero y no por uno como es habitual Tipo Sólo después de Create() Parámetros <nStart>: Prim...

XeviCOMAS

Por lo que he podido probar, un DataSet MariaDB no funciona correctamente cuando se requiere hacer una búsqueda de u campo 'vacio' así pues... :Locate( "MICAMPO = 'nose'" ) //Se posiciona en el registro que corresponde logdebug( :id ) :Locate( "MICAMPO = ''" ) //Devuelve la posic...

XeviCOMAS

Para el tema de que no me imprimía en apaisado... he puesto nOrientation después del Printer:StartDocPdf() y ya imprime en apaisado. Me ocurria en alguna máquina... pero queda solucionado de esta manera.

Sin embargo, el error me lo sigue lanzando en un Server2012 ¿?¿?

XeviCOMAS

Con este código METHOD Button1Click( oSender ) CLASS TForm1 Printer:lPreview := .F. Printer:nOrientation := DMORIENT_LANDSCAPE Printer:StartDocPdf( "C:\MiCarpeta\FilePDF.Pdf", "FilePDF" ) Printer:oCanvas:nMapMode := mmHIMETRICS Printer:oCanvas:TextOut( 1820, 1920, "Prueba PD...

XeviCOMAS

Exacto, Se me vino a la mente esta noche esa solución. Puesta e implementada perfectamente!!! miDataSet:AddCalcField( "BASE1", {|| If( miDataSet:TOTAL = Nil, 0, miDataSet:TOTAL - miDataSet:DTO ) } ) Es como si se creara un registro "fantasma" por unos instantes, al eliminar un re...

XeviCOMAS

Me està ocurriendo un error, y no veo como poder salvarlo... Bien, en DBFs, me está funcionando correctamente, el tema va por MariaDB Dispongo de un TDBBrowse y una de las columnas pertenece a un campo calculado Además, el TDataSet dispone de más campos calculados, como por ejemplo... miDataSet:AddC...

XeviCOMAS

Gracias, Claudio.

Lo he podido hacer de esta forma...

SELECT * FROM factures WHERE BINARY b LIKE CONCAT('%',UPPER(b),'%')

XeviCOMAS

En una consulta a una tabla... cómo puedo hacer un Where que me "filtre" y me devuelva los datos de la tabla que SOLO tiene un campo concreto en mayúsculas??? SELECT * FROM mitabla WHERE micampo = UPPER( micampo ) SELECT * FROM mitabla WHERE UPPER( micampo ) Esto no me está funcionando... ...

XeviCOMAS

::oDSTable:Sort( "xCIFreal(dni)" )

Llamando a mi función, ordena el Browse a gusto!!!

XeviCOMAS

Una cosa que me faltaria... Para ordenar "temporalmente" un TDataset MariaDB me funciona de lujo... ::oDSTable:Sort( "REGEXP_REPLACE( Upper(dni), '[^0-9,A-Z]', '' )" ) Pero, para un TDBFDataset... cómo sería una función que quitara todos los caracteres que no se corresponden a 0-...

XeviCOMAS

Echo!!!

Fijándome en lo que hace la funcion REGEXP_REPLACE( dni, '[^0-9,A-Z]', '' )

Añado un Upper...
REGEXP_REPLACE( Upper(dni), '[^0-9,A-Z]', '' )

Y listo el pollo, que dirian!!!

GRACIAS!!!

XeviCOMAS

Ahora me he fijado bien... no "discrimina" letras may/minusculas.

No me sirve 100%

Con mi funcioncilla, si que devuelvo orden discriminando donde B es lo mismo que b

XeviCOMAS

Gracias, José.

Esto va perfectíssimo!!!

Ahora bien, para poder profundizar en alguna función propia en SQL,...
Cómo haria esa funcióncilla que he puesto, en un bucle???
Es por ir entendiendo y desarrollando más en SQL.

Gracias por vuestro tiempo.

XeviCOMAS

Cada cosa que toco, SQL me sorprende más y más!!! BEGIN SET @cNifReal = ''; SET @cLectura = Upper(SUBSTRING(rtf,1,1)); IF InStr( 'ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789', @cLectura ) THEN SET @cNifReal = CONCAT( @cNifReal, @cLectura ); END IF; SET @cLectura = Upper(SUBSTRING(rtf,2,1)); IF InStr( 'ABCD...

XeviCOMAS

Ignacio, gracias por el apunte. de esta manera, consigo ordenar correctamente el TDBBrowse que tiene asignado un TDataSet ::oDSTable:Sort( "REGEXP_REPLACE( REGEXP_REPLACE( dni, '-', '' ), '/', '' )" ) pero claro, hay una lista muy extensa de caracteres que deberia ir "anidando" e...

XeviCOMAS

Necesito ordenar un Dataset por un campo, pero "limpio"... me explico. Resulta que los NIF/CIF cada uno los va entrando a su gusto. Alguien me los entra LetraGuionNumeros Otros LetraBarraNumeros O incluso NumerosPuntosNumerosGuionLetra Pues necesito Ordenar ese campo quitando puntos, guion...

XeviCOMAS

Al final, como lo necesito si o si "orden natural", por compatibilidad con otras funciones que utilizo... aItems := :QueryArray( "SELECT cod,descripcion FROM miBBDD.miTabla;" ) HB_AIns( aItems, 6, { 132, 'Josefa' }, .T. ) For n:=1 TO Len(aItems) cValues += IF( n>1, ",",...

XeviCOMAS

Gracias José, De la manera que propones, el registro 6 Josefa se añadirà al final de la Tabla, con el id 12... no??? No es así... yo quiero que el id 12 tome los datos del registro del id 11, los del 11 los tome del 10... i así hasta el 6 Y el id 6 hago el UPDATE con los datos del registro 132 Josef...

XeviCOMAS

Me estoy peleando en como hacer para insertar un registro en medio de una tabla. Suponiendo que tengo una tabla con 11 registros id cod descripcion 1 110 Pepe 2 111 Pepa 3 121 Juan 4 122 Juana 5 131 Jose 6 141 Emilio 7 142 Emilia 8 151 Fernando 9 152 Fernanda 10 161 Mario 11 162 Maria Bien, EN ORDEN...

XeviCOMAS

Ya pregunte hace un tiempo sobre guardar la imagen, pero el tema es "casi" lo mismo, pero no lo mismo... Resulta que estoy trabajando con TBarCode, y necesito guardar la imagen del código de barras. WITH OBJECT oBarCod := TBarcode():Create( oForm ) :nType := zbCODE128 :cText := "19001...

XeviCOMAS

Gabo,

intenta averiguar en que parte de tu código se queda "congelada" tu aplicación.
Luego, revisa el código... igual tienes un bucle que se hace interminable. En alguna ocasión, puede suceder.
Un For...Next, While...End

Revisa código, y pon stops/alertas de donde llega tu código.

XeviCOMAS

Esto es así???
El funcionamiento es normal???

De momento lo soluciono hechando mano del OnExit

XeviCOMAS

Hugo, Como te ha dicho el compañero Claudio, pues yo en el mismo sentido te respondo. Hace poco más de un año que me dio por cambiar (mas que cambiar, hacer la aplicación dual DBFs/MariaDBs)... en este período, ningún problema que no sea mio, de mi no saber como hacer con MariaDB, pero problema NING...

XeviCOMAS

De la ayuda,... Este evento se produce cuando se finaliza la edición de la columna y permite bien modificar los valores de <Value> y <lCanceled> ya que son pasados por referencia o realizar directamente la operación de salvado de datos. La primera opción sólo tiene sentido si la propiedad lAutoSave ...

XeviCOMAS

Estupendo !!!

Estava viendo que algunos controles en Xailer 6 Beta, ya llevan la propiedad nOpacity, lo he probado... y es un lujazo!!!

Gracias por vuestro tiempo.

Se encontraron 536 coincidencias

Mover cursor en TEdit

Locate en un DataSet MariaDB

Re: Error Printer Pdf

Error Printer Pdf

Re: Errores en campos calculados

Errores en campos calculados

Re: Como hacer un Where Upper()

Como hacer un Where Upper()

Re: Ordenar Dataset

Re: Ordenar Dataset

Re: Ordenar Dataset

Re: Ordenar Dataset

Re: Ordenar Dataset

Re: Ordenar Dataset

Re: Ordenar Dataset

Ordenar Dataset

Re: Añadir un registro

Re: Añadir un registro

Añadir un registro

TBarCode guardar imagen

Re: Mi aplicacion se "suspende.."

Re: TBrwColumn:OnPostEdit

Re: Xailer plagado de un monton de errores con MariaDB

TBrwColumn:OnPostEdit

Re: TRichEdit Transparente