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

Вниз

Возможно ли в Делфях сварганить а-ля WinXP интерфейс ?   Найти похожие ветки 

 
KLOP   (2002-10-12 08:54) [0]

Хочется такого же интерфейса в своей маленькой программке


 
Cr@sh   (2002-10-12 09:17) [1]

ХР-шные компоненты чтоли нужны?
ElPack www.eldos.org


 
pirat   (2002-10-12 12:25) [2]

Там что-то ничего похожего в разделе For Developers нету..
Наверное все таки мелось в виду как съимитировать интерфес XP на Delphi под Win98 , я прав?


 
KLOP   (2002-10-13 11:50) [3]

Нет, у меня стоит XP, но желаемо чтобы когда наводишь мышу на элементы меню они подсвечивались голубым цветом с синей каемочкой, как в XP-Office. Ну и прочие фишечки.


 
Cr@sh   (2002-10-13 11:58) [4]

В ElPack это все есть, только вот в последнем релизе, они сделали появление окошка, если не запущен Делфи.


 
Paul 'Spawn' Rysevets   (2002-10-13 16:45) [5]

Я искал как Использовать стили ХР. без использования Дополнительных компонентов.
Вот что у Меня Найдено, Но полностью Корректно у Меня ни то ни другое не работает(у меня, с начальной формой все - ОК, а Дальше....Runtime Error):
На Английском и Вроде Обновляется: http://www.lischke-online.de/ThemeManager.html
или от Русских Юзеров: Copyright 2002/ Компьютерная Газета

Delphi 5. Создание XP-тем

Когда вы создаете приложение и работаете с ним в операционной системе Windows XP, ваша программа не отображается, как все остальные системные окна, то есть она не поддерживает визуальные стили, введенные в употребление в этой операционной системе.

Дело в том, что визуальные стили Windows XP не включаются автоматически в проект вашего приложения. Как-то мне пришлось столкнуться с этой проблемой, и так как мной не было найдено толкового руководства или описания по этой проблеме, пришлось раскапывать эту тему самому. Предлагаемый в статье способ поможет разработчику продвинуться в этом направлении, но не может претендовать на право называться идеальным, так как использование влечет за собой изменение вида только основных элементов управления на форме, но никак не всех.
Как работает этот способ? А очень просто. Операционная система при запуске приложения ищет определенный ресурс для запускаемого файла, который представляет собой описание свойств элементов управления. В этом файле содержится информация о том, как должна ОС рисовать форму и все ее элементы.
Для этого нам понадобятся два файла. Первый, его надо назвать XpXML.txt, содержит собственно описание, что и как рисовать. Второй файл — XpRes.RC, вспомогательный, просто помогает нам включить вышеописанный ресурс в проект приложения на Delphi. Первый файл помещаем в папку с файлами проекта программы и заносим туда такие строки:
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
<assemblyIdentity
name="Hacx.Simple.Xp.Resource"
processorArchitecture="x86"
version="1.1.0.0"
type="win32"/>
<description>Windows Shell</description>
<dependency>
<dependentAssembly>
<assemblyIdentity
type="win32"
name="Microsoft.Windows.Common-Controls"
version="6.0.0.0"
processorArchitecture="x86"
publicKeyToken="6595b64144ccf1df"
language="*"
/>
</dependentAssembly>
</dependency>
</assembly>
Думаю, ничего особенно по приведенному коду говорить не надо, он будет понятен даже непосвященному в язык XML. Впрочем, такие поля, как name, version, description, вы можете изменять по своему усмотрению — они не влияют на внешний вид приложения. Если есть желание, можно указать там и себя, любимого, как автора файла. Ключ publicKeyToken имеет тут очень большое значение, так что не стоит менять его значение с "6595b64144ccf1df". В случае особой любознательности можно зайти на http://msdn.microsoft.com, ввести в поле поиска строку "6595b64144ccf1df" и прочитать, что по этому поводу думают спецы, эту штуку придумавшие;-).
Теперь займемся вторым файлом. Это будет проще простого — впишите в файл строку следующего содержания: "1 24 XpXML.txt". Естественно, без кавычек;-). Что означает эта строка? "24" это общий знак, принятый Microsoft как директива, которая информирует операционную систему о том, что данное приложение поддерживает темы. Далее идет имя файла, где же ОС должна найти всю необходимую информацию.
В общем, вот вся работа и сделана. Осталось только поместить (если вы еще это не сделали) оба файла в каталог с вашим проектом, с помощью меню Add to Project в Delphi IDE включить файл XpRes.RC в проект программы. Теперь делаем Build, запускаем приложение и радуемся новому приятному виду формы. Так, например, я тестировал вышеописанный метод на форме с двумя кнопками и компонентом TListView с колонками. Очень, знаете ли, ничего выглядит. По крайней мере, не так выделяется угловатая форма среди остальных закругленно-зализанных изысков от "мальчика Билли, который очень любил деньги" (с) Остров Сокровищ.
В ходе дальнейших экспериментов было установлено, что, к сожалению, не все рабочие элементы формы отображаются в новом виде. Так, проблемы могут возникнуть с компонентом TDBGrid по непонятным причинам. Ключ к этой проблеме ищется, и вы первые узнаете о прорыве в исследованиях;).

Денис Мигачев АКА Denver



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

Форум: "Основная";
Текущий архив: 2002.10.24;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.009 c
1-78400
BJValentine
2002-10-15 13:06
2002.10.24
Дата+время


7-78695
TsaturSoft
2002-08-13 22:20
2002.10.24
Иконка каталога


4-78734
EndDie
2002-09-10 12:43
2002.10.24
ReadProcessMemory


3-78214
lak_b
2002-10-04 14:49
2002.10.24
:)


7-78685
Grig
2002-08-15 15:08
2002.10.24
как сделать прогу демонстрационной





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский