Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.07.30;
Скачать: CL | DM;

Вниз

Delphi не открывает проект   Найти похожие ветки 

 
Darkwing ©   (2006-07-10 10:42) [0]

Я сделал в проекте перед application.create защиту от повторного запуска, основанную на создании filemapping.

 Handle:=CreateFileMapping($FFFFFFFF,Nil,PAGE_READONLY,0,1,AppID);
 hwndPrev:= FindWindow(nil,TitleWindow);
 If GetLastError=ERROR_ALREADY_EXISTS then Begin
  SetForegroundWindow(hwndPrev);
  Application.Terminate;
 end
 else begin
  Application.Initialize;
  Application.Title :=TitleWindow;
  Application.CreateForm(TStrcFrm, StrcFrm);
  Application.Run;
 end;
 CloseHandle(Handle)


но забыл в сразу написать CloseHandle(Handle)

теперь Delphi не открывает проект, пишет

Error in module: call to application.createform is missing or incorrect

че делать?


 
Darkwing ©   (2006-07-10 10:43) [1]

да, кстати комп я перезагружал, что точно должно уничтожить этот мап-файл.


 
Рамиль ©   (2006-07-10 11:01) [2]

ИМХО ошибка вот в этой строчке

> Application.Title :=TitleWindow;

попробуй без нее.


 
Ketmar ©   (2006-07-10 12:34) [3]

а зачем так странно? мутексы не удобней разве?



Страницы: 1 вся ветка

Текущий архив: 2006.07.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.033 c
6-1142861596
RomanH
2006-03-20 16:33
2006.07.30
Параметры SocketConnection во время выполнения программы


2-1152177215
!!!!!
2006-07-06 13:13
2006.07.30
Память


2-1152719554
Geonew
2006-07-12 19:52
2006.07.30
WebBrouser


2-1152028271
aka
2006-07-04 19:51
2006.07.30
Всплывающие подсказки


8-1139413557
Новенький
2006-02-08 18:45
2006.07.30
Тень на канве