Нужен совет

[Михаил Юрьевич]

Программа запускается с автозапуска,минимизируется в трее и оттуда работает,в OnCreate обрабатываю две процедуры:
OnlyOne;{Процедура для проверки запуска второй копии}
Application.ShowMainForm:=false;

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

[SERG1980]

на проверку запуска второй копии можешь попробовать так
в проекте *.dpr

program MyProga;
uses
  Forms,
  windows,
  controls,
  ....//твои юниты
{$R *.res}
var
  hwnd: THandle;
begin
  hwnd := FindWindow('TMainForm', 'Моя прога');//'Моя прога'-это заголовок формы
  if hwnd = 0 then
  begin
  Application.Initialize;
  Application.Title := 'Моя прога';
  Application.CreateForm(TMainForm, MainForm);
  Application.Run;
  end;
end.

[Квэнди]

Михаил Юрьевич
последнее китайское предупреждение за название темы.
закрыто