Ir al contenido principal

Entradas

Mostrando las entradas de abril, 2005

Hoy hace 11 años

Hay una gran alegría en mi corazón y en la mañana de hoy. Las aves revolotean en el cielo lleno de esplendor. La brisa fresca está, como el rocío del amanecer. ¡Que alegría! A las vidas que ven el amanecer. ¿Qué sucedería ? ¿ Qué ha pasado ? ¿ Por qué tanta alegría ? ¿ Y esas hermosas melodías ? ¿ Nació alguien ? ¿ Quién nació ? ¿ Cómo se llama ? Es mi hija y cumple años hoy. Feliz seas mi amor porque tú naciste . Acompañada de la alegría de Dios. Gracias a Él eres un gran hija. Feliz cumpleaños hija mia. Te lo deseo de todo corazón.

Métodos y datas que no existen

¿Que pasa cuando tratamos de usar un método o una data que no tenemos declarada dentro una clase? Seguramente, la aplicación nos mostrará un hermoso mensaje de error y con él, la finalización nada elegante de nuestro desarrollo. Esto me sucedía de una forma frecuente cuando usaba la clase ToleAuto y algún componente que soporte OLE, como puede ser (Excel, Word, Access, etc, etc). Les voy a mostrar la manera en que resolví este fastidioso problema. Vamos a hacerlo con un ejemplo usando la clase Texcel. FUNCTION Test() oExcel := TExcelScript():New() oExcel:Visualizar(.T.) RETURN( Nil ) Este sencillo ejemplo no tiene ningún problema. Ahora vamos a forzar un error. FUNCTION Test() oExcel := TExcelScript():New() oExcel:Visualiza(.T.) RETURN( Nil ) ¿Ya lo notaron? , ¿Ya ubicaron el error? ¡¡¡ Efectivamente ¡!!! El método visualiza(.T.) no existe y obtendríamos un mensaje de error como este: -- Error description: Error BASE/1004 Message not found: TEXCELSCRIPT:VISUALIZA Para resolver esto, v

Excel y la clase TOleAuto

El día de hoy se publico en el foro de noticias de fivewin un mensaje que me llamó la atención. Hola Estoy utilizando TExcelScript y me veo en la necesidad de insertar saltos de página en la hoja de Excel. En la documentación de VBA me viene que hay que hacer: ActiveSheet.HPageBreaks.Add Before:=ActiveCell ¿Cómo se traduce esto a cristiano? Otra cosa. A veces veo en los métodos que se utiliza : ::oSheet:PageSetup:Set( "printarea" , cRange ) ó ::oCell := ::oExcel:Get( "ActiveCell") ¿Cúal es la convención de llamadas para usar Set o simplemente hacer " := cRange" Paco García Ok .... vamos por partes... ActiveSheet.HPageBreaks.Add Before:=ActiveCell ActiveSheet es una clase de Excel y nosotros la podemos manejar desde la clase TExcelScript con la Data oSheet que guarda el Objeto de la hoja de trabajo activa. oExcel:oSheet ActiveSheet. HPageBreaks .Add Before:=ActiveCell HPageBreaks es una propiedad de la clase ActiveSheet ( oExcel:oSheet ) , en donde noso

¡¡¡ Feliz Cumpleaños !!!

Hoy en tu cumpleaños ... Deseo que recibas ....... Felicidad, en lo profundo de tu ser. Serenidad, con cada amanecer. Exito, en cada respecto. Sinceridad, de amigos que te quieran. Amor, que sea eterno. Recuerdos entrañables, de momentos del ayer. Un presente esplendoroso repleto de bendiciones. Un sendero, que conduzca a un hermoso mañana. Anhelos, que se conviertan en realidad. Y reconocimientos, de todas las cosas maravillosas que hay en ti. ¡Que tengas un cumpleaños muy feliz! Amor eterno Podrá nublarse el sol eternamente; Podrá secarse en un instante el mar; Podrá romperse el eje de la tierra Como un débil cristal.¡todo sucederá! Podrá la muerte Cubrirme con su fúnebre crespón; Pero jamás en mí podrá apagarse La llama de tu amor. TE AMO............Vikthor