[segas]

Доброго времени суток.
Работаю с MDI формами.
подскажите пожалуйста как сделать так чтобы если дочернее окно уже создано то при нажатии на кнопку открывающее это окно оно не дублировалось а становилось активным, если не создано, то создалось.

Заранее спасибо!

[Asinkrit]

Вот функция, которое ищет форму с заголовком, можно и по другим признакам искать.

Код:

function TDM.FindForm(const aCaption: Integer): TForm;
var
  i:integer;
begin
  with Application.MainForm do
  for i:=0 to MDIChildCount-1 do
    if MDIChildren[i].Caption = aCaption then
      begin
      Result:=MDIChildren[i];
      exit;
      end;
  Result:=nil;
end;

Основной смысл в следующем, ищем форму если нашли то на передний план, иначе создаем.

Код:

...
var
  C:TForm
...
  C:=DM.FindForm("Пользователи");
  if  C <> nil then C.BringToFront
    else Application.CreateForm(TUsersForm, UsersForm);
...

[segas]

Очень много ошибок((
Большинство так и не исправил..

[segas]

на сколько я пол BringToFront это активация формы, у меня выкидывает с ошибкой

[Asinkrit]

Это рабочий код, из проекта выдернул, что у тебя за ошибки?

[segas]

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