������� 3-� ������ ����������: ���

����� ��������� �������� �� ������ ���������� ���������. ����� ������������ ������� - glPolygonMode (�������� �� ������������ ��� ������� � ������ ��������� � � ������ ����� ���� �������� ��������� ������� �� ���� �������).

�������� ������ ���������

������� ���� ��������� � Delphi

������� ������� �� ��������� Book3D

��� ������� ��������� ��������������� ���������� 3 ��������:

1. C������� ����� - OnCreate, � ����������� ����� ������� ��������� ��������� ������ - SetDCPixelFormat(Canvas.Handle) - ������ ������ ������� ��������� � ��������� � ���� �� ������ ���������������� ��������� - procedure SetDCPixelFormat(hdc : HDC) - �� �������� ���������� ��� ������ ������ ����� �� ������������-�������� OpenGL � ������������� ��� ���������. ����� ������� �������� ��������������� - wglCreateContext (Canvas.Handle).
2. �������-����������� OnPaint ���������� �� ���������� �������� �� ����������� - ������� �� ����� ���������� - ���������� ������ ����� ������� - glPolygonMode. ������� ������ ����� ������ �������� (� ����� ������ ������������ ���������� �� ������� �������� 3D ���). ��� ����������� ����� ������ ���������� �������� ��������� ���������. ����� �������� ������ - ���-�� ��� ���-�� ����������� ���� ����� - �� �� ����� ��� ���������� � ����� ��������������� ����� ���� (���� ��� ������� � ������������), �� ���� ����� ����������� ������, � �� ����� ��������� ������� ����� �� ������ ���� �� ������ ����� � �.�. ����� �� ���� ������ ���� ��������� ����.
3. ��� ���������� ���������� ������ ��������� OnDestroy ���������� �������� ��������� ��������������� - wglDeleteContext(hrc).

��� �������� ���� ��������� � Delphi ���������� ��������� ��������� ��������:

1 ������ (�����������):
1. ��������� ����� ��������� ��� ����� ������ � ������� TXT - ��������� / ��������� ��� ��������� - � ���������� ������ ������� "��� �����" ������� "��������� ���� (*.txt)".
2. ������� ���� ����� ��������� ���� � ����� ��������� � ����������� ���� ����� � ����� ������.
3. ��������� Delphi � ������ ����� ������ - ��� �������� ����� ���� �������� �� ���������, ������� ��� �� ������� �������� �� - ��� �����.
4. ������� �� ������� ������� Events � ��������� ������� ������ � ����� OnCreate, OnDestroy � OnPaint. ��� �� ���������� �������� 2 ��������� � ����� ����� ����� - ������ ������������ Standart\ScrollBar � ������ �������� �� ������� ���������.
5. ������� � ������ ��������� Unit1, ������� ��� ���� � �� ��� ����� �������� ����� �� ������ ������, ����� ��������������� ����������� ������ Ctrl+V.
6. ��������� ��� ����� ������ - F9.

2 ������ (�������):
1. ������� ����� ����� - ����� ����� ������ ��� ����� ������. �������� - PR1.
2. �� ����� Book3D\MY_KOD ����������� � ���� ����� ����� PR1 ���������� ����� N13-16 (��� ��� ������ � 13 �� 16).
3. ��������� ����� ��������� ��� ������ Unit1 � ������� TXT � PR1 - ��������� / ��������� ��� ��������� - � ���������� ������ ������� "��� �����" ������� "��������� ���� (*.txt)".
4. ������������� ���� Unit1.txt � Unit1.pas - �� ������ "�������� ����" - "��".
5. ��������� ���� Project1.dpr �� PR1 ��� ��������� Delphi � ������� ������ �� PR1 - Project1.dpr.
6. ��������� ��� ����� ������ - F9.

���� ��� ������� ��������� - �� �������� ��� �� ���������, ��� � � Book3D-���������.