Commit f86b5833 authored by rarnu's avatar rarnu

add: 尝试加入跨平台编译

parent 1a74721f
...@@ -3,10 +3,11 @@ unit frmMain; ...@@ -3,10 +3,11 @@ unit frmMain;
interface interface
uses uses
Windows, System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, {$IFDEF MSWINDOWS} Windows, ShellAPI, {$ENDIF}
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Layouts, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Layouts,
FMX.Controls.Presentation, FMX.StdCtrls, FMX.Effects, FMX.Objects, FMX.Filter.Effects, FMX.Controls.Presentation, FMX.StdCtrls, FMX.Effects, FMX.Objects, FMX.Filter.Effects,
untCard, untAPI, FMX.ListBox, FMX.Edit, ShellAPI, FMX.DialogService, System.Generics.Collections; untCard, untAPI, FMX.ListBox, FMX.Edit, FMX.DialogService, System.Generics.Collections;
type type
TFormMain = class(TForm) TFormMain = class(TForm)
......
...@@ -3,7 +3,8 @@ ...@@ -3,7 +3,8 @@
interface interface
uses uses
Windows, System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, {$IFDEF MSWINDOWS} Windows, {$ENDIF}
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
FMX.Layouts, FMX.Controls.Presentation, FMX.StdCtrls, FMX.Edit, FMX.Layouts, FMX.Controls.Presentation, FMX.StdCtrls, FMX.Edit,
FMX.ListBox, FMX.Objects, FMX.Effects; FMX.ListBox, FMX.Objects, FMX.Effects;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment