USES para Android y Windows

[jmbarrio]

Buenos días, estoy haciendo una apk multidevice Android y Windows, como puedo hacer el uses para que no me de errores al pasar de android a windows

El uses es el siguiente:

Código Delphi [-]
uses

  System.SysUtils, System.Types, System.UITypes, System.Classes,
  System.Variants, System.IOUtils,System.Messaging,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.TabControl, FMX.Memo.Types,
  FMX.ScrollBox, FMX.Memo, FMX.Controls.Presentation, FMX.StdCtrls, FMX.Objects, FMX.Surfaces,
  Androidapi.Jni,
  Androidapi.Helpers, Androidapi.JNI.Net,
  Androidapi.JNI.GraphicsContentViewText,
  Androidapi.JNI.Os, Androidapi.JNI.App,
  Androidapi.JNI.Widget,
  Androidapi.JNI.JavaTypes,  Androidapi.JNI.Provider,
  FMX.Platform.Android,
  Androidapi.JNIBridge,  FMX.Helpers.Android, Androidapi.JNI.Media,
  Androidapi.JNI.Webkit,  Posix.Unistd, Androidapi.JNI.Support;

Al pasar a windows todas las unidades android me dan error de compilacion, entiendo que igual se hace usando el código de abajo, pero no sé como hacerlo

Código Delphi [-]
{$IF DEFINED (WIN32) or DEFINED (WIN64)}
 {$ENDIF}       
            
{$IF DEFINED (IOS)  or DEFINED (ANDROID)}
 {$ENDIF}

Muchas gracias, saludos.

[manelb]

En una de mis aplicaciones tengo esto:

Código Delphi [-]
uses
  System.SysUtils, System.Types, System.UITypes, System.Classes,System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
  FireDAC.Stan.Intf, FireDAC.Stan.Option, FireDAC.Stan.Error, FireDAC.UI.Intf,
  FireDAC.Phys.Intf, FireDAC.Stan.Def, FireDAC.Stan.Pool, FireDAC.Stan.Async,
  FireDAC.Phys, FireDAC.Phys.DS, FireDAC.Phys.DSDef, FireDAC.FMXUI.Wait,
  FireDAC.Stan.Param, FireDAC.DatS, FireDAC.DApt.Intf, FireDAC.DApt,
  FireDAC.Stan.StorageBin, System.Rtti, System.Bindings.Outputs,
  Data.Bind.EngExt, FMX.Bind.DBEngExt, Data.Bind.Components,
  FireDAC.Comp.Client, Data.DB, FireDAC.Comp.DataSet, ippeerclient, FMX.Layouts,
  FMX.StdCtrls, FMX.ListBox, FMX.MultiView, FMX.Controls.Presentation,
  Data.Bind.DBScope, System.ImageList, FMX.ImgList, FMX.Ani, System.Actions, FMX.ActnList,
  System.IOUtils, Inifiles, FMX.ListView, FireDAC.FMXUI.Async, FireDAC.Comp.UI

  {$IFDEF ANDROID}
  , Androidapi.JNIBridge, Androidapi.Helpers, Androidapi.JNI.JavaTypes,
  Androidapi.JNI.GraphicsContentViewText, Androidapi.jni.net
  {$ENDIF ANDROID}
  ;

Espero te sirva.
Saludos

[manelb]

Luego, en otras partes del código, también puede ser necesario utilizar directivas de compilación

Código Delphi [-]
function TfrmPrincipal.NombreINI: String;
begin
 {$IFDEF ANDROID}
  Result:= TPath.Combine( TPath.GetDocumentsPath, INI_CONFIGURACION);
 {$ENDIF ANDROID}

 {$IFDEF MSWINDOWS}
  Result:= ExtractFilePath(ParamStr(0))+INI_CONFIGURACION;
 {$ENDIF MSWINDOWS}
end;

[jmbarrio]

Empezado por manelb

En una de mis aplicaciones tengo esto:

Código Delphi [-]
uses
  System.SysUtils, System.Types, System.UITypes, System.Classes,System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
  FireDAC.Stan.Intf, FireDAC.Stan.Option, FireDAC.Stan.Error, FireDAC.UI.Intf,
  FireDAC.Phys.Intf, FireDAC.Stan.Def, FireDAC.Stan.Pool, FireDAC.Stan.Async,
  FireDAC.Phys, FireDAC.Phys.DS, FireDAC.Phys.DSDef, FireDAC.FMXUI.Wait,
  FireDAC.Stan.Param, FireDAC.DatS, FireDAC.DApt.Intf, FireDAC.DApt,
  FireDAC.Stan.StorageBin, System.Rtti, System.Bindings.Outputs,
  Data.Bind.EngExt, FMX.Bind.DBEngExt, Data.Bind.Components,
  FireDAC.Comp.Client, Data.DB, FireDAC.Comp.DataSet, ippeerclient, FMX.Layouts,
  FMX.StdCtrls, FMX.ListBox, FMX.MultiView, FMX.Controls.Presentation,
  Data.Bind.DBScope, System.ImageList, FMX.ImgList, FMX.Ani, System.Actions, FMX.ActnList,
  System.IOUtils, Inifiles, FMX.ListView, FireDAC.FMXUI.Async, FireDAC.Comp.UI

  {$IFDEF ANDROID}
  , Androidapi.JNIBridge, Androidapi.Helpers, Androidapi.JNI.JavaTypes,
  Androidapi.JNI.GraphicsContentViewText, Androidapi.jni.net
  {$ENDIF ANDROID}
  ;

Espero te sirva.
Saludos

Muchísimas gracias, funciona perfecto, no caí en empezar con una coma las uses de android.