Entry without preview image

Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Aenean commodo ligula eget dolor. Aenean massa. Cum sociis natoque penatibus et magnis dis parturient montes, nascetur ridiculus mus. Donec quam felis, ultricies nec, pellentesque eu, pretium quis, sem.

  1. Nulla consequat massa quis enim.
  2. Donec pede justo, fringilla vel, aliquet nec, vulputate eget, arcu.
  3. In enim justo, rhoncus ut, imperdiet a, venenatis vitae, justo.

Nullam dictum felis eu pede mollis pretium. Integer tincidunt. Cras dapibus. Vivamus elementum semper nisi. Aenean vulputate eleifend tellus. Aenean leo ligula, porttitor eu, consequat vitae, eleifend ac, enim. Aliquam lorem ante, dapibus in, viverra quis, feugiat a, tellus.

Leer más

Cannot locate the Microsoft Visual FoxPro support library

VisualFox Pro ha sido uno de los lenguajes que nunca quise aprender, y sin embargo me sigo encontrando con aplicaciones desarrolladas en tal lenguaje.

El primer error con el que me encontré fue no poder correr dichas app, por falta de las DLL requeridas. No hubo oficialemnte un runtime pero existieron varios paquetes que cumplían con dicha opción.

Aquí algunos de ellos

Textos en Crystal Reports sin decimales y otros

Normalmente edito y creo reportes (en su mayoría) de Crystal Repots XI. Y muchas veces me demoró en la edición por cosas como estas. Por ello decidí abrir esta nueva sección…

 
 

Vamos al caso que nos compete en esta ocasión:

Quitar los decimales al usar las funciones cstr o totext

//Ejemplo con cstr con sintaxis Crystal 
NumberVar Numero := 200.555;
cstr(Numero, 0);
//End

//Ejemplo con toText con sintaxis Crystal
NumberVar Numero:= 200.555;
ToText(Numero, 0);
//End

 

 

Algunos Ejemplos de la función cstr (se aplican para la función totext)

Los siguientes ejemplos son aplicables tanto a sintaxis Basic como Crystal:

  • CStr ({Pedidos.Enviados})

Devuelve Verdadero cuando el valor en ({pedidos.ENVIADOS}) es verdadero.

  • CStr(123.45)

Devuelve “123,45”.

  • CStr(12345.6749,2)

Devuelve “12345,67”.

  • CStr(12345.6750,2)

Devuelve “12345,68”.

  • CStr(12345.4999,0)

Devuelve “12345”.

  • CStr(12345.5000,0)

Devuelve “12346”.

  • CStr({archivo.MONTO} * {archivo.CANTIDAD})

Devuelve “44,890.20” cuando Monto = 24.45 y Cantidad = 1836.

“El precio base del elemento # ” + {archivo.NÚMERO DE ELEMENTO} + ” es $” + CStr({archivo.PRECIO BASE}) + “.”

Imprime la oración “El precio base del elemento A1/4520/B12 es $50.00.” cuando el Número de Elemento es A1/4520/B12 y Precio Base es 50.00, convertido a texto y con formato de dos lugares decimales.

  • CStr(CDate(1996, 11, 1), “aa MMM dd, dddd”)

Devuelve “Viernes, 01 Nov 96”.

  • CStr(CDateTime(1995,10,12,3,30,11),”HH:mm, aa MMMM ddd”)

Devuelve “03:30, 95 octubre jue.”.

  • CStr(CTime(12, 10, 10), “HH*mm*ss tt”, “amStr”, “pmStr”)

Devuelve “12*10*10 pmStr”.