Rambler's Top100
"Knowledge itself is power"
F.Bacon
Поиск | Карта сайта | Помощь | О проекте | ТТХ  
 Подземелье Магов
  
 

Фильтр по датам

 
 К н и г и
 
Книжная полка
 
 
Библиотека
 
  
  
 


Поиск
 
Поиск по КС
Поиск в статьях
Яndex© + Google©
Поиск книг

 
  
Тематический каталог
Все манускрипты

 
  
Карта VCL
ОШИБКИ
Сообщения системы

 
Форумы
 
Круглый стол
Новые вопросы

 
  
Базарная площадь
Городская площадь

 
   
С Л С

 
Летопись
 
Королевские Хроники
Рыцарский Зал
Глас народа!

 
  
ТТХ
Конкурсы
Королевская клюква

 
Разделы
 
Hello, World!
Лицей

Квинтана

 
  
Сокровищница
Подземелье Магов
Подводные камни
Свитки

 
  
Школа ОБЕРОНА

 
  
Арсенальная башня
Фолианты
Полигон

 
  
Книга Песка
Дальние земли

 
  
АРХИВЫ

 
 

Сейчас на сайте присутствуют:
 
  
 
Во Флориде и в Королевстве сейчас  12:11[Войти] | [Зарегистрироваться]

Обсуждение материала
Вывод информации о пакете в Splash
Полный текст материала


Другие публикации автора: Дмитрий Кузан


Важно:
  • Страница предназначена для обсуждения материала, его содержания, полезности, соответствия действительности и так далее. Смысл не в разборке, а в приближении к истине :о) и пользе для всех.
  • Любые другие сообщения или вопросы, а так же личные эмоции в адрес авторов и полемика, не относящаяся к теме обсуждаемого материала, будут удаляться без предупреждения авторов, дабы не мешать жителям нормально общаться.
  • При голосовании учитывайте уровень, на который расчитан материал. "Интересность и полезность" имеет смысл оценивать относительно того, кому именно предназначался материал.
  • Размер одного сообщений не должен превышать 5К. Если Вам нужно сказать больше, сделайте это за два раза. Или, что в данной ситуации правильнее, напишите свою статью.
Всегда легче осудить сделанное, нежели сделать самому. Поэтому, пожалуйста, соблюдайте правила Королевства и уважайте друг друга.



Добавить свое мнение.

Результаты голосования
Оценка содержания

  Содержит полезные и(или) интересные сведения
[1]4100%
 
  Ничего особенно нового и интересного
[2]00%
 
  Написано неверно (обязательно укажите почему)
[3]00%
 
Всего проголосовали: 4

Оценка стиля изложения

  Все понятно, материал читается легко
[1]3100%
 
  Есть неясности в изложении
[2]00%
 
  Непонятно написано, трудно читается
[3]00%
 
Всего проголосовали: 3




Смотрите также материалы по темам:
[Пакеты (BPL, DPK ...)] [Настройка среды (IDE)]

Комментарии жителей
Отслеживать это обсуждение

Всего сообщений: 7

27-02-2012 04:35
Спасибо автору за статью!
В свое время пользовался этой примочкой Delphi, правда был нюанс. Если я помещал сплэш и компоненты в один пакет, то картинка в сплэше не отображалась, приходилось разносить их по разным пакетам. То есть в простейшем случае получалось 2 пакета. Почему так происходило не понял.
 AVR


03-10-2008 14:16
Dron, я имел ввиду, что директива RTLVersion не работает.
А я про что писал?
Ну пусть будет конкретный код, если пример из справки непонятен:

{$IFDEF conditionalexpressions}
  {$IF RTLVersion >= 17.00}
    ToolsAPI, Graphics,
  {$IFEND}
{$ENDIF}

Вот тут ещё был пример:
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=48840

Вывод информации в splash лучше вынести в отдельный unit, а не добавлять в Register какого-то существующего компонента.
Вот с этим полностью соглашусь, тогда и define-ы будут только в uses модуля с регистрацией.
 DRON


03-10-2008 10:06
Dron, я имел ввиду, что директива RTLVersion не работает.
Как альтернативный вариант можно создать файл с названием типа Directives.inc

{$IFDEF VER130}
  {$DEFINE DELPHI_5_UP}
{$ENDIF}
{$IFDEF VER140}
  {$DEFINE DELPHI_5_UP}
  {$DEFINE DELPHI_6_UP}
{$ENDIF}

{$IFDEF VER150}
  {$DEFINE DELPHI_5_UP}
  {$DEFINE DELPHI_6_UP}
  {$DEFINE DELPHI_7_UP}
{$ENDIF}

{$IFDEF VER160}
  {$DEFINE DELPHI_5_UP}
  {$DEFINE DELPHI_6_UP}
  {$DEFINE DELPHI_7_UP}
  {$DEFINE DELPHI_8_UP}
{$ENDIF}

{$IFDEF VER170}
  {$DEFINE DELPHI_5_UP}
  {$DEFINE DELPHI_6_UP}
  {$DEFINE DELPHI_7_UP}
  {$DEFINE DELPHI_8_UP}
  {$DEFINE DELPHI_2005_UP}
{$ENDIF}

