¿Es valida utilizar esta función?

[Nelly]

Buen dia a todos.

Hola, tengo una duda en relación de como utilizar un inputbox correctamente, lo que quiero que me digan si es valido hacer esto:

if valor=InputBox('Sistema','Introduzca el número de la convención','') then begin


Gracias por su tiempo

[Neftali [Germán.Estévez]]

En principio parece correcto, aunque para mayor seguridad puedes utilizar algo así:


Valor1 := InputBox('Sistema','Introduzca el número de la convención','');
if AnsiCompareText(Valor1, Valor2)...


Para evitar que las diferencias entre mayúsculas y minúsculas te devuelvan valores distintos cuando son iguales. Si deseas distinguor entre ambas puedes utilizar la opción que tú propones.

[Bicho]

Hola Nelly,

yo particularmente no le veo ningún inconveniente, si debo decir que no lo hago así: yo uso una variable auxiliar a la que le asigno el valor introducido en el Inputbox y ya después hago la comparación

var aux : String;
begin
aux := InputBox('Sistema','Introduzca el número de la convención','');
if valor = aux then ...
end;


Pero repito no le veo ningún inconveniente.
Esperaremos si los gurus del foro me desbaratan mi opinión.

Saludos

[roman]

quiero que me digan si es valido hacer esto

Para el compilador lo es (salvo por el begin al que le falta el end). La pregunta sería, ¿qué quieres hacer? Cuando nos respondas eso, sabremos si es válido o no para ti.

// Saludos

[reina]

Holas! el inputbox es una funcion..para introducir texto..que retorna el string ingresado..si presionas OK..y si cancelas retornara el valor por defecto..que le ingresas en el ultimo parametro de la funcion (en tu caso ' ').
Puedes realizar tu comparación siempre y cuando..tu variable sea un string..saludos!

LA PATRIA SERA LIBRE!

[roman]

Tal y como se menciona en la ayuda de Delphi, quizá le sería más conveniente usar InputQuery.

// Saludos