Function InputWindow()

Creative ideas/suggestions for HMG

Moderator: Rathinagiri

User avatar
luisvasquezcl
Posts: 1156
Joined: Thu Jul 31, 2008 3:23 am
Location: Chile
Has thanked: 15 times
Been thanked: 16 times
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: 1251
Joined: Fri Oct 26, 2012 7:58 pm
Location: Guadalajara Jalisco, MX
Has thanked: 39 times
Been thanked: 107 times
Contact:

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 2647 times
MyInputWindow.rar
(4.08 KiB) Downloaded 156 times
Andrés González López
Desde Guadalajara, Jalisco. México.

User avatar
mustafa
Posts: 979
Joined: Fri Mar 20, 2009 11:38 am
DBs Used: DBF
Location: Alicante - Spain
Been thanked: 194 times
Contact:

Post by mustafa »

Gracias Andrés por tu contribución
un abrazo
Mustafa

User avatar
mustafa
Posts: 979
Joined: Fri Mar 20, 2009 11:38 am
DBs Used: DBF
Location: Alicante - Spain
Been thanked: 194 times
Contact:

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: 2321
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Has thanked: 374 times
Been thanked: 74 times
Contact:

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
Has thanked: 100 times
Been thanked: 182 times

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: 1251
Joined: Fri Oct 26, 2012 7:58 pm
Location: Guadalajara Jalisco, MX
Has thanked: 39 times
Been thanked: 107 times
Contact:

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