Du brauchst doch eigentlich nur von der globalen Procedure auf die entsprechenden globalen class procedures umzustellen:
Delphi-Quellcode:
class procedure TDialogService.InputQuery(const ACaption: string; const APrompts: array of string; const AValues: array of string; const ACloseQueryProc: TInputCloseQueryProc);
...
FMX.DialogService.TDialogService
{} .InputQuery( ACaption,
APrompts,
AValues,
LProcDlg );