<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom">
	<channel>
		<title><![CDATA[Серый форум &mdash; AHK: Изменить тело загружаемой картинки]]></title>
		<link>https://forum.script-coding.com/viewtopic.php?id=16961</link>
		<atom:link href="https://forum.script-coding.com/extern.php?action=feed&amp;tid=16961&amp;type=rss" rel="self" type="application/rss+xml" />
		<description><![CDATA[Недавние сообщения в теме «AHK: Изменить тело загружаемой картинки».]]></description>
		<lastBuildDate>Sat, 12 Feb 2022 11:25:05 +0000</lastBuildDate>
		<generator>PunBB</generator>
		<item>
			<title><![CDATA[Re: AHK: Изменить тело загружаемой картинки]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=152155#p152155</link>
			<description><![CDATA[<p>Сначала нужно узнать, в какой кодировке текст. Потом начинать искать первый символ текста, перебирая данные побайтно. Как нашли, смотрите, соответствует ли следующие байты следующим символам.</p>]]></description>
			<author><![CDATA[null@example.com (teadrinker)]]></author>
			<pubDate>Sat, 12 Feb 2022 11:25:05 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=152155#p152155</guid>
		</item>
		<item>
			<title><![CDATA[AHK: Изменить тело загружаемой картинки]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=152150#p152150</link>
			<description><![CDATA[<p>Здравствуйте. Как отредактировать скачиваемую картинку перед сохранением на диск? Требуется удалить из ее тела, такой текст — &quot;(ICC_PROFILE&quot;.<br /></p><div class="codebox"><pre><code>HTTP := ComObjCreate(&quot;Msxml2.XMLHTTP.6.0&quot;)
HTTP.Open(&quot;GET&quot;, &quot;https://pbs.twimg.com/media/FKT5ef3XwAECee2.jpg?name=large&quot;, 0)
HTTP.SetRequestHeader(&quot;User-Agent&quot;, &quot;Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/86.0.4240.198 Safari/537.36&quot;)
HTTP.Send()
Body := HTTP.ResponseBody
pData := NumGet(ComObjValue(Body), A_PtrSize = 8? 16:12, &quot;ptr&quot;)
File := FileOpen(A_ScriptDir &quot;\&quot; a_now &quot;.jpg&quot;, &quot;w&quot;)
;StringReplace, File, File, (ICC_PROFILE, , All
File.RawWrite(pData + 0, Body.MaxIndex() + 1)
File.Close()</code></pre></div>]]></description>
			<author><![CDATA[null@example.com (peterverhovensky)]]></author>
			<pubDate>Fri, 11 Feb 2022 21:48:25 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=152150#p152150</guid>
		</item>
	</channel>
</rss>
