Add(MainForm,2363590,70,196)
{
Width=742
Height=394
Caption="Тест с нумерацией"
Position=1
link(onCreate,6127294:doEvent1,[])
}
Add(DS_SQLite,11171972,245,14)
{
Name="bd"
FileName=":memory:"
link(onOpen,7933638:doExec,[])
}
Add(DSC_Exec,7933638,294,14)
{
SQL="CREATE TABLE TableOne(\r\n id integer,\r\n name text, \r\n city text,\r\n age integer);\r\n\r\nINSERT OR IGNORE INTO TableOne VALUES (0,'Петров','Москва',24);\r\nINSERT OR IGNORE INTO TableOne VALUES (1,'Иванов','Минск',43);\r\nINSERT OR IGNORE INTO TableOne VALUES (2,'Сидоров','Киев',28);\r\nINSERT OR IGNORE INTO TableOne VALUES (3,'Смирнов','Киров',19);\r\nINSERT OR IGNORE INTO TableOne VALUES (4,'Малевич','Сидне',53);\r\n\r\nCREATE TABLE TableColumn(\r\n id integer,\r\n name text,\r\n width integer,\r\n align integer, \r\n visible integer,\r\n position integer,\r\n sql_text text,\r\n hint text);\r\n \r\nINSERT OR IGNORE INTO TableColumn VALUES (0,'№ п\п',60,2,1,0,'t1.id','Номер по порядку');\r\nINSERT OR IGNORE INTO TableColumn VALUES (1,'Фамилия',100,0,1,1,'t1.name','Фамилия пользователя');\r\nINSERT OR IGNORE INTO TableColumn VALUES (2,'Город',100,0,1,2,'t1.city','Город регистрации');\r\nINSERT OR IGNORE INTO TableColumn VALUES (3,'Возраст',60,2,1,3,'t1.age','Возраст пользователя');\r\n\r\n "
DSManager="bd"
}
Add(DSC_Query,9807701,882,427)
{
DSManager="bd"
link(onQuery,15038004:doAddRow,[])
}
Add(MTStrTbl,9589444,350,350)
{
Left=5
Top=15
Width=715
Height=185
Font=[MS Sans Serif,12,0,0,1]
Name="MainTable"
ColumnClick=1
Grid=0
link(onColumnClick,12387400:doValue,[])
}
Add(MST_DB,15038004,931,427)
{
MSTControl="MainTable"
}
Add(Hub,6127294,126,210)
{
OutCount=3
link(onEvent1,11171972:doOpen,[(171,216)(171,20)])
link(onEvent2,12312804:doEvent1,[])
link(onEvent3,11316354:doQuery,[(161,230)(161,713)])
}
Add(MST_HDHints,1864349,560,238)
{
MSTControl="MainTable"
HintManager="hint_1"
Point(doHDHints)
}
Add(MST_ColAction,3345400,406,182)
{
MSTControl="MainTable"
}
Add(DSC_Query,7961655,273,126)
{
SQL="SELECT name,width,align,hint,sql_text FROM TableColumn WHERE visible = 1 ORDER BY position"
DSManager="bd"
link(onQuery,11858022:doEvent1,[])
}
Add(StrList,16145845,448,126)
{
@Hint=#9:Подсказки|
AddHint(-25,-39,71,13,@Hint)
}
Add(DoData,15517015,448,238)
{
link(onEventData,5742612:doEvent1,[])
link(Data,16145845:Text,[])
}
Add(Hub,5742612,490,238)
{
link(onEvent2,16145845:doClear,[(510,251)(510,115)(436,115)(436,139)])
}
Add(FormatStr,8952363,357,182)
{
DataCount=3
Mask="%1=%2==%3"
link(onFString,3345400:doColAction,[])
}
Add(MT_MultiData,12338463,357,126)
{
From=3
link(onData1,16145845:doAdd,[])
link(onData2,8664963:doAdd,[(431,139)(431,167)])
}
Add(Hub,11858022,322,126)
{
link(onEvent1,12338463:doSeparateMT,[])
link(onEvent2,8952363:doString,[(346,139)(346,188)])
}
Add(MST_Clear,2976861,546,357)
{
MSTControl="MainTable"
}
Add(StrList,8664963,581,161)
{
@Hint=#10:sql строка|
AddHint(-19,-27,66,13,@Hint)
}
Add(FormatStr,8918789,833,427)
{
DataCount=3
Mask=""
Point(FString)
Point(doMask)
link(onFString,9807701:doQuery,[])
link(Str1,8471684:getVar,[])
link(Str2,2686934:getVar,[])
AddHint(97,-109,15,13,Mask)
}
Add(LineBreakEx,8471684,833,385)
{
Caption="col"
Type=2
}
Add(LineBreakEx,2686934,840,399)
{
Caption="order"
Type=2
}
Add(Replace,7910426,581,420)
{
SubStr="\r\n"
DestStr=","
link(onReplace,5531245:doTrim,[])
link(Str,8664963:Text,[])
}
Add(Trim,5531245,630,420)
{
Char=","
Mode=2
link(onTrim,10597090:doReplace,[])
}
Add(StrList,16350257,441,371)
{
Strings=#3:ASC|4:DESC|0:|
AddHint(-8,-57,36,39,Strings)
}
Add(ArrayRW,5014116,392,420)
{
link(onRead,1521343:doRead,[])
link(Array,8664963:Array,[(398,285)(601,285)])
link(Index,12387400:Value,[])
}
Add(ArrayRW,1521343,455,420)
{
link(onRead,15278921:doEvent1,[])
link(Array,16350257:Array,[])
link(Index,16068425:Count,[(468,410)(482,410)])
}
Add(CounterEx,16068425,476,357)
{
Max=1
Point(doReset)
link(onNext,15785294:doEvent1,[])
}
Add(LineBreakEx,16767817,392,462)
{
Caption="col"
Type=3
link(_Data,5014116:Item,[])
}
Add(LineBreakEx,4272821,455,462)
{
Caption="order"
Type=3
link(_Data,1521343:Item,[])
}
Add(Memory,12387400,399,357)
{
Default=Integer(0)
link(onData,16068425:doNext,[])
AddHint(0,-19,21,13,Default)
}
Add(HubEx,3716662,341,420)
{
link(onEvent,5014116:doRead,[])
}
Add(HintManager,15662105,518,196)
{
Name="hint_1"
Font=[MS Sans Serif,12,0,0,1]
HintWidth=150
}
Add(MTStrTbl,8976226,231,616)
{
Left=5
Top=205
Width=715
Height=140
Font=[MS Sans Serif,12,0,0,1]
Name="SettingTable"
Columns=#12:Название=100|10:Ширина=100|4:id=0|
ColumnClick=1
CheckBoxes=0
Grid=0
link(onCheck,4325680:doEvent1,[])
}
Add(DSC_Query,11316354,231,707)
{
SQL="SELECT name,width,id,visible FROM TableColumn ORDER BY position"
DSManager="bd"
link(onQuery,13973037:doSplit,[])
}
Add(MST_RowAction,9077761,336,749)
{
MSTControl="SettingTable"
}
Add(MST_CheckBoxes,987231,336,707)
{
MSTControl="SettingTable"
link(IndexRow,9077761:EndIdx,[(342,694)(387,694)(387,802)(349,802)])
}
Add(MT_Part,13973037,280,707)
{
After=2
link(onSplit,987231:doCheckBox,[])
link(onPart,9077761:doRowAction,[(320,720)(320,755)])
}
Add(DSC_Query,8389131,441,637)
{
DSManager="bd"
}
Add(FormatStr,5628721,399,637)
{
Mask="UPDATE TableColumn SET visible = %2 WHERE id=%1"
link(onFString,8389131:doQuery,[])
link(Str2,4723385:Value2,[])
}
Add(Hub,4325680,280,630)
{
OutCount=3
link(onEvent1,4723385:doValue,[(302,636)(302,594)])
link(onEvent2,12391129:doRead,[])
link(onEvent3,12312804:doEvent2,[(300,650)(300,672)(173,672)(173,230)])
}
Add(MT_MultiMem,4723385,399,588)
{
}
Add(MST_ArrayRows,13277145,308,588)
{
MSTControl="SettingTable"
}
Add(MT_MTArrayRW,12391129,308,637)
{
link(onRead,12839256:doSeparateMT,[])
link(Array,13277145:Strings,[])
}
Add(MT_MultiData,12839256,350,637)
{
From=2
Count=1
link(onData1,5628721:doString,[])
}
Add(Hub,12312804,217,217)
{
InCount=2
OutCount=5
link(onEvent1,3614531:doClear,[(245,223)(245,83)])
link(onEvent2,8664963:doClear,[(569,230)(569,174)])
link(onEvent3,7961655:doQuery,[(252,237)(252,132)])
link(onEvent4,15517015:doData,[])
link(onEvent5,3716662:doWork2,[(304,251)(304,426)])
}
Add(Hub,15785294,518,357)
{
link(onEvent1,2976861:doClear,[])
link(onEvent2,3716662:doWork3,[(541,370)(541,490)(345,490)])
}
Add(MST_Clear,3614531,273,77)
{
ClearAll=0
MSTControl="MainTable"
}
Add(InfoTip,582471,203,63)
{
Info=#16:Основная таблица|
Width=806
Height=494
}
Add(InfoTip,11398193,203,567)
{
Info=#16:Таблица настроек|
Width=316
Height=242
}
Add(InfoTip,13493447,532,231)
{
Info=#14:У меня с этим |12:компонентом |16:не компелируется|
HAlign=2
Width=183
Height=53
Margin=5
}
Add(Hub,15278921,546,420)
{
link(onEvent1,7910426:doReplace,[])
}
Add(Replace,10597090,679,420)
{
SubStr="t1.id"
DestStr="ROW_NUMBER () OVER (ORDER BY %1 %2)"
link(onReplace,5798790:doString,[])
}
Add(FormatStr,5798790,735,420)
{
DataCount=1
Mask="SELECT\r\n %1\r\nFROM TableOne t1; \r\n"
Point(FString)
Point(doMask)
link(onFString,8871894:doEvent1,[])
AddHint(-76,-94,99,52,Mask)
}
Add(Hub,8871894,784,420)
{
link(onEvent1,8918789:doMask,[(816,426)(816,440)])
link(onEvent2,8918789:doString,[])
}
Ответов: 866
Рейтинг: 186
|
|||
sla8a, поправил, всё вроде работает. Не стал менять дданные в твоей базе. Думаю, разберёшся
|
|||
карма: 18 |
|
Редактировалось 1 раз(а), последний 2025-02-19 17:08:14