ActiveDelphi

[eduardoserrao]

Bom dia,
Gostaria de saber se teria como usar o MessageDlg pro Android no Seattle?
Estou usando:

[marcelo_tux]

Tente assim amigo :

MessageDlg('Você deseja imprimir o relatório ?', System.UITypes.TMsgDlgType.mtInformation,
[System.UITypes.TMsgDlgBtn.mbYes,
System.UITypes.TMsgDlgBtn.mbNo
], 0,
procedure(const AResult: System.UITypes.TModalResult)
begin
case AResult of
mrYES:
begin
//caso sim
end;
mrNo:
// caso não
end;
end);
_________________
Porgramador Delphi - Mobile

[eduardoserrao]

Oi marcelo_tux, obrigado por responder meu tópico, testei do jeito que você sugeriu e funcionou a única coisa que achei que ficou estranho foi o texto do message dialog que ficou em inglês. Será se você sabe alguma maneira que eu possa fazer ele ficar em português?

Mas uma vez muito obrigado

[marcelo_tux]

Tem como traduzir sim , vamos la :

1 - Abra o arquivo FMX.Consts.pas que esta localizado no caminho :
C:\Program Files (x86)\Embarcadero\Studio\17.0\source\fmx

2- Dentro desse arquivo localize : { Dialog Strings } , ai vc traduz o que quer e salva o arquivo, apos isso gere o DCU dele e copie esse DCU para as pastas :
C:\Program Files (x86)\Embarcadero\Studio\17.0\lib\android\debug
e
C:\Program Files (x86)\Embarcadero\Studio\17.0\lib\android\release

Pronto , agora so compilar seu projeto.

Espere que ajude.
_________________
Porgramador Delphi - Mobile

[eduardoserrao]

Oi marcelo_tux, eu tentei fazer aqui mas acho que fiz alguma coisa errada que na hora de compilar deu bastante erro.

localizei o arquivo FMX.Consts.pas e fiz as alterações.
copiei ele para dentro do meu projeto e mandei compilar.
fui na pasta onde ele gera o executável e copiei o arquivo FMX.Consts.DCU para as pastas Debug e Release.
removi a FMX.Consts.pas do meu projeto, fechei o delphi.
abri novamente e mandei compilar.

seria desta forma?

[marcelo_tux]

Isso , a unica diferença , é que eu gero o DCu com um projeto novo, mas ate ai não vejo a diferença, pego esse DCU e jogo dentro da pasta release e debug, é isso mesmo que faço.
Ve direitinho os passos ai.
_________________
Porgramador Delphi - Mobile

[eduardoserrao]

sim eu tentei desta forma, mas quando tentei compilar meu projeto novamente que ele abre aquela janela das linhas compiladas, o numero de erros fica crescendo e não para, ai tenho que finalizar o seattle pelo gerenciador de tarefas. ainda bem que copiei os dcu antigo antes de fazer este procedimento. de qualquer forma muito obrigado.

[wolverinefarah]

[eduardoserrao]

[eduardoserrao]

Só respondendo minha própria pergunta, para caso alguém passe para o mesmo problema, eu consegui resolver com:

SMsgDlgNo = 'N'+#227+'o';