Search found 4882 matches

by karinha
Wed Jan 27, 2021 2:24 pm
Forum: FiveWin for Harbour/xHarbour
Topic: CreateObject( "MSXML2.XMLHTTP" )
Replies: 33
Views: 51635

Re: CreateObject( "MSXML2.XMLHTTP" )

Funciona perfecto con HARBOUR para BCC74.

Aqui:

http://forums.fivetechsupport.com/viewt ... =3&t=39892

Regards, saludos.
by karinha
Wed Jan 27, 2021 1:27 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ¿Alguna funcion para enviar email desatendido xHarbour?
Replies: 24
Views: 9009

Re: ¿Alguna funcion para enviar email desatendido xHarbour?

asi hago yo, y salen automaticamente los emails //----------------------------------------------------------------------------------------------- Function GMAILBK (cDestino,cAsunto,cTexto,cAdjunto ) Local oEmailCfg,oEmailMsg,oError,cHtml Local cServer:= GetPvProfString("Enviador","SE...
by karinha
Wed Jan 27, 2021 1:24 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Estilo de botones de Windows 10
Replies: 13
Views: 3003

Re: Estilo de botones de Windows 10

Code: Select all

// Add this to your resources RC file

#ifdef __FLAT__
   1 24 "C:\FWH\SAMPLES\WINXP\WindowsXP.Manifest"
#endif

#ifdef __64__
   1 24 "C:\FWH\SAMPLES\WINXP\WindowsXP.Manifest64"
#endif

Grabe como: XPLOOK.RC

Para compilar:

%bcdir%\bin\BRC32.Exe -R XPLOOK.RC
 
Saludos.
by karinha
Wed Jan 27, 2021 1:12 am
Forum: FiveWin para Harbour/xHarbour
Topic: Error al usar cToolTip en un get
Replies: 2
Views: 481

Re: Error al usar cToolTip en un get

I love FiveWin the best!! // Testing GETs - \SAMPLES\ABURTO.PRG #include "FiveWin.ch" function Main()    LOCAL bPant, oGet, oGet2, oGet3, oOk, oSalida    LOCAL cCad := "Testing    "    LOCAL nNum := 0    LOCAL dDat := Date()    LOCAL xWS1 := SPACE(01)    LOCAL xWS2 := SPACE(01)  ...
by karinha
Tue Jan 26, 2021 3:15 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Cambiar el borde a un Get *SOLUCIONADO*
Replies: 22
Views: 3609

Re: Cambiar el borde a un Get

Cual és la FONT?

-1 -1, funciona perfecto con WorkShop.exe y el GET sin Border.

Saludos.
by karinha
Tue Jan 26, 2021 1:00 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Estilo de botones de Windows 10
Replies: 13
Views: 3003

Re: Estilo de botones de Windows 10

Ejemplo:

Image
by karinha
Tue Jan 26, 2021 12:58 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Estilo de botones de Windows 10
Replies: 13
Views: 3003

Re: Estilo de botones de Windows 10

LucaViotti wrote:Disculpa karinha, no se como insertar imagenes en el chat del foro. Si no te molesta indicarme como se hace te lo agradecería mucho. Gracias

https://imgur.com/?

Saludos.
by karinha
Tue Jan 26, 2021 12:17 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Estilo de botones de Windows 10
Replies: 13
Views: 3003

Re: Estilo de botones de Windows 10

Imagen?
by karinha
Sun Jan 24, 2021 11:06 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ¿Alguna funcion para enviar email desatendido xHarbour?
Replies: 24
Views: 9009

Re: ¿Alguna funcion para enviar email desatendido xHarbour?

Disculpa, me he explicado a medias. Threads te servirá para ejecutar el envío de los emails en segundo plano sin que se te pare la ejecución del programa hasta que el email se haya enviado. Otro tema es el envío de emails, para eso puedes mirar el ejemplo testpop3.prg Espero que con esto te sirva. ...
by karinha
Sun Jan 24, 2021 4:21 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Cambio color ribbon (SOLUCIONADO)
Replies: 3
Views: 1046

Re: Cambio color ribbon

/* Purpose  : Fivewin Ribbonbar - MS Office 2019 style Program  : Author   : Frances Padilla (FAP) Date     : 05/07/2019 04:52:26 PM Company  : Copyright: Language : Fivewin/xHarbour Updated  : 05/06/2019 By James Bott, jbott@compuserve.com Notes    : Source   : viewtopic.php?f=3&t=36145&p=...
by karinha
Sun Jan 24, 2021 3:35 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Cambiar el borde a un Get *SOLUCIONADO*
Replies: 22
Views: 3609

Re: Cambiar el borde a un Get

#Include 'FiveWin.Ch' #Define CLR_PINK       RGB( 255, 128, 128) FUNCTION Main()    Local oDlg, cTitle    Local oGet1    Local cVar1 := Space( 100 )    Local oGet2    Local cVar2 := Space( 100 )    cTitle := OemToAnsi( "FIVEWIN: GET CON BORDES RED COLOR Y PAINT" )    DEFINE DIALOG oDlg Re...
by karinha
Thu Jan 21, 2021 2:15 pm
Forum: FiveWin for Harbour/xHarbour
Topic: CreateObject( "MSXML2.XMLHTTP" )
Replies: 33
Views: 51635

Re: CreateObject( "MSXML2.XMLHTTP" )

// \SAMPLES\NAGES2.PRG #include "FiveWin.ch" #define cUrl                  "http://www.w3schools.com/angular/customers.php" FUNCTION Main()    LOCAL cHtml, oServer, cStringCookie    #ifdef __XHARBOUR__  // xHarbour       Try          oServer := CreateObject( "MSXML2.ServerX...
by karinha
Thu Jan 21, 2021 1:48 pm
Forum: FiveWin for Harbour/xHarbour
Topic: CreateObject( "MSXML2.XMLHTTP" )
Replies: 33
Views: 51635

Re: CreateObject( "MSXML2.XMLHTTP" )

Silvio:
with payment I not have money

Silvio, you don't fool me. I know you are very rich. hahahahahahaha.

Regards.
by karinha
Thu Jan 21, 2021 11:08 am
Forum: FiveWin for Harbour/xHarbour
Topic: CreateObject( "MSXML2.XMLHTTP" )
Replies: 33
Views: 51635

Re: CreateObject( "MSXML2.XMLHTTP" )

Compile con: -w3 -es2 Mira tu Windows 7 64 bits, se está asi: c:\Windows\System32\msxml3.dll c:\Windows\System32\msxml3r.dll c:\Windows\System32\msxml6.dll c:\Windows\System32\msxml6r.dll c:\Windows\SysWOW64\msxml3.dll c:\Windows\SysWOW64\msxml3r.dll c:\Windows\SysWOW64\msxml6.dll c:\Windows\SysWOW6...