blob: 8098a1879804b00d2998bf4235af5448dc644ef0 (
plain) (
tree)
|
|
� y
�u6/�6A � <pClasses\ULCD.pas �}5 dSysInit�C�� cdSystem�C�� fTObject���_fBooleanW~8f
AnsiString���fString���fInteger���
fByte7c�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��gInc gLength g@LStrLen��gOrd g@LStrAddRef��jg@LStrClrѨ}�g@HandleFinallyE�a�g@ClassCreate���g@AfterConstructionڿ%UgTrue����gPos g@LStrPosE�a�gCopy g @LStrCopyE�a�gDelete g@LStrDeleteE�a�g
@LStrArrayClrzY��g@InitializeArrayBB��g @LStrLAsg�4�g@FinalizeArrayBB��g@LStrCatE�a�ceUTime/�6A g TimeSleepϨ%�cezlportio/�6A g
zlioportwrite��G�ceSysUtils�C�� gSleeps�ydc4ULCD�iif@c*.2�����&.TLCD� �h� *TLCD�9�� LCD�GYD%Data���� �
%Status���� �
%Control���� �
.3f 4SysUtils Xc4zlportio Tc4UTime Pc(TLCD.WriteCommand�.��3 �!Self !Bc(TLCD.WriteData�/��3 u!Self!Bc(TLCD.WriteString�0��3 �!Self
!Sf� I
c(TLCD.Create�2��3 @!Self !.c(TLCD.Enable�3��3 j!Self A B c(
TLCD.Clear�4��3 �!Selfc(TLCD.WriteText�5��3 �!Self!Line
!Sf�c(TLCD.MoveCursor�6��3 �!Self!Line
!Pos
I
c(TLCD.ShowCursor�7��3 !Self c(TLCD.HideCursor�8��3 !Self c(TLCD.AddTextBR�9��3 �!Self!Sf� Wordf� W
P
L
c(TLCD.MoveCursorBR�:��3 �!Self!Pos
I
L
cj*.4 k(TLCD.ScrollUpBR�;��3 !Self Tf� SP
LBR
c(TLCD.AddTextArray�<��3 �!Self!Line
!Sf�c(Finalization�E�a� \! c�(ULCD� !c��L(0^G �F6b `` � ,Enabled ,Text ,StartPos
@,LineBR
H,Position
P-WriteCommand �t- WriteData �z-WriteString �,
HalfInterfaceX.Create�-Enable�-Clear�- WriteText�-
MoveCursor�-
ShowCursor�-
HideCursor�- AddTextBR�-MoveCursorBR��-
ScrollUpBR��-AddTextArray��cD ���D ����P@ A �L((� D �D
�li
.2 L L ^ 0 TLCD TLCDL ULCD S�ڀx, u7� 3Ҹz � 3Ɋ�3Ҹx � � 3Ҹz � � � 3Ҹz � �ˀ����� 3Ҹx � � 3Ҹz � h���?h����� � 3Ҹz � 3��Ë������ 3Ҹx � � 3Ҹz � ��t��u j� [�h���?h����� [�SV�ڋ��~, u7� 3Ҹz � 3Ɋ�3Ҹx � � 3Ҹz � � � 3Ҹz � �ˀ����� 3Ҹx � � 3Ҹz � h���?h����� � 3Ҹz � 3��Ë������ 3Ҹx � � 3Ҹz � h���?h����� �F(^[�U��QSVW�U����E�� 3�Uh] d�0d� �E�� ��~� �E��T0���� FKu�3�ZYYd�hd �E�� �� ��_^[Y]Ä�t���� ��t� d� ���S���C�{, u�8��� [ò3��� �2��� �(��� [�S�{ tP���� ���� �C� �C� �C� �C� �C� �C� �C �C$ [�U��QSV�M���؋E�� 3�Uhq d�0d� �{ t2��� ��� �U���� �D�� �M���� 3�ZYYd�hx �E�� �� ��^[Y]�SVW���{ tJJ�������;{(}���� ��N��~���� Nu�C(;�~��+���~���� Nu�{(_^[Àx t�� Àx t�� �U����SVW3ɉM��U����E�� 3�Uh d�0d� �~ �� �F$���� �؋U��0 � ������ � �Ӌ�� � �E�P�Ϻ �E�� �D�� P�E�� Z�J��~C��� �Ӌ�� ����
�U���� �M��Ӌ�� �E��Ϻ � �U��0 � �������s���C�^$3�ZYYd�h �E�� � �� ��_^[YY]� ���� SV��{ tK�C H+��C� ;��κ ��� �C� ;�~�C� +���� �κ ��� ^[�
.4 U����SVW�ع �E� � 3�Uh� d�0d� �{ �� �E�S� �E��S� �E�S� �E��S� �E��S� �C� ��s �{$��� �s �M� ��� �M� ��� �M�� ��� �M�� ��� �M�� ��� O�{$3�ZYYd�h� �E� � � �� ��_^[��]�U��QSV�M���؋E�� 3�UhK d�0d� �{ t�D��U�� 3�ZYYd�hR �E�� �� ��^[Y]�U��3�Uh% d�0d� � 3�ZYYd�h, �� ��]Ã- �ma ^ ^ ` ``(` "$^b b`t,V V"V,V.V"VR"V6V"V"Z"Rz2V V"V,V.V"VR"V6V"VR� .�*2z"�02�46�$tttt�tt000000(�".�>��0��02�Dt t6t�t
�t
�..�L�
<2�0@**:�(��D�
<@�F26�,*$�**��� � �*
H�6JJJJJ*�$�����"�
L2�".�0N�02��l�2l�9`I" ,".""6"" ,".""6"D&�@>F
R
��R&&6
�$L*.XXFRf �� � 0��� b b b b b b
t \b z �b � �b b "� &$�b $� (&�b &� *(�b (� ,*=b *� .,qb ,� 0.�b .� 60�b 0� 86�b" 6� :8�b$ 8� <:�b& :� ><]b( <d Df Jh Lj Nv 0x \| ~ �� %� �� �� � ܔ ޘ � � =� =� �� q� q� y� %� %� � �� � �
� � C�� �� �� �� � �� �� � � ]� ]� y��t` xv v�x=�z� 0 |~~Z�~�~��|i��` p2�D
�j������� �@ ��f��@ �����` 02�F�F�������� p ��
��0��������@ � ���@ � ���� p2�R����
�u���
����}��}��` 0 ��Į�Ʈ�( p2�X����
���������` 02�F�Fڤ�ܤ�� a
|