Function InputWindow()

Creative ideas/suggestions for HMG

Moderator: Rathinagiri

User avatar
luisvasquezcl
Posts: 1140
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: 1151
Joined: Fri Oct 26, 2012 7:58 pm
Location: Guadalajara Jalisco, MX
Has thanked: 35 times
Been thanked: 68 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 2204 times
MyInputWindow.rar
(4.08 KiB) Downloaded 130 times
Andrés González López
Desde Guadalajara, Jalisco. México.

User avatar
mustafa
Posts: 829
Joined: Fri Mar 20, 2009 11:38 am
DBs Used: DBF
Location: Alicante - Spain
Been thanked: 117 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: 829
Joined: Fri Mar 20, 2009 11:38 am
DBs Used: DBF
Location: Alicante - Spain
Been thanked: 117 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: 2142
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Has thanked: 155 times
Been thanked: 23 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: 1151
Joined: Fri Oct 26, 2012 7:58 pm
Location: Guadalajara Jalisco, MX
Has thanked: 35 times
Been thanked: 68 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