Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2008.04.20;
Скачать: [xml.tar.bz2];

Вниз

Показать сообщение во время компиляции проекта.   Найти похожие ветки 

 
@!!ex ©   (2008-03-03 17:44) [0]

Нужно, чтобы при нажатии на f9 вываливался MessageBox с указанным сообщение.
Как сделать?


 
TIF ©   (2008-03-03 17:54) [1]

чо??????? ваще не понял.. от Delphi что-ли ?!


 
Palladin ©   (2008-03-03 17:55) [2]

ну ты выдумщик... :)


 
@!!ex ©   (2008-03-03 18:04) [3]

Задача такая:
Есть проект, для разных паблишеров, он немного отличается,
чтобы не делать кучу проектов, сделал все через DEFINE.
Проблема в том, что я не помню, какой DEFINE сейчас установлен.
Было бы очень удобно, если бы при компиляцц, в зависимости от установленных дефайнов появлялось сообщение.
Например:
{$IFDEF ALAWAR}
{$MESSAGE Publichee: Alawar}
{$ENDIF}

{$IFNDEF ALAWAR}
{$MESSAGE Publicher: MPC}
{$ENDIF}

{$IFDEF EGOSET}
{$MESSAGE Publicity: ON}
{$ENDIF}

{$IFNDEF EGOSET}
{$MESSAGE Publicity: OFF}
{$ENDIF}


 
Рамиль ©   (2008-03-03 18:06) [4]

трудно держать открытым один файлик с четырьма дефайнами?

или от склероза что нибудь попить ;-)


 
Petr V. Abramov ©   (2008-03-03 18:15) [5]

посмотри файл ToolsAPI.pas
там много интересного.

чтобы при нажатии на f9 вываливался MessageBox проще простого. А вот достать дефайны - не знаю, наверное, лезьть в cfg или dof


 
Palladin ©   (2008-03-03 18:19) [6]


> @!!ex ©   (03.03.08 18:04) [3]

думаю препроцессор спасет ОРД


 
Kolan ©   (2008-03-03 18:27) [7]

А мож тупо глупо в FormShow написать:

{$IFDEF ALAWAR}
 S := "ALAWAR"
{$ENDIF}

{$IFDEF EGOSET}
 S := "EGOSET"
{$ENDIF}

//Ну или как там правильно расставить иф деф"ы

ShowMessage(S);


И се. правдо не при компиляции, но почти&#133


 
Mystic ©   (2008-03-03 18:29) [8]

> А мож тупо глупо в FormShow написать:

Тогда уже Version Info


 
@!!ex ©   (2008-03-03 18:36) [9]

> трудно держать открытым один файлик с четырьма дефайнами?

Дефайнов не 4.
ОТкрытых файликов десятка два... И вообще мелочей, которые требуют запоминания - слишком много, что нить, да упустишь. Зачем? Если можно автоматизировать или напомнить.

> [5] Petr V. Abramov ©   (03.03.08 18:15)

Открыл... Полнов всего...
Ничего не понял... Куда копать то??


> думаю препроцессор спасет ОРД

Понятно что спасет, вопрос как его просить надо...

> [7] Kolan ©   (03.03.08 18:27)

Так и сделал.. Пока самый подходящий вариант.


 
Palladin ©   (2008-03-03 18:46) [10]


> Понятно что спасет, вопрос как его просить надо...

ну препроцессор то твой будет, а просить ты его будешь по f9, тебе в [5] уже crазали...


 
Семеныч   (2008-03-03 18:46) [11]

> @!!ex ©   (03.03.08 18:36) [9]

> Куда копать то??

См. интерфейс с методом BeforeCompile. Нужно написать эксперт IDE, а в нем реализовать этот метод. Эксперт помещается в design-time пакет и регистируется в IDE.



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

Форум: "Прочее";
Текущий архив: 2008.04.20;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.059 c
15-1205124920
xVlad
2008-03-10 07:55
2008.04.20
Си в delphi


2-1206429605
Armond
2008-03-25 10:20
2008.04.20
DBGrid


15-1204555457
@!!ex
2008-03-03 17:44
2008.04.20
Показать сообщение во время компиляции проекта.


15-1204730152
dmitry_12_08_74
2008-03-05 18:15
2008.04.20
Требования к курсорам для совместимости с разными версиями Window


15-1204791647
DiamondShark
2008-03-06 11:20
2008.04.20
Ура! Это всё-таки случилось.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский