[ecfisa]

Hola Alejandro.

Si interpreto bién lo que estas buscando creo que podes hacer:

Código Delphi [-]
var
  valor : string;
  ok : Boolean;
begin
  repeat
    valor := inputbox('Titulo','Dato a recibir','');
    ok    := valor = 'un texto';  // una validación cualquiera
  until ok;
...

Saludos