Вверх ↑
Разработчик
Ответов: 26149
Рейтинг: 2127
#1: 2018-12-10 13:01:46 ЛС | профиль | цитата
RT9U писал(а):
Заклинело опять. Не могу записать в файл строки из strList Может там определенное расширение файла???? можно пример использования данного элемента имеено для записи в файл.....

А не лучше ли использовать Append вместо Save, чтобы не засорять память?
Схема

Add(MainForm,2953706,133,105)
{
}
Add(Button,9858647,133,154)
{
Left=145
Top=20
TabOrder=-1
Caption="Append"
link(onClick,1324176:doEvent1,[])
}
Add(StrList,13434261,364,147)
{
Point(doAppend)
link(FileName,7603423:Text,[])
}
Add(Hub,7975096,308,175)
{
link(onEvent1,13434261:doAppend,[])
link(onEvent2,13434261:doClear,[(333,188)(333,160)])
}
Add(VisualStrings,11788037,252,98)
{
Lines=#5:test1|
Width=46
Point(doText)
Point(onText)
link(onText,610283:doWork1,[(354,104)])
}
Add(Hub,1324176,203,154)
{
OutCount=4
link(onEvent1,11788037:doText,[(228,160)(228,104)])
link(onEvent2,1126043:doText,[(235,167)(235,125)])
link(onEvent3,9300085:doText,[(242,174)(242,146)])
link(onEvent4,7975096:doEvent1,[])
}
Add(VisualStrings,1126043,252,119)
{
Lines=#5:test2|
Width=46
Point(doText)
Point(onText)
link(onText,610283:doWork2,[])
}
Add(VisualStrings,9300085,252,140)
{
Lines=#5:test3|
Width=46
Point(doText)
Point(onText)
link(onText,8389691:doWork2,[])
}
Add(HubEx,610283,350,119)
{
Angle=1
link(onEvent,8389691:doWork1,[])
}
Add(HubEx,8389691,350,140)
{
Angle=1
link(onEvent,13434261:doAdd,[(354,153)])
}
Add(VisualStrings,7603423,371,98)
{
Lines=#8:test.txt|
Width=53
}

карма: 22

0
Редактировалось 2 раз(а), последний 2018-12-10 13:03:01