Главная страница
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.051 c
15-1151432483
JUS
2006-06-27 22:21
2006.07.30
Модераторам


15-1151075086
Megabyte
2006-06-23 19:04
2006.07.30
Ускорение запросов


2-1152258778
Homo Sapiens
2006-07-07 11:52
2006.07.30
Открыть с помощью...


15-1150989285
k2
2006-06-22 19:14
2006.07.30
Ситуйены модераторы, в Базах балуются


15-1151951015
Ketmar
2006-07-03 22:23
2006.07.30
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1151946511&n=18