TDialogBuilder -> SetItems -> FontSize Items about fmxui HOT 3 CLOSED

{ TCustomStringsListAdapter }

function TCustomStringsListAdapter.GetView(const Index: Integer;
  ConvertView: TViewBase; Parent: TViewGroup): TViewBase;
begin
  Result := inherited GetView(Index, ConvertView, Parent);
  if (ConvertView = nil) or (not (ConvertView is TListTextItem)) then begin
    TListTextItem(Result).Gravity := TLayoutGravity.Center;
    TListTextItem(Result).TextSettings.Font.Size := 30;
  end;
end;