MDI приложения

[Pacific]

Привет всем. Есть вопрос... Впервые работаю с MDI формами. Создаю несколько форм и храню их названия в ComboBox. Как сделать так, что бы при выборе в Box-е становилась активной нужная форма? В инете нашел код

{
Делаем активным дочернее MDI-окно. Мы должны
послать сообщение Windows API, поскольку
дочернее MDI-окно может реагировать только
на "аварийный" набор системных сообщений.
}
i := ReadInteger( 'Main', 'ActiveMDIChild', -1 )
IF (i>=0) AND (i<MDIChildCount) THEN
POSTMESSAGE( Self.Handle, WM_MDIACTIVATE,
MDIChildren[i].Handle, 0 )

Не пойму при чем тут ини-файл. Прописал код, а он не работает... Подскажите решение, очень надо. За ранее спасибо.

[Баламут]

Как нибудь так...

procedure TForm1.ComboBox1Change(Sender: TObject);
var
  i: integer;
begin
  for i := 0 to Form1.MDIChildCount - 1 do
  begin
    if Form1.MDIChildren[i].Caption = Combobox1.Text then
    begin
     TForm(Form1.MDIChildren[i]).BringToFront;
     TForm(Form1.MDIChildren[i]).WindowState := wsNormal;
    end;
  end;
end;

[MalexG]

Если все создаваемые формы одного класса, то рекомендую при добавлении в выпадающий список кроме имени формы (или условного наименования) добавлять объект формы. Поясню на примере:

MyForm = class (TForm)
...
end;

Combobox.Items.AddObject(MyForm.Cap tion, pointer(ActiveMDIChild as MyForm));

для обратного преобразованиея используйте приведение объекта к типу формы:

MyForm(Combobox.Items.Object[Combobox.ItemIndex])

Рекомендую почитать литературу: Стив Тексейра и Ксавье Пачеко. Delphi 5. Руководство разработчика. в 2-х т.