Вверх ↑
Этот топик читают: Гость
Ответов: 54
Рейтинг: 1
#1: 2012-08-16 17:48:03 ЛС | профиль | цитата
Добрый день!
В данный момент я занялся некой программой и вот ее суть:
-------------------------------------------------------
Создается 390 ChildPanelEx с Edit внутри
После редактирования всех Edit и нажатия на кнопку нужно все данные из Edit-ов записать в файл по таким "законам":
1) всё должно быть записано через точку с запятой по 30 значений в ряд:
[значение 0];[значение 1];[значение 2]......[значение 29] -- переходим на новую строчку
[значение 30];[значение 31];[значение 32]......[значение 59]
................
[значение 350];[значение 351];[значение 352]......[значение 389]
И таких рядов должно быть 13 (такая себе матрица)

Я смог сделать только создание 390 ChildPanelEx а как сделать Вывод информации не знаю!
Пожалуйста, помогите!

Моя схема: code_28780.txt
карма: 1

0
файлы: 1code_28780.txt [1.6KB] [80]
Ответов: 1173
Рейтинг: 49
#2: 2012-08-16 18:48:20 ЛС | профиль | цитата
Сделал, но почему-то записывается бяка, сейчас разбираюсь, почему:
code_28781.txt
И вместо туевой хучи полей ввода советую юзать что-нибудь другое.
------------ Дoбавленo в 18.47:

