Вниз
Скачать: CL | DM;

Неправильно форматируется файл проекта   Найти похожие ветки 

 
картман ©   (2009-11-25 17:01) [0]

Всем привет!
Задолбал dpr-файл:

begin
 if InitInstance then
 begin
   Application.Initialize;
   Application.Title := "Îáðàùåíèÿ ãðàæäàí";
   Application.CreateForm(TfMain, fMain);
 Application.CreateForm(Tdm, dm);
 Application.CreateForm(TfMainInformation, fMainInformation);
 if not dm.OpenDB then
     fMain.Close;
   Application.Run;
 end;
end.

Почему? Если все выровняю, при следующем открытии(может и не следующем, но обязательно) опять форматирование слетит. Что за артефакт?


 
Игорь Шевченко ©   (2009-11-25 17:05) [1]


> Что за артефакт?


dpr не рекомендуется править руками (в справке написано), чему ты удивляешься ?

можешь переписать среду, если тебя что-то не устраивает


 
картман ©   (2009-11-25 17:30) [2]


> Игорь Шевченко ©   (25.11.09 17:05) [1]


> можешь переписать среду, если тебя что-то не устраивает

все устраивает - не понятно, зачем она пробелы удаляет?


 
clickmaker ©   (2009-11-25 17:33) [3]

я бы написал так

if not InitInstance then Exit;
...
Application.CreateForm(Tdm, dm);
if not dm.OpenDB then Exit;
Application.CreateForm(TfMain, fMain);
Application.CreateForm(TfMainInformation, fMainInformation);
Application.Run;

тогда пофиг на форматирование )


 
Игорь Шевченко ©   (2009-11-25 17:44) [4]


> все устраивает - не понятно, зачем она пробелы удаляет?


а она не любит, когда написано что-то перед Application.Initialize


 
картман ©   (2009-11-25 18:48) [5]


> clickmaker ©   (25.11.09 17:33) [3]

ну, можно и так...


> Игорь Шевченко ©   (25.11.09 17:44) [4]

(слезно, трагично)
- Но почему?


 
Игорь Шевченко ©   (2009-11-25 19:17) [6]

картман ©   (25.11.09 18:48) [5]

Потому что среда не компилятор и не может знать, что в dpr понаписано не ей



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.016 c
15-1258984807
Unknown user
2009-11-23 17:00
2010.01.31
Кнопка Favorites в диалогах Open/Save в Windows XP


15-1258961960
Palladin
2009-11-23 10:39
2010.01.31
Простенький NAT сервер под Windows XP


2-1260213754
indiegod
2009-12-07 22:22
2010.01.31
Delphi + Excel


2-1260352002
Жужузу
2009-12-09 12:46
2010.01.31
Запутался в объектах


3-1233936148
Moron
2009-02-06 19:02
2010.01.31
Нужна порощь




   Наверх