Главная страница
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.028 c
15-1150692824
Иксик_без_пароля
2006-06-19 08:53
2006.07.30
Сколько стоит доллар в обменниках Москвы?


15-1151384777
Ega23
2006-06-27 09:06
2006.07.30
С Днём рождения! 27 июня


15-1151518964
Rial
2006-06-28 22:22
2006.07.30
Пересечение треугольников.


8-1139492971
AlexeyMir
2006-02-09 16:49
2006.07.30
Есть музыкальный диск, как из трэка вырезать кусок, сохранить в w


1-1150156552
кактусбел
2006-06-13 03:55
2006.07.30
Смена языков интерфейса при помощи xml