Вверх ↑
Ответов: 322
Рейтинг: 8
#1: 2017-01-29 09:10:04 ЛС | профиль | цитата
Сделал прогу выделяет по условию строку.

Add(MainForm,4805343,119,392)
{
Width=477
Height=308
link(onCreate,14342500:doOpen,[])
}
Add(StringTableMT,14418821,518,511)
{
Left=5
Top=5
Width=340
Height=235
Columns=#5:1 |1:2|1:3|
ColorItems=0
IconsCheck=[]
MiscIcons=[]
Icons=[]
}
Add(DS_SQLite_Ex,14342500,238,406)
{
Name="baza"
FileName="notebook1.db"
link(onOpen,1908357:doQuery,[])
}
Add(DSC_Query,1908357,301,406)
{
SQL="SELECT\r\npid,\r\npnaim,\r\npcol\r\nFROM note"
DSManager="baza"
link(onQuery,10637041:doEvent1,[])
}
Add(Hub,10637041,364,406)
{
link(onEvent1,3834592:doSeparateMT,[])
link(onEvent2,3108686:doString,[(402,419)(402,517)])
}
Add(MT_MultiData,3834592,448,406)
{
Count=3
link(onData3,376179:doCompare,[])
}
Add(If_else,376179,511,420)
{
Op2=Integer(0)
link(onTrue,7253639:doWork1,[])
link(onFalse,7253639:doWork2,[])
}
Add(MultiElement,7253639,567,420)
{
link(onEvent1,11919426:doText,[])
}
BEGIN_SDK
Add(EditMulti,10445269,21,21)
{
EventCount=1
WorkCount=2
VarCount=1
link(doWork1,14077180:doData,[(63,27)(63,90)])
link(doWork2,12961711:doData,[(51,34)(51,181)])
link(Var1,3157552:Value,[(27,169)(230,169)])
}
Add(Memory,8244212,105,42)
{
Default=Integer(255)
}
Add(Memory,15221979,105,133)
{
Default=Integer(0)
}
Add(Memory,3157552,224,84)
{
link(onData,10445269:onEvent1,[(288,90)(288,27)])
}
Add(DoData,14077180,105,84)
{
link(onEventData,5431473:doEvent1,[])
link(Data,8244212:Value,[])
}
Add(DoData,12961711,105,175)
{
link(onEventData,5431473:doEvent2,[(163,181)(163,97)])
link(Data,15221979:Value,[])
}
Add(Hub,5431473,189,84)
{
InCount=2
OutCount=1
link(onEvent1,3157552:doValue,[])
}
END_SDK
Add(FormatStr,3108686,427,511)
{
DataCount=4
Mask="0#%1;%2;%3;%4"
link(onFString,14418821:doAdd,[])
link(Str1,7253639:Var1,[(433,467)(573,467)])
}
Add(Edit,11919426,623,420)
{
Left=380
Top=5
Text=""
}
Единственное пока не нашёл как менять цвет фона (только градации красного).
карма: 0

0