Эта серия, написанная в период с 1988 по 1995 года и состоящая из шестнадцати частей, является нетехническим введением в конструирование компиляторов. Серия является руководством по теории и практике разработки синтаксических анализаторов и компиляторов языков программирования. До того как вы закончите чтение этой книги, вы раскроете каждый аспект конструирования компиляторов, разработаете новый язык программирования и создадите работающий компилятор

Книга «XHTML: учебный курс» позволит вам изучить основы языка XHTML. Новая спецификация сравнивается с самой популярной среди пользователей версией языка разметки — HTML 4, описываются инструменты, необходимые для создания документов при помощи нового языка. Вы познакомитесь со способами построения web-страниц, которые позволяют включать в документ изображения, таблицы, фреймы, научитесь применять каскадные стили и расширяемые таблицы стилей, освоите XHTML Basic и модульное конструирование документов.

Содержание:
1. Физика цвета
2. Цвет и цветовое воздействие
3. Цветовая гармония
4. Субъективное отношение к цвету
5. Цветовое конструирование
6. Двенадцатичастный цветовой круг
7. Семь типов контрастов
8. Контраст цветовых сопоставлений
9. Контраст светлого и темного
10. Контраст холодного и теплого
11. Контраст дополнительных цветов
12. Симультанный контраст
13. Контраст цветового насыщения
14. Контраст цветового распространения
15. Смешение цветов
16. Цветовой шар
17. Созвучие шести цветов
18. Форма и цвет
19. Пространственное воздействие цвета
20. Теория цветовых впечатлений
21. Теория цветовой выразительности
22. Композиция

У меня есть форма с расположенными на ней компонентами TreeView и Memo. Значение свойства align обоих компонентов позволяет им занимать всю форму. Я хотел бы расположить между ними движок типа Splitter, пропорционально меняющий их размеры (один шире, другой меньше и наоборот). Какой компонент мог бы симитировать поведение Splitter и как это реализовать?

---

Предположим, Ваш TreeView расположен в левой, а Memo в правой части формы. Вам нужно сделать следующее:

* Установите свойство Align компонента TreeView на alLeft.
* Вырежьте (Ctrl-X) компонент TMemo из вашей формы.
* Добавьте компонент Panel и присвойте его свойству Align значение alClient.
* Внутри панели разместите другой компонент Panel.
* Установите его ширину, равной 8 пикселам, свойству Align присвойте значение alLeft.
* Скопируйте вырезанный компонент TMemo в панель Panel1 и присвойте свойству Align значение alClient.

Код может быть модифицирован для получения горизонтального движка - идея, надеюсь, будет вам понятна.

Panel2 - движок: теперь вам необходимо добавить процедуры, приведенные ниже. Ваш код будет выглядеть приблизительно так:

Код

type

TForm1 = class(TForm)
TreeView1: TTreeview;
Panel1: TPanel;
Panel2: TPanel;
Memo1: TMemo;
procedure Panel1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure Panel1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure Panel1MouseMove(Sender: TObject; Shift:TShiftState;
X, Y: Integer);
private
Resizing: Boolean;
public
...
end;

procedure TForm1.Panel2MouseDown(Sender: TObject; Button:

TMouseButton; Shift: TShiftState; X, Y: Integer);
begin

Resizing:=true;
end;

procedure TForm1.Panel2MouseUp(Sender: TObject; Button: TMouseButton;

Shift: TShiftState; X, Y: Integer);
begin

Resizing:=false;
end;

procedure TForm1.Panel2MouseMove(Sender: TObject; Shift: TShiftState;

X, Y: Integer);
begin

if Resizing then begin
TreeView1.Width:=TreeView1.Width+X;
// Предохранение от странных ошибок перерисовки при изменении размеров:
Panel1.Invalidate;
end;
end;