Assasin писал(а):
Если захочешь с Type, то вот примерпосле такого примера я в сторону Type даже не посмотрел бы.
Assasin, надо быть проще и последовательней, а не все сразу.
ermac, вот пример с Type
Add(MainForm,2953706,42,105)
{
Point(onClose)
link(onCreate,1618988:doWork,[])
link(onClose,122698:doSaveToFile,[(97,132)(97,251)])
}
Add(Edit,16743043,343,112)
{
Left=180
Top=125
}
Add(Label,1674301,294,126)
{
Left=185
Top=90
}
Add(Type_Save,122698,294,238)
{
FileName="data.txt"
ListStream=0
link(GType,16337940:FType,[])
AddHint(60,-20,50,13,FileName)
}
Add(Type_FastCreate,16337940,294,189)
{
Vars=#5:label|4:edit|
link(label,1674301:Caption,[])
link(edit,16743043:Text,[(307,172)(349,172)])
AddHint(62,-11,37,26,Vars)
}
Add(Type_Load,11239410,175,112)
{
FileName="data.txt"
ListStream=0
Point(onLoad)
link(onLoad,8879822:doSeparate,[])
AddHint(-17,-35,50,13,FileName)
}
Add(Type_MultiData,8879822,231,119)
{
Vars=#4:edit|5:label|9:##onError|
link(edit,16743043:doText2,[])
link(label,1674301:doText,[])
AddHint(22,-66,48,39,Vars)
}
Add(Check,1618988,105,119)
{
@Hint=#31:снять флажек при первом запуске|
link(onEvent,11239410:doLoadFromFile,[])
AddHint(-71,-66,193,13,@Hint)
}



Поиск
Друзья
Администрация