Add(MainForm,4783043,70,105)
{
Width=974
Height=607
link(onCreate,16050842:doFor,[])
}
Add(ChildPanelEx,16363052,210,119)
{
link(X,11979991:Position,[(216,107)(188,107)(188,177)(167,177)])
link(Y,16050842:Position,[(223,99)(170,99)(170,163)(125,163)])
}
BEGIN_SDK
Add(EditMultiEx,12505065,21,21)
{
WorkCount=#5:##add|8:##select|
VarCount=#4:Text|
DataCount=#1:X|1:Y|
Width=762
Height=326
Point(##add)
Point(##select)
link(##add,12222430:doEvent1,[(39,27)(39,76)])
link(Text,8794347:Text,[(27,298)(76,298)])
}
Add(Panel,1357502,329,175)
{
Width=39
Height=30
Color=15793151
Visible=1
Point(doLeft)
Point(doTop)
Point(Width)
Point(Height)
Point(doVisible)
}
Add(Hub,12222430,56,70)
{
OutCount=3
link(onEvent1,10073635:doCalc,[])
link(onEvent2,8644914:doCalc,[(112,83)(112,125)])
link(onEvent3,4305737:doWork2,[(82,90)(82,139)(58,139)(58,188)])
}
Add(MathParse,10073635,147,70)
{
MathStr="%1*%2 + 5"
link(onResult,1357502:doLeft,[(200,76)(200,188)])
link(X1,12505065:X,[(153,46)(27,46)])
link(X2,1357502:Width,[(160,58)(248,58)(248,219)(335,219)])
}
Add(MathParse,8644914,154,119)
{
MathStr="%1*%2 + 5"
link(onResult,1357502:doTop,[(258,125)(258,195)])
link(X1,12505065:Y,[(160,56)(34,56)])
link(X2,1357502:Height,[(167,107)(255,107)(255,219)(342,219)])
}
Add(Edit,8794347,70,217)
{
Left=5
Top=5
Width=30
Text="1"
Alignment=2
}
Add(ChanelToIndex,4305737,70,175)
{
link(onIndex,1357502:doVisible,[(216,181)(216,202)])
}
END_SDK
Add(For,16050842,119,119)
{
End=12
link(onEvent,11979991:doFor,[])
}
Add(For,11979991,161,119)
{
End=29
link(onEvent,16363052:##add,[])
}
Add(Button,15313923,35,203)
{
Left=5
Top=475
link(onClick,16443223:doEvent1,[])
}
Add(For,2466871,168,210)
{
End=30
link(onEvent,11123960:doNext,[])
link(onStop,4090761:doData,[(212,223)(212,265)])
}
Add(For,1132109,119,210)
{
End=13
link(onEvent,2466871:doFor,[])
link(onStop,11856282:doExecute,[(159,223)(159,300)])
}
Add(StrList,489524,266,259)
{
Strings=#0:|0:|
}
Add(ArrayRW,15083493,385,217)
{
link(onRead,5304753:doCompare,[])
link(Array,1595145:Var,[])
link(Index,708764:Var,[(398,210)(426,210)])
}
Add(Hub,518119,322,210)
{
link(onEvent1,16363052:##select,[(348,216)(348,174)(198,174)(198,132)])
link(onEvent2,15083493:doRead,[])
}
Add(LineBreak,369825,280,315)
{
Type=1
link(Data,489524:Array,[])
Primary=[1595145,105,-126]
}
Add(StrCatDelim,15582938,483,217)
{
Delimiter=";"
link(onStrCatDlm,1383797:doWork1,[(571,223)])
link(Str2,15363067:Var2,[])
}
Add(SDialog,11856282,168,294)
{
link(onExecute,489524:doSave,[])
}
Add(If_else,5304753,434,217)
{
Type=5
Op2=String()
link(onTrue,15582938:doStrCatDlm,[])
link(onFalse,8375160:doData,[(474,230)(474,265)])
}
Add(DoData,8375160,525,259)
{
link(onEventData,1383797:doWork2,[])
link(Data,15363067:Var3,[(531,166)])
}
Add(GetDataEx,15363067,490,161)
{
Angle=3
link(Data,16363052:Text,[(493,166)(216,166)])
}
Add(CounterEx,11123960,266,210)
{
Max=390
Point(doReset)
link(onNext,518119:doEvent1,[])
}
Add(Hub,16443223,84,203)
{
link(onEvent1,4824486:In,[(108,209)(108,195)])
link(onEvent2,1132109:doFor,[])
}
Add(LineBreak,13855093,224,217)
{
link(Out,11123960:doReset,[])
Primary=[4824486,-105,-28]
}
Add(LineBreak,5172130,119,252)
{
Type=1
link(Data,1132109:Position,[])
Primary=[708764,301,-63]
}
Add(HubEx,1383797,567,259)
{
Angle=1
link(onEvent,15083493:doWrite,[(571,302)(373,302)(373,230)])
}
Add(DoData,4090761,224,259)
{
link(onEventData,489524:doAdd,[])
}
Вроде всё поправил, принимайте Как я в первом варианте накосячил-то
карма: 0

0
файлы: 1code_28781.txt [3.3KB] [75]
Ответов: 16884
Рейтинг: 1239
#3: 2012-08-16 18:50:38 ЛС | профиль | цитата
BogdashkaM писал(а):
Я смог сделать только создание 390 ChildPanelEx
Топором работаешь ?
code_28782.txt
Ex_ писал(а):
Как я в первом варианте накосячил-то
И во втором тоже.
Ребята, мозги включите. Задача на два пальца об асфальт.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_28782.txt [955B] [85]
Гость
Ответов: 17029
Рейтинг: 0
#4: 2012-08-16 19:15:37 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-06 06:25:20
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#5: 2012-08-16 19:16:49 ЛС | профиль | цитата
BogdashkaM, лови :
code_28783.txt
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
файлы: 1code_28783.txt [1.8KB] [88]
Голосовали:Ex_
Ответов: 8926
Рейтинг: 823
#6: 2012-08-16 19:27:19 ЛС | профиль | цитата
BogdashkaM, 390 Edit-ов! Срочно в консерватории надо что-то менять!
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#7: 2012-08-16 19:30:32 ЛС | профиль | цитата
Леонид, [flood]я вообще перестал понимать запросы наших программистов. [/flood]
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 1731
Рейтинг: 68
#8: 2012-08-16 19:50:53 ЛС | профиль | цитата
Tad, [flood]это они перестали понимать, что им нужно [/flood]
карма: 1

0
Ответов: 8926
Рейтинг: 823
#9: 2012-08-16 21:20:22 ЛС | профиль | цитата
Cosinus писал(а):
это они перестали понимать, что им нужно
А Стив почил, и некому указать, чего же хочется
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#10: 2012-08-16 21:27:12 ЛС | профиль | цитата
Леонид писал(а):
А Стив почил
из к.ф.Чапаев писал(а):
Кто такой ? Почему не знаю ?

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Гость
Ответов: 17029
Рейтинг: 0
#11: 2012-08-16 22:05:50 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-06 06:25:19
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#12: 2012-08-16 22:08:11 ЛС | профиль | цитата
Блин. Лишний компонент затесался.
code_28784.txt
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_28784.txt [1.7KB] [96]
Ответов: 1731
Рейтинг: 68
#13: 2012-08-16 22:41:01 ЛС | профиль | цитата
на матрицу чисел похоже
карма: 1

0
13
Сообщение
...
Прикрепленные файлы
(файлы не залиты)