Search found 420 matches

by noe aburto
Sat Sep 26, 2020 4:01 am
Forum: FiveWin para Harbour/xHarbour
Topic: Como incluir una foto en el foro?
Replies: 3
Views: 426

Como incluir una foto en el foro?

Aunque ya segui un consejo y no me funciono.

Que tengo que hacer para incluir en una nuevo tema del foro, una foto que quiero presentar en mi pregunta?

Gracias.
by noe aburto
Sat Sep 26, 2020 2:48 am
Forum: FiveWin para Harbour/xHarbour
Topic: Como abrir el excel automatico con tsbrowse?
Replies: 3
Views: 456

Como abrir el excel automatico con tsbrowse?

Saludos. Cuando abro una ventana usando tsbrowse, agregue un botón para generar un archivo de excel usando la misma clase. ExcelOle( cXlsFile, lActivate, oMeter, cTitle, oFont, lSave, bExtern ) // --- Impresion del contenido de un browse static function ImprimeVent(aVent,lExcel) local oFont,nReg if ...
by noe aburto
Fri Sep 18, 2020 12:07 am
Forum: FiveWin para Harbour/xHarbour
Topic: Configurar GMail para poder enviar con CDOSYS
Replies: 4
Views: 445

Re: Configurar GMail para poder enviar con CDOSYS

