Firemonkey ¾øÀÌ iOS ¾ÛÀ» ¸¸µå´Â ¿¹Á¦ÀÔ´Ï´Ù.
ÄÚµå ÀÚü´Â °£´ÜÇѵ¥, ¹®¹ýÀÌ Àͼ÷ÇÏÁö ¾Ê¾Æ¼, ÀÛ¼ºÇϴµ¥, À̹ø ¿¬ÈÞ¸¦ ¸ðµÎ ½á¹ö·È½À´Ï´Ù. :)
°¡Àå Å« ÀåÁ¡Àº Native¸¦ »ç¿ëÇÏ°Ô µÇ¸é, Å©±â°¡ 1/3~1/4·Î ÁÙ¾îµé°í, ¼Óµµµµ XCode·Î ÀÛ¼ºÇßÀ»¶§¿Í µ¿ÀÏÇÏ°Ô µÈ´Ù´Â Á¡ÀÔ´Ï´Ù.
Âü°í : Android Native ¹öÀüÀº ¿©±â ÀÚ·á½Ç¿¡ ¾çº´±Ô´Ô²²¼ ¿Ã·ÁÁֽŠÀڷḦ »ç¿ëÇÏ½Ã¸é µË´Ï´Ù. "XE5 Android Application without Firemonkey (FMX ¾øÀÌ ¾Èµå·ÎÀÌµå ¾Û ¸¸µé±â)"
// // iOS Hello World for Delphi XE7 without FMX // // --------------------------------------------- // Test Results ( Simple App with Label ) // --------------------------------------------- // Simulator Device // Firemonkey 9MB 15MB // Native 1.5MB 4.3MB // --------------------------------------------- // // http://blog.naver.com/simonsayz // Simon,Choi // // References // ---------------------------------------------------------------------------- // http://blog.blong.com/2013/05/delphi-for-ios-some-notes.html // http://ridingdelphi.blogspot.kr/2014/01/the-quest-to-migrate-ios-squarecam-app_3169.html // program XE7_HelloWorld;
uses Macapi.ObjectiveC, iOSapi.CocoaTypes, iOSapi.Foundation, iOSapi.UIKit, iOSapi.CoreGraphics;
Type // Ref. UIApplicationDelegate UIAppDelegate = interface(IObjectiveC) function application_didFinishLaunchingWithOptions(Sender: UIApplication; didFinishLaunchingWithOptions: NSDictionary): Boolean; cdecl; overload; end;
TUIAppDelegate = class(TOCLocal,UIAppDelegate) private Win : UIWindow; public [MethodName('application:didFinishLaunchingWithOptions:')] function application_didFinishLaunchingWithOptions(Sender: UIApplication; didFinishLaunchingWithOptions: NSDictionary): Boolean; cdecl; end;
Var _gAppDel : TUIAppDelegate;
// Function TUIAppDelegate.application_didFinishLaunchingWithOptions(Sender: UIApplication; didFinishLaunchingWithOptions: NSDictionary): Boolean; Var bounds : NSRect; viewController : UIViewController; TextField : UITextField; begin bounds := TUIScreen.Wrap( TUIScreen.OCClass.mainScreen ).bounds; _gAppDel.Win := TUIWindow.Wrap( TUIWindow.alloc.initWithFrame( bounds ) ); viewController := TUIViewController.Wrap( TUIViewController.alloc.init ); // Add iOS Control textField := TUITextField.Wrap( TUITextField.alloc.init ); textField.setBackgroundColor ( TUIColor.Wrap( TUIColor.OCClass.whiteColor) ); textField.setText(NSStr('XE7, Hello Wor
|