Inputbox

[AidTIC]

hola , tengo un problema con el inputbox. displayo un literal que si es muy largo se me corta.

Code: Select all

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

[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 (63.62 KiB) Viewed 5229 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 ?

[srvet_claudio]

Ok

[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).