Gracias karinha... con esa habilitaci{on quedo listo.
by noe aburto
Thu Sep 17, 2020 10:35 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Configurar GMail para poder enviar con CDOSYS
Replies: 4
Views: 445

Re: Configurar GMail para poder enviar con CDOSYS

perdon:

cMailServer := "smtp.gmail.com"
by noe aburto
Thu Sep 17, 2020 10:32 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Configurar GMail para poder enviar con CDOSYS
Replies: 4
Views: 445

Re: Configurar GMail para poder enviar con CDOSYS

codigo principal Try      oCfg := CreateObject( "CDO.Configuration" )       With Object oCfg:Fields          :Item( cdoSMTPServer ):Value            := AllTrim( cMailServer ) // www.gmail.com            :Item( cdoSMTPServerPort ):Value        := 465          :Item( cdoSendUsing ):Value    ...
by noe aburto
Thu Sep 17, 2020 10:22 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Configurar GMail para poder enviar con CDOSYS
Replies: 4
Views: 445

Configurar GMail para poder enviar con CDOSYS

Saludos Recuerdo haber realizado una configuracion en gmail para poder enviar correos con cdosys. Ahora con estas versiones me marca errores que he visto en el foro. Pero no lo resuelvo.... Envoi Message Impossible Errour 1 SubC 1006 OS Code -2147352573 Subsystem WINOLE Message Argument error Sugere...
by noe aburto
Tue Sep 08, 2020 8:58 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Nuevos controles para FWH
Replies: 67
Views: 22643

Re: Nuevos controles para FWH

Saludos. En cuanto al uso sel say + get, implemente esto: /*----------------------------------------------------------------------------// !short: SAY Y GET */ #xcommand @ <nRow>, <nCol> SAY [ <oSay> <label: PROMPT SAY,VAR SAY > ] <cText> GET [ <oGet> VAR ] <uVar> ;              [ <pictsay: PICT SAY...
by noe aburto
Tue Sep 08, 2020 3:33 am
Forum: FiveWin para Harbour/xHarbour
Topic: TsBrowse despliega el ::nRowPos al Refresh()
Replies: 2
Views: 381

TsBrowse despliega el ::nRowPos al Refresh()

Saludos. Con un detalle del tsbrowse Con estas versiones actuales, no logro identificar donde esta el detalle... al hacer un redespliegue de tsbrowse: oBrw:GoTop() oBrw:Reset() me despliega el renglón actual el tsbrowse en mi ventana principal Tengo un dialogo que despliega un sbrowse y no entiendo ...
by noe aburto
Sat Aug 29, 2020 7:26 pm
Forum: FiveWin para Harbour/xHarbour
Topic: No incluye los BITMAPS como RC en las app
Replies: 1
Views: 250

No incluye los BITMAPS como RC en las app

Saludos. Desde que estoy compilando con Harbour 3.2, Fwh 20.06, bcc 7.4 si me compila los archivos RC incluidos en la app, pero en la app funcionando no los despliega. Este es un RC de ejemplo Refaccio.rc go0           bitmap "\funpar\bitmaps\go0.bmp" goacept1      bitmap "\funpar\bit...
by noe aburto
Thu Aug 27, 2020 8:09 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Al compiliar sbrowse TSBFUNCS.C me marca errores
Replies: 1
Views: 258

Re: Al compiliar sbrowse TSBFUNCS.C me marca errores

Gracias, asunto arreglado.

Solo cambie las funciones

__parni > hb_parni
__reta > hb_reta
__storni > hb_srtovni
by noe aburto
Thu Aug 27, 2020 6:26 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Al compiliar sbrowse TSBFUNCS.C me marca errores
Replies: 1
Views: 258

Al compiliar sbrowse TSBFUNCS.C me marca errores

En contacto. Compilando la libreria de tsbrwose 9.0 me marca TSBFUNCS.C los errores siguientes: harbour 3.2 //---------------------------------------------------------------------------// #ifndef __HARBOUR__ CLIPPER aTSBrwPosR() // ect( hWnd, nRow, nCol, nWidth, hFont, nHeightCell, // nHeightHead, n...
by noe aburto
Wed Aug 26, 2020 4:44 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Compilando tsbrowse.lib, tsbutton.lib con Harbour 3.2
Replies: 1
Views: 255

Compilando tsbrowse.lib, tsbutton.lib con Harbour 3.2

Hola, alguien ha logrado compilar las libs de tsbrowse 9.0 y tsbutton 7.0 con Hrbour 3.2 al compilar me errores en los archivos de C incluidos: Tsbrowse Embarcadero C++ 7.40 for Win32 Copyright (c) 1993-2018 Embarcadero Technologies, Inc. \tsbrowse\source\function\TSBFUNCS.C: Error E2238 \Harbour\in...
by noe aburto
Wed Aug 26, 2020 4:34 pm
Forum: FiveWin para Harbour/xHarbour
Topic: TsBrowse(320) Warning W0001 Ambiguous reference 'SUPER'
Replies: 4
Views: 613

Re: TsBrowse(320) Warning W0001 Ambiguous reference 'SUPER'

Gracias.

Con este cambio ya no marco ese Warning.
by noe aburto
Wed Aug 26, 2020 12:48 am
Forum: FiveWin para Harbour/xHarbour
Topic: TsBrowse(320) Warning W0001 Ambiguous reference 'SUPER'
Replies: 4
Views: 613

Re: TsBrowse(320) Warning W0001 Ambiguous reference 'SUPER'

En los include esta asi: #include "Fivewin.ch" #include "TSBrowse.ch" #ifdef __XPP__ #define Super ::TControl #define New _New #xtranslate _DbSkipper => DbSkipper #EndIf #ifdef __HARBOUR__ #xtranslate _DbSkipper => DbSkipper #ifdef __HBOLE__ #define __OLE__ #EndIf EXTERN OrdKeyNo...
by noe aburto
Wed Aug 26, 2020 12:43 am
Forum: FiveWin para Harbour/xHarbour
Topic: TsBrowse(320) Warning W0001 Ambiguous reference 'SUPER'
Replies: 4
Views: 613

TsBrowse(320) Warning W0001 Ambiguous reference 'SUPER'

Una molestia más:

Al crear la lib tsbrowse, me carca error con Harbour 3.2, y con la version Harbour 3.0 no lo hace

TsBrowse(320) Warning W0001 Ambiguous reference 'SUPER'

la linea es:

METHOD BeginPaint() INLINE If( ::lRepaint, Super:BeginPaint(), 0 )

Ayuda.