title: XE4 ( Firemonkey + iOS Static Library) , Pascal conversion from Objective C Class?
body: <p>How to Conversion ? (Objective C Class -> Delphi XE4 ) </p>
  
  <p>and How to use Objective-C Class in static Library from Delphi XE ?</p>
  
  <p>Following is the my first trial.
  But It makes error.</p>
  
  <p><strong>Objective C Source</strong> </p>
  
  <pre><code>// objective C : test.h ----------------------------------------
  @interface objc_test : NSObject {
    BOOL busy;
  } 
  - (int) test :(int) value;
  @end
  
  // objective C : test.m ----------------------------------------
  @implementation objc_test
  - (int) test :(int) value {
      busy   = true;
      return( value + 1);
   }
  @end
  </code></pre>
  
  <p>Here is wrong my conversion code.
  How to fix that ?</p>
  
  <p><strong>Delphi Source</strong> </p>
  
  <pre><code>// Delphi XE4 / iOS  -------------------------------------------
  {$L test.a} // ObjC Static Library 
  
  type
   objc_test = interface (NSObject)
   function  test(value : integer) : integer; cdecl;
  end;
  
  Tobjc_test = class(TOCLocal)
    Public
     function  GetObjectiveCClass : PTypeInfo; override;
     function  test(value : integer): integer; cdecl; 
  end;
  
  implmentation  
  
  function  Tobjc_test.GetObjectiveCClass : PTypeInfo;
   begin
    Result := TypeInfo(objc_test);
   end;
  
  function  Tobjc_test.test(value : integer): integer;
   begin
    // ????????
    //
   end;
  </code></pre>
  
  <p>Thanks</p>
  
  <p>Simon,Choi</p>