Function InputWindow()

Creative ideas/suggestions for HMG

Moderator: Rathinagiri

User avatar
luisvasquezcl
Posts: 1144
Joined: Thu Jul 31, 2008 3:23 am
Location: Chile
Has thanked: 14 times
Been thanked: 14 times
Contact:

Re: Function InputWindow()

Post by luisvasquezcl » Thu Jun 25, 2015 2:27 am

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

Post by andyglezl » Tue Oct 25, 2016 5:18 am

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

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

Post by mustafa » Tue Oct 25, 2016 9:15 am

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

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

Post by mustafa » Tue Oct 25, 2016 10:49 am

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

Post by danielmaximiliano » Tue Oct 25, 2016 1:17 pm

Gracias por compartir Andy
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`.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 » Tue Oct 25, 2016 1:42 pm

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

Post by andyglezl » Tue Oct 25, 2016 1:58 pm

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