Search found 115 matches

by SALINETAS24
Sat Aug 18, 2018 6:00 pm
Forum: General
Topic: LASTKEY y ESC... (o cualquier otra)
Replies: 10
Views: 210

Re: LASTKEY y ESC... (o cualquier otra)

Hola Andrés, muchas gracias. Ya he detectado el problema. No funciona porque dentro del DO WHILE yo tengo un DO REPORT, y así solo funciona mi opción. Se que si hiciese el listado a "pedal" no tendría este problema pero de momento todos los listados los hago con la clase DO REPORT, FUNCTION Procesa(...
by SALINETAS24
Thu Aug 16, 2018 8:00 pm
Forum: General
Topic: LASTKEY y ESC... (o cualquier otra)
Replies: 10
Views: 210

Re: LASTKEY y ESC... (o cualquier otra)

Muchas gracias a todos por contestar. Andrés.., tengo un Comodore C-64....... nooo! es broma, aunque bien mirado tengo un cacharro de ordenador que esta pidiendo a gritos la jubilación. Un saludo. Dragancesu, tu si que me entiendes.., no se trata de ordenador, ni potencia.., se trata de tener el con...
by SALINETAS24
Wed Aug 15, 2018 9:18 pm
Forum: General
Topic: LASTKEY y ESC... (o cualquier otra)
Replies: 10
Views: 210

Re: LASTKEY y ESC... (o cualquier otra)

Hola Andrés y gracias por contestar. Te digo .., tu método no funciona. Ya lo probé y no funciona. El mio si y en cualquier PROCEDURE o FUNCTION. ..., y lo de pensar como en Clipper.., pues supongo que si...., al perro viejo no se le ensañan nuevos trucos, jajaja, pero poco a poco, y con vuestra ayu...
by SALINETAS24
Wed Aug 15, 2018 3:01 pm
Forum: General
Topic: LASTKEY y ESC... (o cualquier otra)
Replies: 10
Views: 210

LASTKEY y ESC... (o cualquier otra)

Hola a todos. Ante la necesidad que tenemos muchos usuario de detener un blucle DO WHILE u otro proceso detectanto la tecla ESC, (lo que en CLIPPER era el LASTKEY() ) y no encontramos solución.., aqui os paso lo que yo he montado. En el programa MAIN definimos una variable MEMVAR, en mi caso lSalPit...
by SALINETAS24
Fri Aug 10, 2018 3:55 pm
Forum: General
Topic: Colorear las PAGE
Replies: 23
Views: 6142

Re: Colorear las PAGE

Hola, perdonar que interrumpa la siesta, pero leído lo leído ...., ¿hay alguna forma de colorear las PAGE en HMG...?, y no me sirve como respuesta pintarlas con un rotulador .. jajajaj De verdad, se puede hacer algo.? Me da la sensación después de llevar un par de meses actualizando mis conocimiento...
by SALINETAS24
Tue Jul 31, 2018 4:51 pm
Forum: HMG Unicode version
Topic: HMG 3.4.4
Replies: 143
Views: 37297

Re: HMG 3.4.4

Hola, como ya te comente tienes un problema de recursividad. Un principio del CLIPPER y que HARBOUR ha heredado es que para salir de una función o procedimiento se tiene que hacer mediente un RETURN, en caso contrario eso quedará pendiente en la memoria del ordenador a la espera de recibir el RETURN...
by SALINETAS24
Mon Jul 30, 2018 4:24 pm
Forum: HMG Unicode version
Topic: HMG 3.4.4
Replies: 143
Views: 37297

Re: HMG 3.4.4

Hola Mario, yo también creo que es por recursividad. Si te das cuenta estas poniendo el foco antes del return, tienes que rehacer el código. If Empty(Form_122.Text_1.Value) .OR. lOk:=.f. msgInfo("Disculpe !!" + chr(10) + ; "El codigo de articulo ingresado es inválido","Atención") Form_122.Text_1.Set...
by SALINETAS24
Thu Jul 26, 2018 8:11 pm
Forum: General
Topic: SET INTERACTIVECLOSE ON/OFF
Replies: 9
Views: 303

Re: SET INTERACTIVECLOSE ON/OFF

Hola Jorge, si le pones .T., presenta el mensaje y sale de programa.. creo recordar.
Si no le pones nada..., no se lo que hace. Prueba y me lo dices :D
Salud y Cervezas..
by SALINETAS24
Wed Jul 25, 2018 11:01 am
Forum: General
Topic: MessageBox
Replies: 4
Views: 122

Re: MessageBox

Ya lo tengo. Gracias
by SALINETAS24
Wed Jul 25, 2018 10:45 am
Forum: General
Topic: MessageBox
Replies: 4
Views: 122

MessageBox

Hola, estoy buscando en las fuentes la función MessageBox y no encuentro donde se define.
Alguien conoce en que parte se define/crea esta función.
Gracias