Search found 636 matches

by fgondi
Mon Apr 03, 2006 9:01 am
Forum: FiveWin para Harbour/xHarbour
Topic: EndPage en TPrinter
Replies: 6
Views: 1329

Hola, Sigo a vueltas con el error y no consigo localizarlo Alguno sabe porque se produce este error? Error BASE/1.004 Mensaje sin definir: ENDPAGE Argumentos: Llamadas al Stack _______________________________________________________________________________ Called from ENDPAGE(0) Called from PAGEEND(...
by fgondi
Tue Mar 28, 2006 4:20 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Ttime pick of fgondi
Replies: 8
Views: 2154

Hola Silvio,

Te he mandado por correo la clase ttmpick.prg

De todas formas Juan Carlos Salinas Ojeda ya conoce los cambios a realizar y lo modificará en la clase que tiene disponible para todos.
by fgondi
Tue Mar 28, 2006 12:08 am
Forum: FiveWin para Harbour/xHarbour
Topic: Ttime pick of fgondi
Replies: 8
Views: 2154

Hola Silvio,

The modifications affect only to the class ttimepick, although include's is worth for the two classes.
by fgondi
Mon Mar 27, 2006 11:14 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Ttime pick of fgondi
Replies: 8
Views: 2154

Hola silvio, Hay que hacer unas modificaciones en la clase ttimepick, así como en el ch correspondiente. En el ch: #define DTS_UPDOWN 1 // use UPDOWN instead of MONTHCAL #define DTS_SHOWNONE 2 // allow a NONE or checkbox selection #define DTS_SHORTDATEFORMAT 0 // use the short date format #define DT...
by fgondi
Mon Mar 27, 2006 3:04 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Ttime pick of fgondi
Replies: 8
Views: 2154

Hola Silvio,

Puedes mostrar algo del código en la definición de los get's?
by fgondi
Mon Mar 27, 2006 11:49 am
Forum: FiveWin para Harbour/xHarbour
Topic: EndPage en TPrinter
Replies: 6
Views: 1329

Hola Antonio,

Perdón, tienes toda la razón.

Me esta dando un error, de vez en cuando, porque no existe endpage y no logro localizarlo.

Seguiré buscando donde tengo el problema.
by fgondi
Mon Mar 27, 2006 8:47 am
Forum: FiveWin para Harbour/xHarbour
Topic: EndPage en TPrinter
Replies: 6
Views: 1329

EndPage en TPrinter

Hola foro, He encontrado el siguiente problema en la clase TPrinter. El método EndPage contiene lo siguiente: METHOD _EndPage() CLASS TPrinter if ::hDC = 0 return nil endif if ::lMeta if Len( ::aMeta ) == 0 MsgAlert( "The temporal metafile could not be created",; "Printer object Error...
by fgondi
Tue Mar 07, 2006 8:42 am
Forum: Bugs report & fixes / Informe de errores y arreglos
Topic: Cuidado con el cursor y el KeyDown
Replies: 1
Views: 1642

Hola

Muchas gracias por tu ayuda. Ese mismo problema lo tengo yo y llevaba un tiempo intentando dar con la solución.

Lo pruebo y ya te cuento.
by fgondi
Mon Mar 06, 2006 10:41 am
Forum: FiveWin para Harbour/xHarbour
Topic: problema con TExcel
Replies: 2
Views: 1029

problema con TExcel

Hola foro, Uso la clase tExcel del maestro Vikthor con harbour sin ningun problema. Pero hace un tiempo pase a xHarbour y empezaron los problemas, y eso que con xHarbour ya no necesito la clase Ole2. Si podeis probar el ejemplo "test1.prg" que viene con clase texcel y cuando pregunte por g...
by fgondi
Thu Mar 02, 2006 5:57 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Problema en FWH 27 build Marzo
Replies: 4
Views: 872

Hola

Muchas gracias, ahora funciona correctamente.

Lo que me queda la duda es si ocurrirá con alguna otra clase.
by fgondi
Thu Mar 02, 2006 5:30 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Problema en FWH 27 build Marzo
Replies: 4
Views: 872

Problema en FWH 27 build Marzo

Hola, Al ejecutar el programa con el build de marzo me da el siguiente error: Error description: Error BASE/1079 Argument error: .OR. Args: [ 1] = L .F. [ 2] = U Stack Calls =========== Called from: SAY.PRG => TSAY:SETTEXT ( 0 ) Called from: win32.prg => MAIN ( 38 ) Para probarlo lo único que hay qu...
by fgondi
Tue Feb 28, 2006 12:01 pm
Forum: FiveWin para Harbour/xHarbour
Topic: CHECKBOX EN TSBROWSE 7.1
Replies: 3
Views: 880

Hola Antonio, Puedes mandar el código de como defines la columna del checkbox. En la versión 7 cambia con respecto a las anteriores Por ejemlo: ADD COLUMN TO oBrw[ 4 ]; HEADER "Married" ; SIZE 25 PIXELS ; DATA FieldWblock( "Married", Select() ) ; COLORS CLR_BLACK,CLR_NBLUE ; 3DLO...
by fgondi
Tue Feb 28, 2006 11:48 am
Forum: FiveWin para Harbour/xHarbour
Topic: ayuda con tsbrowse
Replies: 5
Views: 1112

Hola Oscar, Yo haría lo siguiente: La última columna (la del total) la declararía de la siguiente forma: ADD COLUMN TO BROWSE oBrw Data sumatot(oBrw ) ; HEADER "Total" WIDTH 60 EDITABLE ; ALIGN DT_RIGHT ; MOVE DT_MOVE_DOWN ; COLORS CLR_WHITE,CLR_HGRAY Siendo SumaTot: func sumatot(oBrw ) lo...
by fgondi
Mon Feb 27, 2006 4:21 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ayuda con tsbrowse
Replies: 5
Views: 1112

Hola

Yo lo uso de la siguiente forma

Code: Select all

Add Column To Browse oBrw Data '' Size 11 PIXELS 
oBrw:hBmpCursor  := oBmp
Espero que te ayude
by fgondi
Tue Feb 14, 2006 4:28 pm
Forum: FiveWin para Harbour/xHarbour
Topic: TExcelScript y xHarbour
Replies: 2
Views: 984

Uso la última clase que modificaste. TRY ::oExcel := GetActiveObject( "Excel.Application" ) ::oClip:=TClipBoard():New() ::oClip:Clear() CATCH TRY ::oExcel := CreateObject( "Excel.Application" ) ::oClip:=TClipBoard():New() ::oClip:Clear() ... Si comento las líneas que llaman a Get...