<?xml version="1.0" encoding="windows-1251"?>

<rss version="2.0">
<channel>
	<title>Форум по программированию - Delphi Sources</title>
	<link>http://www.delphisources.ru/forum</link>
	<description><![CDATA[Форум по программированию на Delphi]]></description>
	<language>ru</language>
	<pubDate>Wed, 08 Sep 2010 10:32:46 GMT</pubDate>
	<generator>vobla</generator>
	<ttl>60</ttl>

	<item>
		<title>Оптимизация поворота (ускорение)</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13477&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 10:06:49 GMT</pubDate>
		<description><![CDATA[а чёрт его знает как оно праильна называется - я математику 15 лет назад изучал)))]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=8"><![CDATA[Графика и игры]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (NumLock)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13477</guid>
	</item>

	<item>
		<title>ADO и гетерогенные запросы - ADO и гетерогенные запросы</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13480&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 10:03:16 GMT</pubDate>
		<description><![CDATA[Доброго времени суток.<br /><br />Суть вопроса, собственно в заголовке, а именно поддерживает ли ADO гетерогенные запросы.<br /><br />Заранее спасибо.]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=3"><![CDATA[Базы данных]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (santaIsAbsent)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13480</guid>
	</item>

	<item>
		<title>Оптимизация поворота (ускорение)</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13477&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 09:47:21 GMT</pubDate>
		<description><![CDATA[последний способ как я понимаю, через матрицу поворота <br />|cos a;  sin a|<br />|-sin a; cos a|  ?]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=8"><![CDATA[Графика и игры]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (Моклев)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13477</guid>
	</item>

	<item>
		<title>VideoLab и проблемы с отображением</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13479&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 09:40:40 GMT</pubDate>
		<description><![CDATA[пример на Delphi:<br /><a href="http://data.cod.ru/67525" target="_blank">http://data.cod.ru/67525</a><br /><font color="#ff0000">внимание:</font><br /><fieldset class="fieldset"><legend><i>Код</i></legend>procedure TForm1.FormCreate(Sender: TObject);<br />begin<br />  ProcessFile('<font color="Red">c:\WINDOWS\Media\Windows XP - запуск.wav</font>');<br />end;<br /></fieldset>]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=11"><![CDATA[Мультимедиа]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (NumLock)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13479</guid>
	</item>

	<item>
		<title>VideoLab и проблемы с отображением</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13479&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 09:32:04 GMT</pubDate>
		<description><![CDATA[<fieldset class="fieldset"><legend>Сообщение от <b>NekitoSSSS</b>:</legend><div style="padding: 5px; margin-top: 2px; margin-bottom: 2px; margin-left: 2px; margin-right: 2px;"><i>НО еще есть вопрос: как вытащить наибольшее количество инфы о видеофайле (avi, mpg, и любого другого) подобно тому, как это делает MediaInfo ?</i></div></fieldset><br />использовать MediaInfo.dll<br /><a href="http://data.cod.ru/67523" target="_blank">http://data.cod.ru/67523</a>]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=11"><![CDATA[Мультимедиа]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (NumLock)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13479</guid>
	</item>

	<item>
		<title>VideoLab и проблемы с отображением</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13479&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 09:11:42 GMT</pubDate>
		<description><![CDATA[ты походу не догоняешь, либо даже ни 1 глазом ни взглянул на этот компонент или сайт. <br />для некоммерческого использования он полностью бесплатен, НО поставляется БЕЗ сорцов (.pas)<br />кстати проблема найдена: виновником был трэкбар. убрал его и все что с ним было связано - и проблема решилась. <br /><br />НО еще есть вопрос: как вытащить наибольшее количество инфы о видеофайле (avi, mpg, и любого другого) подобно тому, как это делает MediaInfo ?]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=11"><![CDATA[Мультимедиа]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (NekitoSSSS)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13479</guid>
	</item>

	<item>
		<title>WinApps Replace Pack</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13012&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 08:30:35 GMT</pubDate>
		<description><![CDATA[Страдалецъ, спасибо!<br />Но для чего это?]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=33"><![CDATA[Флейм]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (pesi)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13012</guid>
	</item>

	<item>
		<title>VideoLab и проблемы с отображением</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13479&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 08:01:20 GMT</pubDate>
		<description><![CDATA[попытаю предположить, что качество отстойное только из-за того что у тебя не полная версия...ты же за нее не платит?]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=11"><![CDATA[Мультимедиа]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (friz)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13479</guid>
	</item>

	<item>
		<title>VideoLab и проблемы с отображением - VideoLab и проблемы с отображением</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13479&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 07:22:50 GMT</pubDate>
		<description><![CDATA[скачал сей компонент(с mitov.com), установил, пытаюсь сделать хелловорд, который просто бы воспроизводил видео, но вот незадача, что-то с ним творится. НО в других проигрывателях, например в JetAudio качеств на высоте, и такого корявого отображения не наблюдается. <br />скриншоты в аттаче, немного о файле который воспроизводил:<br />[CODE]General<br />Complete name                    : D:\DVD2\13.Raion.Ultimatum.2009.BDRip..avi<br />Format                           : AVI<br />Format/Info                      : Audio Video Interleave<br />Format profile                   : OpenDML<br />File size                        : 2.19 GiB<br />Duration                         : 1h 40mn<br />Overall bit rate                 : 3 123 Kbps<br />Writing application              : VirtualDubMod 1.5.10.2 (build 2540/release)<br />Writing library                  : VirtualDubMod build 2540/release<br /><br />Video<br />ID                               : 0<br />Format                           : MPEG-4 Visual<br />Format profile                   : Advanced Simple@L5<br />Format settings, BVOP            : Yes<br />Format settings, QPel            : No<br />Format settings, GMC             : No warppoints<br />Format settings, Matrix          : Default (H.263)<br />Muxing mode                      : Packed bitstream<br />Codec ID                         : XVID<br />Codec ID/Hint                    : XviD<br />Duration                         : 1h 40mn<br />Bit rate                         : 2 663 Kbps<br />Width                            : 1 280 pixels<br />Height                           : 544 pixels<br />Display aspect ratio             : 2.35:1<br />Frame rate                       : 24.000 fps<br />Color space                      : YUV<br />Chroma subsampling               : 4:2:0<br />Bit depth                        : 8 bits<br />Scan type                        : Progressive<br />Bits/(Pixel*Frame)               : 0.159<br />Stream size                      : 1.87 GiB (85%)<br />Writing library                  : XviD 1.2.1 (UTC 2008-12-04)<br /><br />Audio<br />ID                               : 1<br />Format                       ]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=11"><![CDATA[Мультимедиа]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (NekitoSSSS)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13479</guid>
	</item>

	<item>
		<title>Mail Agent на delphi</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=8804&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 06:06:14 GMT</pubDate>
		<description><![CDATA[Автор что-то давно не появляется и не отвечает, видимо проект заглох...<br />Тему закрываю.]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=35"><![CDATA[Ваши программы]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (Admin)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=8804</guid>
	</item>

	<item>
		<title>Mail Agent на delphi</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=8804&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 05:55:36 GMT</pubDate>
		<description><![CDATA[Возникает вопрос: зачем мне использовать какой-то самописный агент, бог знает с какими тайными функциями отправки логов на почту, если я могу воспользоваться официальным? Куда более функциональнее и безопаснее, чем твой.]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=35"><![CDATA[Ваши программы]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (Klo)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=8804</guid>
	</item>

	<item>
		<title>Задача с COM портом</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13457&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 05:47:01 GMT</pubDate>
		<description><![CDATA[<fieldset class="fieldset"><legend>Сообщение от <b>Bars1992</b>:</legend><div style="padding: 5px; margin-top: 2px; margin-bottom: 2px; margin-left: 2px; margin-right: 2px;"><i>Я знаютолько о физичекой реализации твоейзадачи. То-есть поставить между компом и устройством микроконтролер и вбить в него прошивку. <br /><br />С виртуальными портами не работал, но видел какони работают с другими устройствами. Думаю мостом они свободно могут стать. Копай в этом направлении.</i></div></fieldset><br /><br />Какой МК для этого больше всего подходит?<br /><br />Возможно есть еще другие варианты?]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=38"><![CDATA[[ &quot;Начинающим&quot; ]]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (maks740)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13457</guid>
	</item>

	<item>
		<title>Web display (связь с пк без чистого айпи) - Web display (связь с пк без чистого айпи)</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13478&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 05:43:55 GMT</pubDate>
		<description><![CDATA[Однажды у меня возник вопрос <u><font color="SeaGreen">«Как связаться клиенту с сервером, если они обое находятся во внутренних сетях и их реальные айпи не известны?»</font></u>. Конечно можно взять у провайдера белый айпи, или хостинг, но это стоит денег и для легких задач или тренировки как то деньги тратить не хочется. Сразу на ум пришла идея использовать какой-то промежуточный сервер. Но какой? Я задал вопрос на форуме и мне начали говорить про VPN сети. Я в них толком и не вникал, но понял что их использование и настройка довольно сложны. А что если мне надо снимать показания с какого-нибудь прибора, который подсоединен на другом ПК, или просто управлять ПК с любой точки мира, а замарачиватся с VPN не хочется? Тогда пришла в голову идея использовать ICQ. Наш сервер будет иметь один UIN, который не будет изменяться, а клиенты будут использовать динамические UIN которые они могут получать со страницы твоего веб сайта которая ясное дело никому не известна :) . На теории все выглядит красиво, а как на счет практики? Так как я поставил себе за цель управлять каким нибуть устройством на удаленном ПК, то я отыскал у себя небольшой символьный дисплей который подключается к ПК через USB. На дисплее должна отображаться информация, которая вводится в мемо в клиенте. Причем информация на дисплее должна изменятся сразу после изменения текста в мемо. <br />Задача поставлена, а теперь за дело.<br />Первое- это создаем сервер. Для соединения с ICQ сервером используем TICQClient, который можно бесплатно скачать. Описывать создание самого сервера я не буду, так как нужно разбирать интерфейс соединения с дисплеем, работу с клиентом и т. д. Для тех, кто работал с компонентами инди составить протокол обмена сообщениями клиента и сервера не составит труда. Я вылаживаю только скрин сервера:<br /><img src="http://s58.radikal.ru/i161/1009/7b/aaaa9a6e7c10.jpg" border="0" /><br />Далее клиент. Его работу я тоже не описываю вот скрин:<br /><img src="http://s45.radikal.ru/i110/1009/c7/711731d7a613.jpg" border="0" /><br />А вот результат роботы:]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=35"><![CDATA[Ваши программы]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (Bars1992)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13478</guid>
	</item>

	<item>
		<title>Окна как в IDE Delphi</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13465&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 05:02:25 GMT</pubDate>
		<description><![CDATA[2 Bars1992<br /><br />причем тут MDI? вопрос в построении форм как в IDE DElphi вроде.<br />тут MDI и не пахнет.<br /><br />2 Rat с объединением окон получилось?]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=38"><![CDATA[[ &quot;Начинающим&quot; ]]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (Black Raider)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13465</guid>
	</item>

	<item>
		<title>Оптимизация поворота (ускорение)</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13477&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 04:52:42 GMT</pubDate>
		<description><![CDATA[<fieldset class="fieldset"><legend><i>Код</i></legend>procedure TForm1.Button1Click(Sender: TObject);<br />var<br />  dc: HDC;<br />  savetagx: tagXFORM;<br />  tagx: tagXFORM;<br />  angle: Real;<br />begin<br />  angle:=30*Pi/180;<br />  dc:=Image1.Canvas.Handle;<br />  SetGraphicsMode(dc, GM_ADVANCED);<br />  GetWorldTransform(dc, savetagx);<br />  ZeroMemory(@tagx, SizeOf(tagx));<br />  tagx.eM11:=Cos(angle);<br />  tagx.eM12:=Sin(angle);<br />  tagx.eM21:=-Sin(angle);<br />  tagx.eM22:=Cos(angle);<br />  tagx.eDx:=Image1.Picture.Bitmap.Width / 2;<br />  tagx.eDy:=Image1.Picture.Bitmap.Height / 2;<br />  ModifyWorldTransform(dc, tagx, MWT_LEFTMULTIPLY);<br />  Image1.Canvas.Draw(0, 0, Image2.Picture.Graphic);<br />  SetWorldTransform(dc, savetagx);<br />end;<br /></fieldset>]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=8"><![CDATA[Графика и игры]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (NumLock)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13477</guid>
	</item>

	<item>
		<title>Окна как в IDE Delphi</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13465&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 03:50:27 GMT</pubDate>
		<description><![CDATA[<fieldset class="fieldset"><legend>Сообщение от <b>Rat</b>:</legend><div style="padding: 5px; margin-top: 2px; margin-bottom: 2px; margin-left: 2px; margin-right: 2px;"><i>Я не уверен что это MDI. В Delphi 2010 может и MDI, а вот в 7-ке точно по другому сделано.</i></div></fieldset><br />Я вчера вечером сразу в делфи зашел и проверил даную статью. В семерке все работает так же, как и описано в статье.]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=38"><![CDATA[[ &quot;Начинающим&quot; ]]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (Bars1992)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13465</guid>
	</item>

	<item>
		<title>Окна как в IDE Delphi</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13465&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 03:02:52 GMT</pubDate>
		<description><![CDATA[Я не уверен что это MDI. В Delphi 2010 может и MDI, а вот в 7-ке точно по другому сделано.]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=38"><![CDATA[[ &quot;Начинающим&quot; ]]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (Rat)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13465</guid>
	</item>

	<item>
		<title>Конкурс &quot;Учимся писать&quot;</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13277&amp;goto=newpost</link>
		<pubDate>Wed, 08 Sep 2010 01:27:19 GMT</pubDate>
		<description><![CDATA[<b>ryderx34</b>, конечно любое]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=40"><![CDATA[Конкурсы]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (Aristarh Dark)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13277</guid>
	</item>

	<item>
		<title>WinApps Replace Pack</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13012&amp;goto=newpost</link>
		<pubDate>Tue, 07 Sep 2010 22:07:43 GMT</pubDate>
		<description><![CDATA[Без регистрации не увидите ссылку.]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=33"><![CDATA[Флейм]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (Страдалецъ)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13012</guid>
	</item>

	<item>
		<title>WinApps Replace Pack</title>
		<link>http://www.delphisources.ru/forum/showthread.php?t=13012&amp;goto=newpost</link>
		<pubDate>Tue, 07 Sep 2010 19:19:03 GMT</pubDate>
		<description><![CDATA[ДАЛЬШЕ КУДА? ЕСЛИ <a href="http://warp.at.ua/load/beta_versii_winapp_replace_pack/notepad_1_0_0_14/2-1-0-9" target="_blank">ЭТО</a> ТО ГДЕ ССЫЛКА НА СКАЧКУ?]]></description>
		<category domain="http://www.delphisources.ru/forum/forumdisplay.php?f=33"><![CDATA[Флейм]]></category>
		<author><![CDATA[admin_ds@delphisources.ru (pesi)]]></author>
		<guid isPermaLink="false">http://www.delphisources.ru/forum/showthread.php?t=13012</guid>
	</item>
</channel>
</rss>