------------ Дoбавленo в 19.49:
Билдер
Add(MemoryStream,15073561,364,77)
{
Point(doPosition)
}
Add(DataToFile,7235967,364,238)
{
Type=6
link(Stream,13951647:Var2,[])
}
Add(FileStream,15834936,462,259)
{
Mode=2
AutoCopy=0
Point(doCopyFromStream)
link(FileName,8394885:Text,[])
}
Add(Hub,5797438,245,91)
{
OutCount=3
link(onEvent1,9353838:doData,[])
link(onEvent2,7235967:doPut,[(311,104)(311,244)])
link(onEvent3,12350531:doData,[(336,111)(336,279)])
}
Add(DoData,9353838,294,91)
{
link(onEventData,15073561:doPosition,[])
link(Data,15073561:Size,[(300,79)(338,79)(338,121)(377,121)])
}
Add(DoData,12350531,413,273)
{
link(onEventData,15834936:doCopyFromStream,[])
link(Data,13951647:Var3,[(419,187)])
}
Add(GetDataEx,13951647,364,182)
{
link(Data,15073561:Stream,[])
}
Add(Edit,765666,126,42)
{
Left=10
Top=30
Width=245
Color=16777215
Font=[aRIAL,10,0,0,1]
Text="http://hiasm.com"
}
Add(DoData,4240288,126,91)
{
link(onEventData,10532603:doString,[])
link(Data,765666:Text,[])
}
Add(FormatStr,10532603,182,91)
{
DataCount=1
Mask="[u]%1[u]"
link(onFString,5797438:doEvent1,[])
}
Add(Edit,8394885,462,210)
{
Left=10
Top=5
Width=245
Color=16777215
Font=[aRIAL,10,0,0,1]
Text="new.exe"
}
Add(BitBtn,9708092,84,91)
{
Left=191
Top=50
Width=65
Caption="Build"
link(onClick,4240288:doData,[])
}
Add(Random,14949712,182,128)
{
Max=255
Point(RandSeed)
Point(doRandSeed)
}
Add(Memory,4567704,231,168)
{
Default=String()
link(onData,6554631:doStrCat,[(275,174)(275,195)(219,195)(219,216)])
}
Add(Convertor,5216037,189,168)
{
Mode=6
Digits=8
link(onResult,4567704:doValue,[])
link(Data,14949712:RandSeed,[])
}
Add(Button,7954789,84,168)
{
Left=125
Top=50
Width=65
Caption="Randomize"
link(onClick,227134:doEvent1,[])
}
Add(Hub,227134,154,168)
{
link(onEvent1,5216037:doConvert,[])
link(onEvent2,14949712:doRandomize,[(175,181)(175,141)])
}
Add(StrCat,6554631,231,210)
{
Str2=".exe"
link(onStrCat,8394885:doText,[])
link(Str1,4567704:Value,[])
}
Add(FileStream,15834936,133,126)
{
AutoCopy=0
Point(doCopyFromStream)
link(onLoad,128114:doConvert,[])
link(FileName,9274029:AppFileName,[])
}
Add(Stream2Hex,128114,175,126)
{
Mode=4
link(onResult,3853572:doCopy,[])
}
Add(BlockFind,2798527,259,126)
{
IncludeBlock=1
StartBlock="[u]"
EndBlock="[u]"
link(onSearch,3753792:doMessage,[])
}
Add(Copy,3853572,217,126)
{
Count=900
Direction=1
link(onCopy,2798527:doSearch,[])
}
Add(Application,9274029,133,77)
{
}
Add(MainForm,9693726,28,112)
{
Width=522
Height=432
Visible=1
Caption="Encrypt"
TaskBar=1
link(onCreate,15834936:doOpen,[])
}
Add(Message,3753792,308,126)
{
}
Посли написания свой программы поместишь .ехе в билдер там есть элемент MemoryStream
Add(MemoryStream,15073561,364,77)
{
Point(doPosition)
}
------------ Дoбавленo в 19.51:
LeFrant Доволен?