{$IFDEF VER180}
  {$DEFINE DELPHI_5_UP}
  {$DEFINE DELPHI_6_UP}
  {$DEFINE DELPHI_7_UP}
  {$DEFINE DELPHI_8_UP}
  {$DEFINE DELPHI_2005_UP}
  {$DEFINE DELPHI_2006_UP}
{$ENDIF}

{$IFDEF VER185}
  {$DEFINE DELPHI_5_UP}
  {$DEFINE DELPHI_6_UP}
  {$DEFINE DELPHI_7_UP}
  {$DEFINE DELPHI_8_UP}
  {$DEFINE DELPHI_2005_UP}
  {$DEFINE DELPHI_2006_UP}
  {$DEFINE DELPHI_2007_UP}
{$ENDIF}

{$IFDEF VER200}
  {$DEFINE DELPHI_5_UP}
  {$DEFINE DELPHI_6_UP}
  {$DEFINE DELPHI_7_UP}
  {$DEFINE DELPHI_8_UP}
  {$DEFINE DELPHI_2005_UP}
  {$DEFINE DELPHI_2006_UP}
  {$DEFINE DELPHI_2007_UP}
  {$DEFINE DELPHI_2009_UP}
{$ENDIF}

И включать его во все модули {$I Directives.inc}, ну и использовать в них {$IFDEF DELPHI_2005_UP}

Автору спасибо за статью. Не хочу показаться занудой, но добавлю пару слов от себя.
1. В комментариях к AddPluginBitmap в исходниках сказано, что изображение должно быть 48x48 однако по факту оно 24x24, если крупнее, то сжимается.
2. Вывод информации в splash лучше вынести в отдельный unit, а не добавлять в Register какого-то существующего компонента.
 Cep


03-10-2008 08:54
Cepгей Poщин
If your code needs to be portable between various versions of Delphi or Kylix, you will need to test whether or not this directive is supported by the compiler. You can surround your code with the following directives:

$IFDEF conditionalexpressions

.          // code including IF directive
.          // only executes if supported
$ENDIF
 DRON


03-10-2008 06:53
Для Varenik:

{$IF RTLVersion >= 17.00}
ToolsAPI, Graphics,
{$IFEND}

В Delphi5, к примеру не работает. Для некоторых это актуально!
 Cep


29-12-2007 01:40
сообщение от автора материала
Логично


28-12-2007 08:37
проще вместо этого
{$IFDEF VER170}      // Delphi 9.0
  {$DEFINE SPLASH}
{$ENDIF}                          

{$IFDEF VER180}      // Delphi 10.0
  {$DEFINE SPLASH}
{$ENDIF}

{$IFDEF VER185}      // Delphi 11.0
  {$DEFINE SPLASH}
{$ENDIF}

Далее в секцию Uses подключим модуль ToolsAPI.pas при условии что версия Delphi 2005 и выше -

Uses Classes,   {$IFDEF SPLASH}   ToolsAPI, Graphics,   {$ENDIF}    
        DesignIntf;
Использовать
{$IF RTLVersion >= 17.00}
ToolsAPI, Graphics,
{$IFEND}






Добавьте свое cообщение

Вашe имя:  [Войти]
Ваш адрес (e-mail):На Королевстве все адреса защищаются от спам-роботов
контрольный вопрос:
Жил-был у бабушки серенький КТО?
в качестве ответа на вопрос или загадку следует давать только одно слово в именительном падеже и именно в такой форме, как оно используется в оригинале.
Надоело отвечать на странные вопросы? Зарегистрируйтесь на сайте.

Оценка содержания
 
Содержит полезные и(или) интересные сведения
 
Ничего особенно нового и интересного
 
Написано неверно (обязательно укажите почему)


Оценка стиля изложения
 
Все понятно, материал читается легко
 
Есть неясности в изложении
 
Непонятно написано, трудно читается

Текст:
Жирный шрифт  Наклонный шрифт  Подчеркнутый шрифт  Выравнивание по центру  Список  Заголовок  Разделительная линия  Код  Маленький шрифт  Крупный шрифт  Цитирование блока текста  Строчное цитирование
  • вопрос Круглого стола № XXX

  • вопрос № YYY в тесте № XXX Рыцарской Квинтаны

  • сообщение № YYY в теме № XXX Базарной площади
  • обсуждение темы № YYY Базарной площади
  •  
     Правила оформления сообщений на Королевстве
      
    Время на сайте: GMT минус 5 часов

    Если вы заметили орфографическую ошибку на этой странице, просто выделите ошибку мышью и нажмите Ctrl+Enter.
    Функция может не работать в некоторых версиях броузеров.

    Web hosting for this web site provided by DotNetPark (ASP.NET, SharePoint, MS SQL hosting)  
    Software for IIS, Hyper-V, MS SQL. Tools for Windows server administrators. Server migration utilities  

     
    © При использовании любых материалов «Королевства Delphi» необходимо указывать источник информации. Перепечатка авторских статей возможна только при согласии всех авторов и администрации сайта.
    Все используемые на сайте торговые марки являются собственностью их производителей.

    Яндекс цитирования