Вверх ↑
Ответов: 356
Рейтинг: 31
#1: 2010-08-28 21:31:12 ЛС | профиль | цитата
Одна заданная строка

Add(MainForm,14050274,546,161)
{
Width=409
Height=279
Caption=""
link(onCreate,12731325:doConsoleExec,[])
}
Add(WinExec,12731325,609,161)
{
Param="/c copy /b F:Текст_1.txt+F:Текст_2.txt F:\result_121.txt"
FileName="cmd.exe"
Point(doConsoleExec)
}
Вся программа

Add(MainForm,2953706,434,266)
{
}
Add(ODialog,1106631,490,161)
{
StartDir="F:"
FileName="text_1.txt"
link(onExecute,587091:doText,[])
}
Add(ODialog,12008771,490,105)
{
StartDir="F:"
FileName="text_2.txt"
link(onExecute,12980779:doText,[])
}
Add(Button,230970,434,161)
{
Left=5
Top=35
Width=50
Caption="Файл 1"
link(onClick,1106631:doExecute,[])
}
Add(Button,11595569,434,105)
{
Left=5
Top=65
Width=50
Caption="Файл 2"
link(onClick,12008771:doExecute,[])
}
Add(InfoTip,11691973,427,147)
{
Info=#6:файл 1|
Width=106
Height=53
}
Add(InfoTip,13966878,427,91)
{
Info=#6:файл 2|
Width=106
Height=53
}
Add(WinExec,8858728,539,280)
{
FileName="cmd.exe"
Point(doConsoleExec)
Point(onConsoleResult)
link(onExec,6754375:doText,[])
link(Params,11592100:Var,[])
link(onConsoleResult,8785278:doCharset,[(587,293)(587,335)])
}
Add(Edit,12980779,553,105)
{
Left=70
Top=65
Width=280
Text=""
}
Add(Label,1112135,616,217)
{
Left=5
Top=125
Width=345
Height=25
Caption=""
}
Add(Edit,587091,546,161)
{
Left=70
Top=35
Width=280
Text=""
}
Add(Button,517459,434,217)
{
Left=5
Top=95
Width=50
Caption="Сделать"
link(onClick,15598375:doEvent1,[])
}
Add(Hub,15598375,483,217)
{
OutCount=3
link(onEvent1,838162:doString,[])
link(onEvent2,8858728:doConsoleExec,[(518,230)(518,300)])
}
Add(Label,6754375,623,280)
{
Left=5
Top=160
Width=345
Height=25
Caption=""
}
Add(InfoTip,12320435,609,175)
{
Info=#21:Удалить после отладки|
Width=57
Height=144
}
Add(FormatStr,838162,546,217)
{
Mask="/c copy /b %1+%2 F:\result_121.txt"
Point(FString)
link(onFString,1112135:doText,[])
link(Str1,587091:Text,[])
link(Str2,12980779:Text,[])
}
Add(Debug,11592100,546,259)
{
link(Data,838162:FString,[])
}
Add(Charset,8785278,602,329)
{
link(onCharset,3912980:doEvent,[])
}
Add(Debug,3912980,651,329)
{
}
карма: 0

0