hace una input box en delphi?

[Gattaca]

Hola..

Sera que se puede hacer una inputbox como las de visual basic pero en delphi?...

Por ejemplo.

cajadeinput = InputBox("Inserte el texto:", "InputBox")
if cajadeinput = "A" then
...
else
...
end if

Algo asi era para visual basic, pero ya deje de usarlo...

Alguna ayuda es urgente por favor...