Function InputWindow()

Creative ideas/suggestions for HMG

Moderator: Rathinagiri

User avatar
luisvasquezcl
Posts: 1258
Joined: Thu Jul 31, 2008 3:23 am
Location: Chile
Contact:

Re: Function InputWindow()

Post by luisvasquezcl »

Pablo, gracias por la confianza y por tu esfuerzo.
Haré lo que pueda, estamos en contacto.
Saludos cordiales,
Luis Vásquez.
User avatar
andyglezl
Posts: 1461
Joined: Fri Oct 26, 2012 7:58 pm
Location: Guadalajara Jalisco, MX
Contact:

Re: Function InputWindow()

Post by andyglezl »

Hola

Buscando en mi computadora, algo sobre "inputwindow", me encontré este proyecto que inicie hace tiempo.
(ya no me acuerdo porque lo dejé)
Les dejo el código por si alguien lo quiere continuar, mejorar (o ignorar) :lol:
-------------------------------------------------------------------------------------------------------------------------
Hello

I looking at my computer, something about "inputwindow" I found this project that started long ago.
(I no longer remember because I left)
Here is the code in case anyone wants to continue, improve (or ignore): :lol:
Sin título-1.jpg
Sin título-1.jpg (108.62 KiB) Viewed 4181 times
MyInputWindow.rar
(4.08 KiB) Downloaded 293 times
Andrés González López
Desde Guadalajara, Jalisco. México.
User avatar
mustafa
Posts: 1158
Joined: Fri Mar 20, 2009 11:38 am
DBs Used: DBF
Location: Alicante - Spain
Contact:

Re: Function InputWindow()

Post by mustafa »

Gracias Andrés por tu contribución
un abrazo
Mustafa
User avatar
mustafa
Posts: 1158
Joined: Fri Mar 20, 2009 11:38 am
DBs Used: DBF
Location: Alicante - Spain
Contact:

Re: Function InputWindow()

Post by mustafa »

Hola Andres
Falta --> " MALVA"

Code: Select all

#include "hmg.ch"
#include "Dbinfo.ch"
#include "dbstruct.ch"
#include "fileio.ch"
#define  fCol    { || if ( This.CellRowIndex/2 == int(This.CellRowIndex/2) , WHITE , BLUE ) }
#define WM_VSCROLL    277  // Para avance en ventanas virtuales con Pgup y PgDw Verticalmente
#define SB_VERT         1
#define SB_PAGEUP       2
#define SB_PAGEDOWN     3
#define  MALVA { 106,108,192 }      //  <-----  Hay que crearla  

FUNCTION MAIN( )
Saludos
Mustafa
User avatar
danielmaximiliano
Posts: 2611
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Contact:

Re: Function InputWindow()

Post by danielmaximiliano »

Gracias por compartir Andy
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`. Harbour/HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. := +54901169026142
Telegram Name := DaNiElMaXiMiLiAnO
User avatar
Pablo César
Posts: 4059
Joined: Wed Sep 08, 2010 1:18 pm
Location: Curitiba - Brasil

Function InputWindow()

Post by Pablo César »

Gracias Andrés
HMGing a better world
"Matter tells space how to curve, space tells matter how to move."
Albert Einstein
User avatar
andyglezl
Posts: 1461
Joined: Fri Oct 26, 2012 7:58 pm
Location: Guadalajara Jalisco, MX
Contact:

Re: Function InputWindow()

Post by andyglezl »

mustafa wrote:Hola Andres
Falta --> " MALVA"

Code: Select all

#include "hmg.ch"
#include "Dbinfo.ch"
#include "dbstruct.ch"
#include "fileio.ch"
#define  fCol    { || if ( This.CellRowIndex/2 == int(This.CellRowIndex/2) , WHITE , BLUE ) }
#define WM_VSCROLL    277  // Para avance en ventanas virtuales con Pgup y PgDw Verticalmente
#define SB_VERT         1
#define SB_PAGEUP       2
#define SB_PAGEDOWN     3
#define  MALVA { 106,108,192 }      //  <-----  Hay que crearla  

FUNCTION MAIN( )
Saludos
Mustafa

Gracias Mustafa, empece a modificar las primeras, pero me faltaron dos....

#define MALVA { 204 , 204 , 255 }
Andrés González López
Desde Guadalajara, Jalisco. México.
Post Reply