Hola Sebas:
Me alegro de verte por aquí de nuevo.
El equivalente del InputBox, es
InputQuery, aunque lo que tu quieres hacer creo que no te sirve ni el inputBox del lenguaje que citas ni el InputQuery de Delphi, no obstante te pongo un ejemplo y ya dirás a ver si es eso lo que quieres o no.
Aquí tienes
Código:
procedure TForm1.Button1Click(Sender: TObject);
var
Nombre:string;
PulsoOk:boolean;
begin
PulsoOk:= InputQuery('*** Datos del Usuario ***',
'Escribe tu nombre, por favor...', Nombre);
if PulsoOk
then ShowMessage('De acuerdo ->,'+Nombre)
else ShowMessage('Tienes que pulsar Ok...');
end;
Un Saludo.