Olá!
Uma dúvida:
Alguém conseguiu fazer funcionar no mobile o MessageDlg dessa forma:
if MessageDlg('Message',mtConfirmation, mbYesNo)=mrYes then
begin
..............;
end;
Ou só é possível mesmo chamando o callback? ex:
procedure TMainmForm.UnimButton2Click(Sender: TObject);
begin
Messagedlg('Continuar?', mtConfirmation, mbyesno, DCallback1);
end;
procedure TMainmForm.DCallback1(Sender: TComponent; res: Integer);
begin
case res of
mrYes: ShowMessage('Clicou SIM');
mrNo: ShowMessage('Clicou NÃO');
end;
end;
Obrigado!