InputBox ???

Delphi

21/02/2003

Como pegar o pressionamento do botão cancelar num InputBox ?

:( :( :(


Luciano Pimenta®

Luciano Pimenta®

Curtidas 0

Respostas

Okama

Okama

21/02/2003

use InputQuery:

Var Texto:String;
begin

Texto := ´Texto Padrão´;

if InputQuery(´Caption´,´Prompt:´,Texto) then
Showmessage( texto )
else
Showmessage( ´Esc Precionado´);


GOSTEI 0
Okama

Okama

21/02/2003

use InputQuery: Var Texto:String; begin Texto := ´Texto Padrão´; if InputQuery(´Caption´,´Prompt:´,Texto) then Showmessage( texto ) else Showmessage( ´Esc Precionado´);



´Esc PRESSIONADO e não Precionado, desculpem, he, he!´


GOSTEI 0
Aroldo Zanela

Aroldo Zanela

21/02/2003

Como pegar o pressionamento do botão cancelar num InputBox ? :( :( :(


Caro Maninho,

Utilize [b:7e12688c5d]InputQuery[/b:7e12688c5d] que é utilizado pela InputBox para obter um retorno boolean. Segue um exemplo.

var cInput: String;
begin
if InputQuery(´Teste´,´Localizar´, cInput) then
  ShowMessage(´Ok´) else
                ShowMessage(´Cancelado´);
  
end;



GOSTEI 0
POSTAR