blob: 1794325d3058457d8b8e09fb4284f63e9238ab34 (
plain) (
tree)
|
|
� I
�u6/�6A � <pClasses\ULog.pas˔t6 dClasses�C�� fTFileStream�jIkg.TFileStream���MgfmCreatee���gTFileStream.Create�-7�fTSeekOrigin��]]gsoBeginning��gTStream.CopyFrom�S cdSysInit�C�� cdSystem�C�� fTObject���_fRealS��<fTextFile���fBooleanW~8f
AnsiString���fInteger���
fString���g.TObject�BgTObject.SafeCallException�G��gTObject.AfterConstruction�G��gTObject.BeforeDestruction�G��gTObject.Dispatch�G��gTObject.DefaultHandler�G��gTObject.NewInstance�G��gTObject.FreeInstance�G��gTObject.Destroy�G��g CloseFile g@CloseR#�Dg@BeforeDestruction�d��g@_IOTestE�a�g
@ClassDestroy�OgParamStr��gTrue����g
AssignFile g@Assign�jtgRewrite g@RewritTextR#�DgIOResult�k�1gTrunc gFrac gLength g@LStrLen��gWriteln g@Write0LStringE[g@WriteLn�Ԡ?gFlush����g@LStrAddRef��jg@LStrCmpE�a�g @LStrCat3E�a�g@FRACE�a�g@TRUNCE�a�g@_llmodE�a�g @LStrCatNE�a�g@LStrClrѨ}�g
@LStrArrayClrzY��g@HandleFinallyE�a�ffile�8��gBreak gHigh g
@DynArrayHighE�a�gTObject.Free�G��fPCharruggHalt g@Halt0E�a�g@LStrToPCharf���ceWindows�C�� g
MessageBox��gMB_ICONERROR����gMB_OK���ceUIni/�6A gIniH�� ceUTime/�6A gUSTime����g
TTime.GetTimeh�ceURecord/�6A gSound��Wce DateUtils�C�� ceSysUtils�C�� gIntToStri5�g
FileExists���ceUPliki/�6A gLogPath�:�c4ULog�iif@c4Classes c&.TLog���r *TLog��� � Log��9�^ .2f 4UPliki �c4SysUtils �c4 DateUtils �c4URecord �c4UTime �c4UIni �c4Windows �c( TLog.Free��R� �!Self!. c(TLog.BenchmarkStart��R� 4!Self!Numberc(TLog.BenchmarkEnd��R� <!Self!Numberc(TLog.LogBenchmark��R� a!Self!Textf�!Number
Minutes
Seconds Milisecondsf� MinutesSf� SecondsSf� MilisecondsSf� ValueTextf�c(TLog.LogAnalyze��R� �!Self!Textf� Seconds Miliseconds ValueTextF c(
TLog.LogError��R� �@!Self!Textf�c(
TLog.LogVoice��R� �!Self !SoundNr FileVoiceF FSf� FileNamef� Num BLc(TLog.LogStatus��R� !!Self!Log1f�!Log2f�c(
TLog.LogError��R� P@!Self !Log1F !Log2F c(TLog.CriticalError��R� �!Self!Textf�c(Finalization�E�a� \! c�(ULog� !c��G �F6� � � ,BenchmarkTimeStart",BenchmarkTimeLength$!,
FileBenchmark
!,FileBenchmarkOQ ,FileAnalyze
a ,FileAnalyzeO�, FileError
�,
FileErrorO�,Title�/Free��-BenchmarkStart��-BenchmarkEnd��-LogBenchmark��-
LogAnalyze��-LogError��@-
CriticalError�9-LogVoice��- LogStatus�-LogError�)@cD ����P@ A �L &L (D �D �le"L L ^ � � TLog TLogL ULog SV� �ڋ���T t��� � � ��� t��( � � ��~��� ^[�SV��ء � � �\��^[�SV��ء � � �d��\�H�^[�U��Q� j j Iu�Q�M�SVW���U��؋E�� 3�Uhd d�0d� �U� � �E�| � �� ��T uEƃT � ��E๐ � �U���� � ��� � � ��uƃT ��T �� �D�H� �
� � �E�j j<�D�H� � ���u��E��l�H�5� � ����u��u�U�E�� �E蹰 �U�� ��uV��|Q�U�E�� ��E�M�� � �E�� ��|�U���� �u�h� �u�h� �E� � ���� �U�E�� ��E�M�� � �E�� ��|�U���� ��E��M�� � �E�� ��|�U��� �u�h� �u�h� �u�h �E� � �u�h �u�Eغ � �U؍�� � � � ��� � � 3�ZYYd�hk �E�� �E� � �E�� �� ��_^[��]� ����
-benchmark ����
Benchmark.log zD pB���� miliseconds ���� 0 ���� , ���� seconds ���� : ���� minutes ���� : U����S3ɉM��U��؋E�� 3�Uh� d�0d� � � �x4ux��$ u>� ��E��� � �U���X � ��X � � ��uƃ$ ��$ t(�U���X � � � ��X � � 3�ZYYd�h� �E�� � �� ��[YY]� ���� Analyze.log U����S3ɉM��U��؋E�� 3�Uh� d�0d� ��� uEƃ� � ��E��� � �U���( � ��( � � ��uƃ� ��� t(�U���( � � � ��( � � 3�ZYYd�h� �E�� � �� ��[YY]� ���� Error.log U����SVW3ɉM���3�Uh$ d�0d� � �U���� ��E��M��< � �E�� ��|� �0hH �u�hX �E�� � �E�� ��t C��'
|