Page 1 of 1

Inputbox

Posted: Wed Dec 14, 2016 7:05 pm
by AidTIC
hola , tengo un problema con el inputbox. displayo un literal que si es muy largo se me corta.

Image

Code: Select all

 pventa := InputBox ( "P.Venta : " , "Edito Precio Venta", , , , , 700 )

Inputbox

Posted: Wed Dec 14, 2016 9:18 pm
by Pablo César
Hola.

Realmente, esto no haberia porqué suceder. Voy a sugerir a Claudio si puede aprobar el siguiente cambio en la función InputBox:
Screen39.png
Screen39.png (63.62 KiB) Viewed 5336 times
Por encuanto, tu puedes alterar el arquivo C:\hmg.3.4.3\SOURCE\h_windows.prg (+/- la linea 5335) y substituir el valor 280 por:

If(nWidth=Nil, 320, nWidth-30)

Como muestra la figura.

Dr. Claudio, podrias hacernos la gentileza de incluir esta correccion en la funcion del InputBox si te parece adecuado ?

Re: Inputbox

Posted: Thu Dec 15, 2016 12:36 am
by srvet_claudio
Ok

Inputbox

Posted: Thu Dec 15, 2016 12:40 am
by Pablo César
Thank you Claudio.

FYI and guidance. In case you approve centralizing method for InputWindow and InputBox,
we should add more those little implementations (described in this topic).