533         logfileBase:= 'preview';

   533         logfileBase:= 'preview';

   534         {$ENDIF}

   534         {$ENDIF}

   535 {$IFDEF USE_VIDEO_RECORDING}

   535 {$IFDEF USE_VIDEO_RECORDING}

   536     InitCriticalSection(logMutex);

   536     InitCriticalSection(logMutex);

   537 {$ENDIF}

   537 {$ENDIF}

   539     // if log is locked, write to the next one

   538     // if log is locked, write to the next one

   540     i:= 0;

   539     i:= 0;

   541     while(i < 7) do

   540     while(i < 7) do

   542     begin

   541     begin

   543         logFile:= pfsOpenWrite('/Logs/' + logfileBase + inttostr(i) + '.log');

   542         logFile:= pfsOpenWrite('/Logs/' + logfileBase + inttostr(i) + '.log');

   544         if logFile <> nil then

   543         if logFile <> nil then

   545             break;

   544             break;

   546         inc(i)

   545         inc(i)

   547     end;

   546     end;

   549 {$ENDIF}

   547 {$ENDIF}

   550 

   548 

   551     //mobile stuff

   549     //mobile stuff

   552 {$IFDEF IPHONEOS}

   550 {$IFDEF IPHONEOS}

   553     mobileRecord.PerformRumble:= @AudioServicesPlaySystemSound;

   551     mobileRecord.PerformRumble:= @AudioServicesPlaySystemSound;