Вверх ↑
Ответов: 245
Рейтинг: 4
#1: 2022-06-03 20:55:02 ЛС | профиль | цитата
Sdialog не берет с точки StartDir данные, только если запихнуть через DoData.


Add(MainForm,2953706,371,217)
{
}
Add(SDialog,6341214,490,280)
{
Filter="TXT|*.txt"
Title=""
StartDir=""
FileName=""
NoChangeDir=1
Point(StartDir)
Point(FileName)
Point(doStartDir)
link(onExecute,5760248:doText,[])
link(StartDir,15351057:Var2,[])
link(FileName,13202363:Text,[(503,264)(531,264)])
}
Add(Dir,5667882,483,217)
{
}
Add(Button,6613464,371,280)
{
Left=25
Top=5
Caption="save"
link(onClick,14434370:doEvent,[])
}
Add(Debug,14434370,434,280)
{
link(onEvent,6341214:doExecute,[])
}
Add(Label,5760248,560,280)
{
Left=25
Top=30
}
Add(Edit,13202363,525,217)
{
Left=95
Top=5
}
Add(Button,12370317,371,315)
{
Left=155
Top=5
Width=45
Caption="dir"
link(onClick,5827261:doData,[])
}
Add(DoData,5827261,427,315)
{
link(onEventData,6341214:doStartDir,[(475,321)(475,293)])
link(Data,15351057:Var1,[(433,264)])
}
Add(GetDataEx,15351057,490,259)
{
link(Data,5667882:DesktopDir,[])
}


--- Добавлено в 2022-06-03 21:09:44

А если так то совсем не работает


Add(MainForm,5211472,455,224)
{
}
Add(SDialog,6341214,574,287)
{
Filter="TXT|*.txt"
Title=""
StartDir=""
FileName=""
NoChangeDir=1
Point(StartDir)
Point(FileName)
Point(doStartDir)
link(onExecute,5760248:doText,[])
link(StartDir,15351057:Var2,[])
link(FileName,4060280:FString,[(587,262)(622,262)])
}
Add(Dir,5667882,567,210)
{
}
Add(Button,6613464,385,280)
{
Left=25
Top=5
Caption="save"
link(onClick,10832154:doEvent1,[])
}
Add(Label,5760248,644,287)
{
Left=25
Top=30
}
Add(Button,12370317,455,315)
{
Left=155
Top=5
Width=45
Caption="dir"
link(onClick,5827261:doData,[])
}
Add(DoData,5827261,511,315)
{
link(onEventData,6341214:doStartDir,[(559,321)(559,300)])
link(Data,15351057:Var1,[(517,271)])
}
Add(GetDataEx,15351057,574,266)
{
link(Data,5667882:DesktopDir,[])
}
Add(FormatStr,4060280,616,189)
{
DataCount=1
Mask="текст_%1"
Point(FString)
link(Str1,150425:FormatTime,[])
}
Add(Time,150425,616,140)
{
Format="D:M:Y_h:m:s"
}
Add(Hub,10832154,434,280)
{
link(onEvent1,11307708:In,[])
link(onEvent2,6341214:doExecute,[])
}
Add(LineBreak,8536139,567,189)
{
link(Out,4060280:doString,[])
Primary=[11307708,-98,91]
}


--- Добавлено в 2022-06-03 21:27:06

и через DoFileName тоже не работает

Add(MainForm,5211472,434,252)
{
}
Add(SDialog,6341214,553,315)
{
Filter="TXT|*.txt"
Title=""
StartDir=""
FileName=""
NoChangeDir=1
Point(StartDir)
Point(doStartDir)
Point(doFileName)
link(onExecute,5760248:doText,[])
link(StartDir,15351057:Var2,[])
}
Add(Dir,5667882,546,238)
{
}
Add(Button,6613464,364,308)
{
Left=25
Top=5
Caption="save"
link(onClick,10832154:doEvent1,[])
}
Add(Label,5760248,609,315)
{
Left=25
Top=30
}
Add(Button,12370317,420,343)
{
Left=155
Top=5
Width=45
Caption="dir"
link(onClick,5827261:doData,[])
}
Add(DoData,5827261,476,343)
{
link(onEventData,6341214:doStartDir,[(522,349)(522,328)])
link(Data,15351057:Var1,[(482,299)])
}
Add(GetDataEx,15351057,553,294)
{
link(Data,5667882:DesktopDir,[])
}
Add(FormatStr,4060280,476,441)
{
DataCount=1
Mask="текст_%1"
Point(FString)
link(onFString,6341214:doFileName,[(538,447)(538,335)])
link(Str1,150425:FormatTime,[])
}
Add(Time,150425,476,392)
{
Format="D:M:Y_h:m:s"
}
Add(Hub,10832154,413,308)
{
link(onEvent1,11307708:In,[])
link(onEvent2,6341214:doExecute,[])
}
Add(LineBreak,5356761,427,441)
{
link(Out,4060280:doString,[])
Primary=[11307708,21,-133]
}

у всех так или только у меня
карма: 1

0
Редактировалось 2 раз(а), последний 2022-06-03 21:27:06