ActiveDelphi

[AndersonFurtilho]

Olá amigos!
Algum amigo ja passou por este problema ?

Gero um inputBox em um botão para um aplicativo android.
Se eu demoro muito para digitar algo e clicar no Ok ou Cancelar.
O aplicativo simplesmente congela.
Ele nem mostra que travou, simplesmente fica congelado.

Um forte abraço
Anderson

[RaphaelComba]

Olá

cara da uma olhada nesse link e vê se te ajuda.

http://www.fmxexpress.com/new-non-blocking-inputbox-function-in-delphi-xe7-firemonkey-on-android-and-ios/

mas segue um exemplo simples de como usar o inputbox, no evento de um botão coloque o seguinte código:

InputBox('Defina um Apelido','Apelido','',
procedure(const AResult: TModalResult; const AValue: string)
begin
case AResult of
mrOk:
begin
ShowMessage(AValue);
end;
mrCancel:
begin
end;
end;
end);