<?xml version='1.0' encoding="utf-8"?>
      <rss version='2.0'>
      <channel>
      <title>Форум на Исходниках.RU</title>
      <link>https://forum.sources.ru</link>
      <description>Форум на Исходниках.RU</description>
      <generator>Форум на Исходниках.RU</generator>
  	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=687618</guid>
        <pubDate>Tue, 19 Apr 2005 10:29:07 +0000</pubDate>
        <title>Поддежка тем XP</title>
        <link>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=687618</link>
        <description><![CDATA[Molder: Про то как использовать XPшный интерфейс я писал вот здесь <a class='tag-url' href='http://forum.sources.ru/index.php?showtopic=44607' target='_blank'>Манифест</a><br>
<br>
Это оттуда:<br>
<br>
1. В свойствах проекта надо поставить Startup Object: Sub Main<br>
2. Создать модуль<br>
3. В нём написать<br>
<br>
<div class='tag-code'><span class='pre_code'></span><div class='code  code_collapsed ' title='Подсветка синтаксиса доступна зарегистрированным участникам Форума.' style=''><div><div><ol type="1"><div class="code_line">Public Type tagInitCommonControlsEx</div><div class="code_line">lngSize As Long</div><div class="code_line">lngICC As Long</div><div class="code_line">End Type</div><div class="code_line">&nbsp;</div><div class="code_line">Public Declare Function InitCommonControlsEx Lib &quot;comctl32.dll&quot; (iccex As tagInitCommonControlsEx) As Boolean</div><div class="code_line">&nbsp;</div><div class="code_line">Public Function InitCommonControlsVB() As Boolean</div><div class="code_line">On Error Resume Next</div><div class="code_line">Dim iccex As tagInitCommonControlsEx</div><div class="code_line">iccex.lngSize = LenB(iccex)</div><div class="code_line">iccex.lngICC = 512</div><div class="code_line">InitCommonControlsEx iccex</div><div class="code_line">InitCommonControlsVB = (err.Number = 0)</div><div class="code_line">On Error GoTo 0</div><div class="code_line">End Function</div><div class="code_line">&nbsp;</div><div class="code_line">Sub main()</div><div class="code_line">InitCommonControlsVB</div><div class="code_line">Load Form1</div><div class="code_line">End Sub</div></ol></div></div></div></div><script>preloadCodeButtons('1');</script><br>
где Form1, имя формы, которая должна загружаться при запуске проги. Если надо чтобы она показывалась, то вместо Load Form1 надо написать Form1.Show<br>
<br>
4. Компилим как обычно.<br>
5. Всё, вшиваем в скомпилиный EXE&#39;шник манифест. Можно ResHacker&#39;ом используя *.res файл или PeExplorer&#39;ом, он вобще всё автоматом делает, кому чё по душе. PeExplorer будет грозно ругаться что типа комонконтролы не инициализированны и т.д. но на самом деле всё работает.<br>
<br>
Плюсы этого метода заключаются в том что не надо добавлять компонент Windows Common Controls 5.0 и режим совместимости тоже ставить не надо. А *.res файл вот... <br>
<br>
PS Кстати может это стоит в фак добавить?]]></description>
        <author>Molder</author>
        <category>Формы, окна, диалоги, десктоп</category>
      </item>
	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=687542</guid>
        <pubDate>Tue, 19 Apr 2005 09:43:45 +0000</pubDate>
        <title>Поддежка тем XP</title>
        <link>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=687542</link>
        <description><![CDATA[Molder: Не, это не из-за InitCommonControls. У меня таже проблемма с миганием Frame  :( .]]></description>
        <author>Molder</author>
        <category>Формы, окна, диалоги, десктоп</category>
      </item>
	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=687319</guid>
        <pubDate>Tue, 19 Apr 2005 06:38:50 +0000</pubDate>
        <title>Поддежка тем XP</title>
        <link>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=687319</link>
        <description><![CDATA[Soft4You: Да не, так же мерцает если мышку водить...<br><br>У меня прога юзает MS common controls 6.0<br>Как сделать чтобы тулбар тоже поддерживал темы XP?<br><br>initcommoncontrols делаю так: Public Declare Sub InitCommonControls Lib &quot;comctl32&quot; ()<br><br>Странно. Не могу понять в чем дело... :(]]></description>
        <author>Soft4You</author>
        <category>Формы, окна, диалоги, десктоп</category>
      </item>
	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=687262</guid>
        <pubDate>Tue, 19 Apr 2005 06:00:09 +0000</pubDate>
        <title>Поддежка тем XP</title>
        <link>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=687262</link>
        <description><![CDATA[Dufa: <strong class='tag-b'>Soft4You</strong>, Если я &quot;прально&quot; понял, то это должно помочь:<br>
<br>
<div class='tag-code'><span class='pre_code'></span><div class='code  code_collapsed ' title='Подсветка синтаксиса доступна зарегистрированным участникам Форума.' style=''><div><div><ol type="1"><div class="code_line">Private Declare Sub InitCommonControls Lib &quot;comctl32.dll&quot; ()</div><div class="code_line">Private Sub Form_Load()</div><div class="code_line">&nbsp;&nbsp; &nbsp;InitCommonControls</div><div class="code_line">End Sub</div></ol></div></div></div></div>]]></description>
        <author>Dufa</author>
        <category>Формы, окна, диалоги, десктоп</category>
      </item>
	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=686680</guid>
        <pubDate>Mon, 18 Apr 2005 13:23:21 +0000</pubDate>
        <title>Поддежка тем XP</title>
        <link>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=686680</link>
        <description><![CDATA[SpawnProduction: 6.0...<br>А про мерцание где-то тема была...]]></description>
        <author>SpawnProduction</author>
        <category>Формы, окна, диалоги, десктоп</category>
      </item>
	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=686664</guid>
        <pubDate>Mon, 18 Apr 2005 13:09:00 +0000</pubDate>
        <title>Поддежка тем XP</title>
        <link>https://forum.sources.ru/index.php?showtopic=91676&amp;view=findpost&amp;p=686664</link>
        <description><![CDATA[Soft4You: Привет всем&#33;<br><br>У меня в проге (она юзает манифест для поддержки тем XP) как то странно отображаются option и frame... Если проблема с черным фоном option фиксится расположением контрола на picturebox, то с frame это не проходит - при движении курсором мыши по Frame происходит как бы его мерцание... изредка так...<br><br>нельзя ли это как то пофиксить?<br><br>А вообще какие контролы лучше юзать - MS Common Contols 5.0 или 6.0?]]></description>
        <author>Soft4You</author>
        <category>Формы, окна, диалоги, десктоп</category>
      </item>
	
      </channel>
      </rss>
	