- [iOS]fixed bug with button Hide on virtual keyboard and iOS 6

- version bump(0.3.8)

git-svn-id: http://zengl.googlecode.com/svn/branches/0.3.x@1981 6573c10b-8653-0410-9706-d32479e959fb

headers/zglHeader.h

@@ -2,8 +2,8 @@
 /*-----------= ZenGL =------------*/
 /*--------------------------------*/
 /*                                */
-/* version:  0.3.7                */
-/* date:     2013.01.27           */
+/* version:  0.3.8                */
+/* date:     2013.02.13           */
 /* license:  zlib                 */
 /* homepage: http://zengl.org     */
 /*                                */

headers/zglHeader.pas

@@ -2,8 +2,8 @@
 {-----------= ZenGL =------------}
 {--------------------------------}
 {                                }
-{ version:  0.3.7                }
-{ date:     2013.01.27           }
+{ version:  0.3.8                }
+{ date:     2013.02.13           }
 { license:  zlib                 }
 { homepage: http://zengl.org     }
 {                                }

src/Lazarus/ZenGL-win.lpi

@@ -16,9 +16,9 @@
     <VersionInfo>
       <UseVersionInfo Value="True"/>
       <MinorVersionNr Value="3"/>
-      <RevisionNr Value="7"/>
+      <RevisionNr Value="8"/>
       <CharSet Value="04B0"/>
-      <StringTable CompanyName="Kemka Andrey aka Andru" FileDescription="Cross-platform game development library" InternalName="ZenGL" LegalCopyright="Kemka Andrey aka Andru" OriginalFilename="ZenGL" ProductName="ZenGL" ProductVersion="0.3.7"/>
+      <StringTable CompanyName="Kemka Andrey aka Andru" FileDescription="Cross-platform game development library" InternalName="ZenGL" LegalCopyright="Kemka Andrey aka Andru" OriginalFilename="ZenGL" ProductName="ZenGL" ProductVersion="0.3.8"/>
     </VersionInfo>
     <BuildModes Count="4">
       <Item1 Name="Release" Default="True"/>

src/zgl_application.pas

@@ -81,7 +81,7 @@ type
     function textFieldShouldBeginEditing( textField : UITextField ) : Boolean; message 'textFieldShouldBeginEditing:';
     function textField_shouldChangeCharactersInRange_replacementString( textField : UITextField; range : NSRange; string_ : NSString ) : Boolean; message 'textField:shouldChangeCharactersInRange:replacementString:';
     function textFieldShouldReturn( textField : UITextField ) : Boolean; message 'textFieldShouldReturn:';
-    function textFieldShouldEndEditing( textField : UITextField ) : Boolean; message 'textFieldShouldEndEditing:';
+    function textFieldDidEndEditing( textField : UITextField ) : Boolean; message 'textFieldDidEndEditing:';
     procedure textFieldEditingChanged; message 'textFieldEditingChanged';
   end;
 
@@ -1305,7 +1305,7 @@ begin
   keysTextField.removeFromSuperview();
 end;
 
-function zglCAppDelegate.textFieldShouldEndEditing( textField : UITextField ) : Boolean;
+function zglCAppDelegate.textFieldDidEndEditing( textField : UITextField ) : Boolean;
 begin
   Result := textFieldShouldReturn( textField );
 end;

src/zgl_main.pas

@@ -48,11 +48,11 @@ uses
   zgl_types;
 
 const
-  cs_ZenGL    = 'ZenGL 0.3.7';
-  cs_Date     = '2013.01.27';
+  cs_ZenGL    = 'ZenGL 0.3.8';
+  cs_Date     = '2013.02.13';
   cv_major    = 0;
   cv_minor    = 3;
-  cv_revision = 7;
+  cv_revision = 8;
 
   // zgl_Reg
   SYS_APP_INIT           = $000001;

src/zgl_video_theora.pas

@@ -187,18 +187,19 @@ begin
       Frames    := 0;
       Result    := TRUE;
 
-      for i := 1 to 64 do
+      i := 1;
+      while TRUE do
         begin
           ogg_sync_reset( @TheoraData.SyncState );
-          buffer_Seek( TheoraData, -4096 * i, FSM_END );
+          buffer_Seek( TheoraData, -4 * i, FSM_END );
 
-          buffer_ReadData( TheoraData, 4096 * i );
+          buffer_ReadData( TheoraData, 4 * i );
           ogg_sync_pageseek( @TheoraData.SyncState, @page );
 
           while TRUE do
             begin
               ret := ogg_sync_pageout( @TheoraData.SyncState, @page );
-              if ret = 0 Then break;
+              if ret <> 1 Then break;
               if ogg_page_serialno( @page ) <> TheoraData.StreamState.serialno Then continue;
 
               granulePos := ogg_page_granulepos( @page );
@@ -209,6 +210,7 @@ begin
                   INC( Frames );
             end;
 
+          INC( i );
           if Frames > 0 Then break;
         end;