Интернет-журнал 'Домашняя лаборатория', 2007 №3 - Вудворт
Шрифт:
Интервал:
Закладка:
� ��������� ���� ������� �����, ����������� API[10]. �������� ��, ����� ������ ������ �� ���� ������ �������.
��������� ������ ���������. ��������� ����������� ��������� �������� � ��������, ���������� ������� �� "�������� ���",�� ������ ������ ������� � ������, ������� ������ ������ ��������� � ������ ��� ����� ����, ����� ����, ������� ������ ������������ ��� ������. ��� ����� ���� � ����� ������ ���������� ���������� ������ �������� ���� �� ���������, �� � �� �� ������. � ���� �� �������� ������� ������ ������ ����.
��� ������ ����� ����������� ���� ��� � �������� ��� ������ � ������������������ �������� �������, �������� �����������. ����� ������� ����������, ����� ������ � ����� �������� ������������ ������� ���������, � �����, ��������, ���� �������� ��� ������ �������� ��� � �������� ����������������� � ��������� �� ��������.
����� ���� ������, � ����� ������� ��������� ����� �������� � ��� ������ Word, ��� ��������������� ������ Word ��� ��� ������� ��������? ���� ��������� ������������� ��� ������������� ������� ������������ �������� � �� �������� � ������� ���������, �� �� ����� ����� ��������� � �������� Word. ��� ������������� ��� ����� ����� ������� � ��������� ���������. ���� ��������� ���-�� ��������� ����� ������� ���������, ������� ���� ��������� �������� �� ���� (� �������, ��������� ��� ��������� �������������� ��������������� ��������), �� �� ����� �������� ��� ������ � ��������� �� ��� ������ ���������, � ����� ��� ��� ��������� ��������� ����������� � ������� ���������. ��, � ���� ��������� ��������� �����-������ ��������� �������� � �������, ��������� ��������� ��� �������� � ������� ����������� �����, �� ����� �� ������ ������ � ����� ��������������� ������ Word.
����� ���������� ������� �������� � ����������. ��� ����� ��������� ������ �������� ������������ ������� � ������ ��� ������� ���� Word, � ����� � ������� ����������� ���� Word "�����������" ("������ � ������ � ������� � �����������" ��� "������ � ������� � ����������-�����������") � ���� ���������� ��� ������� ���������� ��������� �� ������� ��� ���������, ��� ������ ����������. �������� ����������� ��� �����-������ �������� ������.
�, �������, �������� ������ ������ ���������. ����� � ������� ����������� ���� "������ � ��������� � ������� � �������" ��������� ������� ����� ���� ��� ������ �� ����������� ������ ����� �������� ��������������. ����� ��� �� ��������� ��� ���������� ������ ��� ������. � �����, ��� ��������� ������ ���������, ������� ����� ������ ������������ � ��� �� ��� ��������� ������ ��� ������ ��������. ���� ������ ��������� ��� ��������� ������ � ��������� � ���������, � �� � ����� Normal.dot ��� ���-������ ���.
� ���� "������-���������-�������-�������" �������� ������� ������� ������������ ���: ������� ������� ��� ������� (��� ����� ���������� � �������� � ���� ������� ��������� VBA, ������� ����� �������� ������� �������), ����� � ��� ��� ������ (���� ����� �������� � ���� �������, ������� ����� �������� ������), � ����� � ���������� ��� ������� (��, ��� ����� ����� ������� ������ ��������� Sub).
��������� ������ ��� ��������� ������ ��� ������ ����� ����������. ���������� �������� ������� ������ ����� ("��������. Show") � ����� ��������� � ������, � ��� ����� ��������� ������ ��� ��������� ������ ��� ������ ������ ���� ���������.
��� ������ ��������� ����� ������ ������������ ������ � ��������. ��� ����� ����� ����� ���� ���������� �������� ������� ������� �� ���� "���������" �� �����-������ (����� ���������� ���������) ������ ������������, � ����� ������� ������ ��� ������ � ������ ����� ����������� � ����� ����� ��� ������, "�������� �����".
����� ����� �������� �� ������ ����� � ��������� �������, ������ ����� ���� ����� ����� �������������� ���������������. ����� �������, ��� ��� ���������� ������� ���� � ������, ���������� ������, ������������ ����������� ��������� � ��������� ������� (������� �������� ������� ����� ������� ������ ��������� Sub), ������� �������� ������� ������ ����������� �����. ������ ���� ������ ������ ��-������, �� � ���������������� ������� Word �� �� ����� ���������� �������, ��������� � ������� ������.
����������� ��������� ������ ����� ������ �������������� � ������� ������� "CommandBars("��� ������").Controls("����� ������ �� ������").TooltipText = "����� ���������"". � ���������, ����� ���������� ���� ��������� ������� � ������ ������� ��� �� �������, ������� ��� ����� ���� ������� �������� ������������ ��������� ������ ��� ���� �������.
��� ����� �� ����������� ������ ������������ ����� ������� ��� ������, ������������ Word'��. ���� �����, ���������� �� ���� "������� ������ ��� ������" � ������ ��������� �������, �������������, �������. �� ����� �� ������ � ������� ������ ������ ���� �� ���� ����������� ������ � ����� ������ ������ �� ����� ������ ������ ��� ������� ��� ������ �� ���������� ��������� ����������� �� �������. ����� ����, �������� ������ ����� ������� �� "����" Office,�� � �� �������� � ���� ����� ���� ����� ������������� �������! ��� ����� ���������� ������ � ���� ������� �������
CommandBars("��� ������������ ������ ������������").Controls.Add(����:=msoControlButton, ID:=797).Faceld = �
��� � � ����� ����� �� 1 �� 3000. ����� �� ��������� � ������� ������ ����� ������� ������ �� �������, ������� ����� ����������� �� ���� ������. �� ��� ���� ����� ���������� ������, ������� ������ ��������� ����� ������� ������ ����� ������,�� ���������� ��� ��� � ������ �[11].
���� � �������� ������� ������ ������� ������� ������ ������������ � ��������, �� ����� ��������� ������ ��� ��� ����� ��������� �������� ������ ��������� � ����� ����������� ��� ���������� ��������� � ����� �������� ������ � �������. ����� �������������� �������� ����������� ��������� ������ ����� � ����������, ��� ��� ���������� ������ � Office ��� �������������� �������� ���� � ���������� ������ ������������� � �������� � �� ��������-���� ���. �������, � OfficeXP ������ ������������ ��� �����������.
�� ����� �������� � �� ������������� ����������� ��� ������������, �������� ���� ��������� ����� ���������������� ����� ��������. ����� ����� ����� ����������� �������� � ��������� ��������� ����� ���, ���� ��� ����� ������� �����, � ���� ������ ��������� html-����������.
�������� ������