Search found 271 matches

by Vikthor
Thu May 18, 2006 2:51 am
Forum: FiveWin para Harbour/xHarbour
Topic: Preguntonta sobre ruta?
Replies: 8
Views: 2105

Leandro :

Puedes usar lo siguiente :

cOrigen := cFilePath( GetModuleFileName( GetInstance() ))

Donde cOrigen te devolverá la ruta exacta donde está tu aplicación
by Vikthor
Thu May 18, 2006 2:48 am
Forum: FiveWin para Harbour/xHarbour
Topic: Se esta volviendo viejo el foro?
Replies: 81
Views: 27174

Rodolfo :

Hola soy Vikthor, tengo 32 años, llevo 6 años programando con FiveWin
by Vikthor
Wed Apr 19, 2006 9:21 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Problema con ajuste en pixels de controles
Replies: 10
Views: 2150

Un problema similar tenía yo con todos los controles al crearlos desde código, resultaba que no siempre la coordenada : @ 10 , 10 , era la misma para todos los controles. Y había que ajustarlos a mano limpia. Así que le hice una pequeñisma modificación a la clase TDialog y ahora ya puedo pintar todo...
by Vikthor
Mon Apr 10, 2006 7:45 pm
Forum: FiveWin para Harbour/xHarbour
Topic: OT: ¿Qué le pertenece a la empresa?. EXE, Fuentes, FiveWin.
Replies: 5
Views: 1139

Me solidarizo con la petición de Juan Carlos .... ¡¡¡¡ presenta a las modelos !!!!
by Vikthor
Mon Apr 10, 2006 7:43 pm
Forum: FiveWin para Harbour/xHarbour
Topic: FileXLS e TWord for xHarbour
Replies: 9
Views: 3516

Aqui puedes encontrar mucho ejemplos:

http://vikthor.com.mx/download/excel/
by Vikthor
Mon Apr 10, 2006 12:49 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Horas y no se deja...
Replies: 3
Views: 934

Mi estimado Fer : Te puedes ahorrar muchos tiempo si revisas el código fuente de la clase TExcel : /* * Metodos para las propiedades de la hoja */ METHOD AddSheet() INLINE ::oExcel:Sheets:Add() METHOD CopySheet() INLINE ::oExcel:Sheets:Copy() METHOD DelSheet(cSheet) INLINE ::oExcel:Sheets(cSheet):De...
by Vikthor
Wed Apr 05, 2006 4:48 am
Forum: FiveWin para Harbour/xHarbour
Topic: Fórmulas con la clase TExcels
Replies: 3
Views: 867

Aquí te dejo el método : METHOD Formula( nRow , nCol , cValue ) CLASS TExcelScript // [ Vikthor ] #IFDEF __XHARBOUR__ TRY ::oSheet:Cells( nRow , nCol ):FormulaLocal:=cValue CATCH MsgStop( "La formula no es correcta "+cValue , "Aviso al usuario") END #ELSE ::oSheet:Cells( nRow , n...
by Vikthor
Wed Apr 05, 2006 4:47 am
Forum: FiveWin para Harbour/xHarbour
Topic: Fórmulas con la clase TExcels
Replies: 3
Views: 867

Si , claro que sí.


La clase TExcel tiene un metodo que se llama así Formula y puedes incluir cualquier formula en tu hoja de Excel, y además respetando la configuración local de tu PC.
by Vikthor
Fri Feb 17, 2006 3:28 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ¿se puede DBF -> XML?
Replies: 6
Views: 1433

Vicente :

Puedes hacer lo siguiente:

Abrir la tabla con Excel usando Ole y despues salvar el archivo como xml....y ¡¡ listo el pollo !!


Yo lo hago usando la clase TExcelS.
by Vikthor
Thu Feb 16, 2006 3:30 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Ventanas Transparentes
Replies: 13
Views: 4824

Efectivamente, en Win98 se obtiene ese error, y se debe al API de Windows.

La forma de solucionarlo es revisando el SO instalado en la PC y dependiendo del SO activar la propiedad de la transparencia.
by Vikthor
Thu Feb 16, 2006 2:38 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Ventanas Transparentes
Replies: 13
Views: 4824

Richard :

TSradio isn't native control , right ?

Please send me that class at my email.

Regards.
by Vikthor
Tue Feb 14, 2006 3:13 pm
Forum: FiveWin para Harbour/xHarbour
Topic: TExcelScript y xHarbour
Replies: 2
Views: 978

fgondi :

La última clase que modifique, verifica si existe una instancia de Excel abierta para tomarla y trabajar con ella, revisa el código fuente del método Open(), ahí es dónde se hace esa revisión.
by Vikthor
Wed Jan 25, 2006 3:04 pm
Forum: FiveWin para Harbour/xHarbour
Topic: XMate
Replies: 2
Views: 870

by Vikthor
Fri Jan 20, 2006 9:27 pm
Forum: FiveWin para Harbour/xHarbour
Topic: clase texcels
Replies: 8
Views: 2931

El método debe estar de esta forma METHOD NEW() CLASS TExcelScript ::lExcel := .T. #IFDEF __XHARBOUR__ TRY ::oExcel := GetActiveObject( "Excel.Application" ) CATCH TRY ::oExcel := CreateObject( "Excel.Application" ) CATCH Alert( "No está Excel Instalado en está Pc." ) :...
by Vikthor
Fri Jan 20, 2006 6:35 pm
Forum: FiveWin para Harbour/xHarbour
Topic: clase texcels
Replies: 8
Views: 2931

Entonces quita del método new las llamadas TRY, CATCH y solo deja la función TOLeAuto()