г. Украина, Харьков писал(а):
конвертирование последующих 4х символов в ANSIА вот так
code_23229.txt
------------ Дoбавленo в 01.36:
Возможно, пакет старый, тогда со старым компонентом
Add(MainForm,2953706,119,161)
{
link(onCreate,14242506:doConvert,[])
}
Add(Charset,4981340,245,175)
{
Type=9
OutTypeUnicode=1
InTypeUnicode=1
link(onCharset,8439409:doText,[])
}
Add(Edit,1668126,189,126)
{
Left=20
Top=15
Width=130
Cursor=1
Text="003d"
}
Add(Edit,8439409,301,175)
{
Left=20
Top=40
Width=130
Cursor=1
Text=""
}
Add(Stream2Hex,14242506,189,175)
{
Mode=3
link(onResult,4981340:doCharset,[])
link(Data,1668126:Text,[])
}