Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Capturar Dato en un Prompt (https://www.clubdelphi.com/foros/showthread.php?t=48034)

Gaim2205 13-09-2007 20:16:17

Capturar Dato en un Prompt
 
Necesito que en mi aplicacion, al pulsar botón. Me aparezca un prompt, pidiendome un dato, capturarlo y poder guardarlo en una variable.

Existe esto en delphi o tendria que hacer una pequeña form adicional que funcione como prompt?

gracias...

Delphius 13-09-2007 20:31:20

Hola Gaim2205, Esto lo puedes conseguir con el InputBox. Un ejemplo de uso:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var Rta: string;
begin
  Rta := InputBox('Titulo','Ingrese su nombre','');
  if Rta <> ''
     then ShowMessage('Su nombre es: '+Rta);
end;

Si quieres otros tipos de inputBox, por ejemplo: ingreso de numeros permitidos en un rago, tienes que agregar en el uses la unidad QDialogs y podrás hacer algo como esto:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var Rta: integer;
begin
  Rta := InputBox('Titulo','Ingrese su edad',18,1,1000);
  // Edad mínima: 1
  // Edad máxima: 1000! :-)
  ShowMessage('Su edad es: '+IntToStr(Rta));
end;

Saludos,


La franja horaria es GMT +2. Ahora son las 18:20:16.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi