Вверх ↑
Этот топик читают: Гость
Ответов: 1088
Рейтинг: 112
#1: 2009-03-14 08:05:17 ЛС | профиль | цитата
Хочется узнать что за х... Кхм что делает следующая схема:
code_12181.txt
Точнее, почему она выдает оду иконку при любом значении Filename.
И заодним как вытащить иконку из ЕХЕ на стандартных компонентах.
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
файлы: 1code_12181.txt [1.1KB] [135]
Ответов: 5227
Рейтинг: 587
#2: 2009-03-14 09:32:56 ЛС | профиль | цитата
Sniper36, похоже проблема в том что в Icon через doBitmap в потоке никак кодом не обрабатываются это преобразование, иконка должна быть загружена из файла а потом только сконвертирована этим методом, впрочем могу ошибаться.
Sniper36 писал(а):
И заодним как вытащить иконку из ЕХЕ на стандартных компонентах.


вот так работает

Add(MainForm,4602853,56,154)
{
Width=475
Height=400
}
Add(FileAttributes,7720392,224,196)
{
Point(doGetFileIcon)
Point(onGetFileIcon)
link(FileName,5765284:Text,[])
link(onGetFileIcon,7995405:doEvent1,[])
}
Add(Image,1820668,448,231)
{
Top=341
Width=467
Height=32
Align=4
}
Add(Icon,10211384,315,189)
{
Point(onBitmap)
Point(doLoadIcon)
Point(doBitmap)
link(onBitmap,14908333:doEvent1,[])
}
Add(Memo,8180484,581,175)
{
Top=40
Width=467
Height=301
Align=5
ScrollBars=2
link(onChange,93822:doClear,[(634,181)(634,102)(434,102)(434,125)])
}
Add(MemoryStream,93822,448,112)
{
}
Add(BitmapStream,23496,448,182)
{
link(Stream,3480977:Var2,[])
}
Add(GetDataEx,3480977,441,147)
{
link(Data,93822:Stream,[])
}
Add(Hub,14908333,371,189)
{
OutCount=3
link(onEvent1,23496:doWrite,[])
link(onEvent2,12462384:doConvert,[])
link(onEvent3,1820668:doLoad,[(417,209)(417,237)])
}
Add(Stream2Hex,12462384,511,196)
{
link(onResult,8180484:doText,[])
link(Data,3480977:Var3,[(517,156)])
}
Add(Edit,5765284,224,140)
{
Top=20
Width=467
Align=2
Text="C:Program FilesHiAsmHiAsm.exe"
}
Add(Button,10131773,154,217)
{
Left=145
Top=150
Align=2
link(onClick,7720392:doGetFileIcon,[])
}
Add(Hub,7995405,280,203)
{
link(onEvent1,10211384:doLoadIcon,[])
link(onEvent2,10211384:doBitmap,[])
}


------------ Дoбавленo:

Sniper36, глянь
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
1
Голосовали:Sniper36
Ответов: 1088
Рейтинг: 112
#3: 2009-03-14 09:38:37 ЛС | профиль | цитата
Мда, реализация компонента просто гениальна.
andrestudio, благодарю.
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Разработчик
Ответов: 26158
Рейтинг: 2127
#4: 2009-03-14 13:18:36 ЛС | профиль | цитата
Sniper36 писал(а):
Мда, реализация компонента просто гениальна

Этой реализации в обед сто лет, в публикаторе лежит схема Files Vault, где реализован похожий метод, да еще и со сжатием
карма: 22

0
4
Сообщение
...
Прикрепленные файлы
(файлы не залиты)