PDA

Ver la Versión Completa : Cual es el ekivalente al InputBox de VB?


OnClick
31-05-2003, 12:40:58
Hello!

Necesito q al cargar el formulario m aparezca un pequeño cuadro de diálogo semejante a esto:

-----------------------------------------------------------------------
| Nombre del Jugador 1: [Edit1 ] _______ |
| |Aceptar| |
| Nombre del jugador 2: [Edit2 ] ----------- |
|__________________________________________ _|

Y luego ya le asociaré ese Edit1 y Edit2 a unos labels del formulario.

Sé que en Visual Basic este tipo de Cuadros de Diálogo se hace con InputBox pero en Delphi... ¿Cómo se hace?

OnClick
31-05-2003, 13:02:13
Antes he intentado diibujar el cuadro de diálog que me hacia falta y, como se puede apreciar, no con mucha fortuna.

Os adjunto el cuadro de diálogo q me hace falta crear.

Un saludo a todos.

marcoszorrilla
31-05-2003, 14:25:52
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


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.

OnClick
31-05-2003, 16:09:52
YO DE MAYOR KIERO SER COMO TÚ! :D

GRACIAS!!!!

El InputQuery era justo lo q buscaba. Esta misma consulta se la hice a la paleta de mi profesora y aun estoy es perando a q m conteste.

La verdad es q se me está kedando un programilla la mar de curiosete.

Te voy a poner en el apartado de Acerca de... en Agradecimientos ;)


Un saludo.