Вверх ↑
Этот топик читают: Гость
Гость
Ответов: 17029
Рейтинг: 0
#1: 2009-04-16 20:57:53 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2025-01-10 21:12:18
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#2: 2009-04-16 21:13:26 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2025-01-10 21:12:18
карма: 0

0
Разработчик
Ответов: 26212
Рейтинг: 2138
#3: 2009-04-16 21:24:24 ЛС | профиль | цитата
Может тебе вот это надо



Add(MainForm,9480855,238,203)
{
Width=572
Height=444
}
Add(FileStream,4022189,336,245)
{
FileName="C:\WINDOWS\clock.avi"
link(onLoad,4901914:doConvert,[])
link(FileName,15587867:Text,[])
}
Add(Button,3039287,287,245)
{
Left=25
Top=5
Width=80
Height=25
Caption="Грузить"
link(onClick,4022189:doOpen,[])
}
Add(StyleXP,11508623,238,245)
{
}
Add(RichEdit,5416616,441,245)
{
Left=15
Top=65
Width=535
Height=325
ScrollBars=2
Point(FileName)
link(FileName,704837:Text,[])
}
Add(Edit,15587867,336,196)
{
Left=115
Top=5
Width=315
Text="C:\WINDOWS\clock.avi"
}
Add(Stream2Hex,4901914,385,245)
{
link(onResult,5416616:doAdd,[])
}
Add(Button,7469243,385,287)
{
Left=25
Top=35
Width=80
Height=25
Caption="Сохранить"
link(onClick,5416616:doSave,[(429,293)(429,279)])
}
Add(Edit,704837,462,196)
{
Left=115
Top=35
Width=315
Text="clock.hex"
}

карма: 22

0
Ответов: 485
Рейтинг: 86
#4: 2009-04-16 21:29:15 ЛС | профиль | цитата
или так?

Add(FileStream,4022189,280,168)
{
FileName="C:\WINDOWS\clock.avi"
link(onLoad,3266202:doConvert,[])
link(FileName,15587867:Text,[])
}
Add(Button,3039287,231,168)
{
Left=15
Top=10
Width=80
Caption="Грузить"
link(onClick,4022189:doOpen,[])
}
Add(RichEdit,5416616,378,168)
{
Left=15
Top=40
Width=295
Height=335
}
Add(Edit,15587867,280,98)
{
Left=115
Top=10
Width=195
Text="C:\WINDOWS\clock.avi"
}
Add(Stream2Hex,3266202,329,168)
{
link(onResult,5416616:doAdd,[])
}
Add(Button,4264583,336,224)
{
Left=15
Top=380
Width=90
Height=25
Caption="Сохранить"
link(onClick,2890704:doConvert,[])
}
Add(Edit,15817682,427,161)
{
Left=110
Top=380
Width=200
Height=25
Text="C:clock.avi"
}
Add(FileStream,9622721,427,210)
{
Mode=1
AutoCopy=0
Point(doCopyFromStream)
link(FileName,15817682:Text,[])
}
Add(Stream2Hex,2890704,378,224)
{
Mode=1
link(onResult,9622721:doCopyFromStream,[])
link(Data,5416616:Text,[])
}


карма: 0

0
Разработчик
Ответов: 26212
Рейтинг: 2138
#5: 2009-04-16 21:32:07 ЛС | профиль | цитата
filyaxxxcom, вроде чел конкретно спросил

г. xzey писал(а):
как этот шестнадцатеричный вид записать в файл


Он же не написал преобразовать обратно. Хотя, я не удивлюсь, если имелось в виду именно это
карма: 22

0
Ответов: 485
Рейтинг: 86
#6: 2009-04-16 21:33:36 ЛС | профиль | цитата
nesco писал(а):
Он же не написал преобразовать обратно. Хотя, я не удивлюсь, если имелось в виду именно это
Надо все варианты предусмотреть
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#7: 2009-04-16 21:54:23 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2025-01-10 21:12:19
карма: 0

0
Разработчик
Ответов: 26212
Рейтинг: 2138
#8: 2009-04-16 22:04:45 ЛС | профиль | цитата
г. xzey, а что, hex-текст необходимо хранить именно в Rich, другие компоненты для этого, разве, не подходят
карма: 22

0
Гость
Ответов: 17029
Рейтинг: 0
#9: 2009-04-16 22:09:51 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2025-01-10 21:12:19
карма: 0

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