Aqui tienes el ejemplo completo:
antolin.prg
#include "FiveWin.ch"function Main() local nOtro := 123 local cOtro := "Hello" MsgInfo( Test( { | x, y | MiFuncion( x, y, nOtro, cOtro ) }, "Primer parámetro", "segundo parámetro" ) ...
Search found 134 matches: antolin
Searched query: antolin
- Sat Apr 23, 2022 6:15 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Ejecutar un CODEBLOCK en C++
- Replies: 5
- Views: 574
- Mon Sep 06, 2021 5:04 am
- Forum: FiveWin para Harbour/xHarbour
- Topic: ExtCreatePen
- Replies: 10
- Views: 1991
Re: ExtCreatePen
Antolin,
> Estoy intentando implemantarlo en C++, pero tengo problemas con la estructura LOGBRUSH
Copia aqui lo que tengas hecho en C/C++ y te ayudamos a completarlo
> Estoy intentando implemantarlo en C++, pero tengo problemas con la estructura LOGBRUSH
Copia aqui lo que tengas hecho en C/C++ y te ayudamos a completarlo

- Wed Sep 30, 2020 6:05 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Problema Acentos
- Replies: 7
- Views: 1184
Re: Problema Acentos
Antolin:
Yo utilizo esto.
Saludos.
Jose
Yo utilizo esto.
Code: Select all | Expand
REQUEST HB_Lang_ES
REQUEST HB_CODEPAGE_ESMWIN
hb_langSelect( "ES" )
hb_cdpSelect( "ESMWIN" )
FWSetLanguage( 2 ) // 1 English, 2 Spanish
Saludos.
Jose
- Tue Apr 12, 2016 5:26 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: New Class : TSayjustified
- Replies: 4
- Views: 1338
Re: New Class : TSayjustified
New release - I found update functions of Antolin on this forum
I change also the Look ( Antolin simulated a Page )
IN THIS RELEASE there is a new data
DATA nCuantos AS NUMERIC INIT 30
this data set the number of the rows to show I set the number init to 30
#include "FiveWin.ch"#include ...
I change also the Look ( Antolin simulated a Page )
IN THIS RELEASE there is a new data
DATA nCuantos AS NUMERIC INIT 30
this data set the number of the rows to show I set the number init to 30
#include "FiveWin.ch"#include ...
- Tue Apr 12, 2016 9:18 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: New Class : TSayjustified
- Replies: 4
- Views: 1338
Re: New Class : TSayjustified
Antonio Linares wrote:Have you tried with SetBkMode( hDC, TRANSPARENT ) ?
on method Painttext antolin used SetBkMode( hDC, 1 ) i think perhaps it not need drawpback
but sometimes I have problem with fonts on win 7
do you Know the Antolin mail ? I wish ash some questions ...
- Mon Apr 11, 2016 8:06 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: New Class : TSayjustified
- Replies: 4
- Views: 1338
New Class : TSayjustified
I found some function on forum by Antolin and I thinked to converte to a control class
// http://forums.fivetechsupport.com/viewtopic.php?f=6&t=19174
http://www.eoeo.it/wp-content/uploads/2016/04/say.jpg
http://www.eoeo.it/wp-content/uploads/2016/04/say2.jpg ...
// http://forums.fivetechsupport.com/viewtopic.php?f=6&t=19174
http://www.eoeo.it/wp-content/uploads/2016/04/say.jpg
http://www.eoeo.it/wp-content/uploads/2016/04/say2.jpg ...
- Wed Nov 25, 2015 3:25 am
- Forum: FiveWin para Harbour/xHarbour
- Topic: Mover un Dialogo sin Caption
- Replies: 11
- Views: 1692
Re: Mover un Dialogo sin Caption
Hola Willi.
Modificando la function de Antolin, de la siguiente manera, me funciona bien en Windows 7. En este momento no tengo a la mano otras versiones de Windows.
Pruebalo y nos dices.
oDlg:bLClicked := { || MovWin(oChild, oCursor) } //enviandole ventana hija MDI #define SM ...
Modificando la function de Antolin, de la siguiente manera, me funciona bien en Windows 7. En este momento no tengo a la mano otras versiones de Windows.
Pruebalo y nos dices.
oDlg:bLClicked := { || MovWin(oChild, oCursor) } //enviandole ventana hija MDI #define SM ...
- Mon Nov 23, 2015 7:44 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Mover un Dialogo sin Caption
- Replies: 11
- Views: 1692
Re: Mover un Dialogo sin Caption
acuellar wrote:Muchas Gracias Antolin
A mi también me sirvió.
Saludos,
Adhemar
+1
Saludos.
- Mon Nov 23, 2015 5:45 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Mover un Dialogo sin Caption
- Replies: 11
- Views: 1692
Re: Mover un Dialogo sin Caption
Muchas Gracias Antolin
A mi también me sirvió.
Saludos,
Adhemar
A mi también me sirvió.
Saludos,
Adhemar
- Mon Nov 23, 2015 4:20 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Mover un Dialogo sin Caption
- Replies: 11
- Views: 1692
Re: Mover un Dialogo sin Caption
Antolin,
muchas gracias por compartir tu solución
saludos
Marcelo Vía
muchas gracias por compartir tu solución
saludos
Marcelo Vía
- Mon Jul 27, 2015 7:27 am
- Forum: FiveWin para Harbour/xHarbour
- Topic: Leer pixeles de un bitmap monocromo
- Replies: 30
- Views: 5823
Re: Leer pixeles de un bitmap monocromo
Gracias Antolin,
Pero haciéndolo con las funciones del API de windows para cargar el bitmap y buscando el color con getPixel(), creo que es más limpio, seguro y rápido.
Lo que planteas está bien pero, vamos un poco a ciegas, contando que luego para cortarlo exactamente en un número de pixeles, creo ...
Pero haciéndolo con las funciones del API de windows para cargar el bitmap y buscando el color con getPixel(), creo que es más limpio, seguro y rápido.
Lo que planteas está bien pero, vamos un poco a ciegas, contando que luego para cortarlo exactamente en un número de pixeles, creo ...
- Sat Jul 25, 2015 5:28 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Color de Bit
- Replies: 6
- Views: 1755
Re: Color de Bit
Gracias Antolin:
Pero Definitivamente no pude compilar el archivo en C. Gracias de todas maneras..
Pero Definitivamente no pude compilar el archivo en C. Gracias de todas maneras..
- Mon Jul 20, 2015 3:58 am
- Forum: FiveWin para Harbour/xHarbour
- Topic: Color de Bit
- Replies: 6
- Views: 1755
Re: Color de Bit
Antolin:
Podrias regalarnos un ejemplo de como usar estas funciones, necesito hacer un ColorPick y encontre estas funciones, lo he compilado y agregado a mi proyecto pero no genera error, solo muestra un mensaje de error:

Saludos y gracias..
Podrias regalarnos un ejemplo de como usar estas funciones, necesito hacer un ColorPick y encontre estas funciones, lo he compilado y agregado a mi proyecto pero no genera error, solo muestra un mensaje de error:

Saludos y gracias..
- Thu Jul 09, 2015 4:30 am
- Forum: FiveWin para Harbour/xHarbour
- Topic: Algún ejemplo de menus? tipo popup
- Replies: 14
- Views: 3126
Re: Algún ejemplo de menus? tipo popup
antolin wrote:Jose Luis, lo prometido es deuda
https://app.box.com/s/3coz6nj40o4clutywq09v1gf3zwylmiv
Gracias Antolin, descargo, pruebo y te comento cualquier cosa, gracias por compartir, saludos...

- Thu Jul 02, 2015 2:06 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: How to obtain return value of a called exe?
- Replies: 7
- Views: 1224
Re: How to obtain return value of a called exe?
Thanks for the input Antolin. I do use ini file quite a lot.
Speaking of ini file, I find it annoying that it doesn't leave a blank space in between sections. It makes it hard to read and edit manually
Speaking of ini file, I find it annoying that it doesn't leave a blank space in between sections. It makes it hard to read and edit manually