Интернет-журнал 'Домашняя лаборатория', 2007 №4 - Тен
Шрифт:
Интервал:
Закладка:
���.�7.6. ������� ��������� �������� Stretch �� ����� �����������
������������� ��� ������������� ������� ������� ������������ ���� ��������� �������� ������� ��� ���������. ��� ��������� �������� AutoSize ������� Picture � False, � ������ ��� ��� ������������ �� ���������, ������� ������� �� ����� ����������� � ������������ � ��������� ��������. ���� � ���� ������ �������� �� ���������� ������� � ����������� ����, �� ��� ����� �������� (���.�7.7). � ������ �������, ���� AutoSize ����� True, �� ��� ������ �������� �� ����� ������� ������������ ���� ��������� �������� �������� ���������� �����������.
���.�7.7. ������� ��������� �������� AutoSize �� ����� �����������
������������� ��������� ���������� Image � Picture Box �� ��������� ��������� �������������� �����������. ���� � ����� ���������� ���������� ������� ��������� � ����������� �����������, �� ����� ��������������� ����������� OLE.
���� 8. ���� ������ (List box), ��������������� ���� (Combo box),...
...��������� OLE (OLE container), ��������� ���� ������ (Data-bound list box) � ��������� ��������������� ���� (Data-bound combo box). List box � Combo box���� ������ � ��������������� ���� ������ ������������ ����� ���������� ������������ ����������� ������������ �������� ������� �� ������. ����� ����, � ������� ���������������� ���� ������������ ����� �������� ������� � ������, � ������ ������������ Visual Basic ���� ������ � ��������������� ���� ���������� ��������������� .���� � ��� ������� �������� � ��������������� ���� ���������� ������������� ���������� Visual Basic ���� ������ � ��������������� ���� ����������� � ����� ������ ���������� ������� DataSource � DataField.
���������� ������� ���������� ��� ������ ������ Addltem ��� ���������� �������� List.
�������� ������� ���������� ��� ������������ ������������� ������ � ���������������� ������. �������, ��� � ��� ���� ���� ������ PRODUCTS.MDB ��� ����� �������, ������������ ������� ������� PRODUCTS �������� ����, ��� �������� � �������.
��������� ���� Depository ���������� ������� ������ �� ������ � ����� ��������� ������ ���� �� ���� ����� ��� ��� ����.
�������� ����� ������ � ����������� �� ����� ������ ���������� �������, ���� �����, ������ ��������� ����, ��������� ������, ������ � ��������������� ������ ��� �������� �� ���.�8.1.
���.�8.1. ������������ ��������� ���������� �� �����
� ���� ������� ������� Data1 ���������� �������� Caption, ��� �������, ���������� �������� DatabaseName ��� ��� ����� ���� ������ � ��������� ������� ����, ��������, C: WORKPRODUCTS.MDB � ������� � �������� ��������� ������ ��� ������� PRODUCTS ������������ �������� RecordSource. ����� ���������� �������� �����, ��������� ���� � ��������� ������, ������ � ���������������� ������ ��������� �������:
Label1.Caption=��� ������
Label2.Caption=������������
Label3.Caption=����
Label4.Caption=����������� �� ������
Label5.Caption=����������
��mmand1.Caption=��������
Text1.DataSource=Data1
Text1.DataField=Id
Text2.DataSource=Data1
Text2.DataField=Product
Text3.DataSource=Data1
Text3.DataField=Price
Text4.DataSource=Data1
Text4.DataField=Note
List1.DataSource=Data1
List1.DataField=Depository
Combo1.DataSource=Data1
Combo1.DataField=Depository
� ��������� ��������� ������� ������� ������ �������� ���, ������� ������� ������ ������ � ����� ������� � ������� �� �������:
Private Sub Command1_Click()
Data1.Recordset.AddNew
End Sub
� �������, � ���� ������� ������ � ���������������� ������ ���������� �������� List ������� ������ ��� � ����.
��������� ������ � �������� ������ � ���� ������. ������ �������� � ���� Depository ����� ������ ��� ��� ���� � ������� ��� ��������������� ������. ��� ����������� ��������� ������� ������ �� ������ ������� � ��������������� ������ ����� ������������ ��� ��� ���� � ����������� �� ����������� ���� Depository, � �� ����� ��� � ������� ������ �������� ���� ����� ���������� ���������� (���.�8.2).
���.�8.2. ��������� ������ ����������
��������� OLE (OLE container)���������� ������� OLE container ���� ����������� �� ������ ��������� �� �������� ����� ���������� ��������� OLE-�������, ���������� � ���� ������, �� � ������������� ��. � �������� OLE-�������� ���� ��������� ��������: �������, ��������� Microsoft Word, ������� Microsoft Excel, �������� ��������� � ���������� � ������ ������. ����������, ����� OLE-������� �� ������ ����������� ���������� � ����� ���� ������ �����, ��������,