Make(delphi)
ver(4.05 build 186)
Add(MainForm,7194982,399,273)
{
 Width=990
 Height=907
 Point(onClose)
 link(onCreate,7377209:doOpen,[])
 link(onClose,7377209:doClose,[])
}
Add(Edit,6135272,434,119)
{
 Left=180
 Top=50
 TabOrder=1
 Text=""
}
Add(Edit,9263952,483,119)
{
 Left=240
 Top=50
 TabOrder=2
 Text=""
}
Add(Edit,11820544,560,119)
{
 Left=305
 Top=50
 TabOrder=3
 Text=""
}
Add(StringTableMT,6358939,735,196)
{
 Left=65
 Top=80
 Width=400
 Height=250
 TabOrder=5
 Columns=#5:rid=0|10:Date=90==2|12:nuber1=90==2|12:nuber2=90==2|12:nuber3=90==2|
 StrDelimiter="\9"
 TabGrid=0
 IconsCheck=[]
 MiscIcons=[]
 Icons=[]
 AutoTblStrLst=0
 Point(doMT_Add)
 Point(Strings)
 Point(onMouseDown)
 Point(doSelEndStr)
 Point(doGetStrList)
 link(onMouseDown,11170313:doEvent,[])
}
Add(Button,10230466,301,84)
{
 Left=365
 Top=50
 Width=65
 Caption="Добавить"
 link(onClick,9970:doEvent1,[])
}
Add(DS_SQLite,7377209,476,287)
{
 Name="db1"
 FileName="C://test.db"
 WaitClose=0
 Point(onError)
 link(onOpen,15046218:doEvent1,[])
}
Add(DSC_Query,4821829,749,518)
{
 DSManager="db1"
 link(onQuery,6358939:doMT_Add,[(786,524)(786,318)(723,318)(723,237)])
 link(SQL,4287698:Var,[(755,499)(734,499)])
}
Add(DSC_Exec,10923020,567,287)
{
 SQL="CREATE TABLE IF NOT EXISTS table1 (Date TEXT, nuber1 TEXT, nuber2 TEXT, nuber3 TEXT);"
 DSManager="db1"
}
Add(DSC_Exec,15737299,518,224)
{
 DSManager="db1"
 link(onExec,13786616:doEvent1,[])
}
Add(FormatStr,9133225,476,224)
{
 DataCount=4
 Mask="INSERT INTO table1 VALUES ('%1', '%2', '%3', '%4')"
 link(onFString,15737299:doExec,[])
 link(Str1,1427951:Result,[(482,202)(279,202)])
 link(Str2,6135272:Text,[(489,188)(440,188)])
 link(Str3,9263952:Text,[(496,188)(489,188)])
 link(Str4,11820544:Text,[(503,188)(566,188)])
}
Add(Hub,15046218,525,287)
{
 link(onEvent1,10923020:doExec,[])
 link(onEvent2,13786616:doEvent2,[(560,300)(560,237)])
}
Add(Hub,13786616,581,224)
{
 InCount=3
 link(onEvent1,6358939:doClear,[(721,230)(721,209)])
 link(onEvent2,1534372:doString,[(623,237)(623,363)])
}
Add(Hub,9970,350,84)
{
 OutCount=4
 link(onEvent1,9133225:doString,[(378,90)(378,230)])
 link(onEvent2,11820544:doText2,[(545,97)(545,132)])
 link(onEvent3,9263952:doText2,[(463,104)(463,132)])
 link(onEvent4,6135272:doText2,[(392,111)(392,132)])
}
Add(StrPart,6185485,938,217)
{
 Char="\9"
 link(onPart,8798942:doString,[])
 link(Str,6358939:Select,[(944,184)(776,184)(776,253)(748,253)])
}
Add(DSC_Exec,12012279,1036,224)
{
 DSManager="db1"
 link(onExec,13786616:doEvent3,[(1079,230)(1079,263)(576,263)(576,244)])
}
Add(FormatStr,8798942,987,224)
{
 DataCount=1
 Mask="DELETE FROM table1 WHERE rowid=%1;"
 link(onFString,12012279:doExec,[])
}
Add(IndexToChanel,11170313,784,203)
{
 link(onEvent2,9942662:doPopupHere,[])
}
Add(PopupMenu,9942662,833,210)
{
 Menu=#18:Отменить удаление.|8:Удалить.|14:Редактировать.|
 link(onClick,325605:doEvent,[])
}
Add(IndexToChanel,325605,875,210)
{
 Count=3
 Data=Integer(0)
 link(onEvent2,6185485:doSplit,[])
 link(onEvent3,12585790:Method,[(919,230)(919,310)])
}
Add(PointHint,12585790,931,280)
{
 Info=#14:Редактирование|
 Width=113
 Height=60
}
Add(DatePicker,14558761,224,119)
{
 Left=75
 Top=50
 Width=85
 Height=21
 SetDateOnChange=1
 Point(DateTime)
 link(onChange,1427951:doConvert,[(265,125)(265,153)])
}
Add(DateConvertor,1427951,273,147)
{
 Mode=9
 Format="dd-MM-yyyy"
 Point(Data)
 Point(Result)
 link(Data,14558761:DateTime,[(279,106)(208,106)(208,158)(230,158)])
}
Add(DatePicker,15467716,854,378)
{
 Left=240
 Top=360
 Width=85
 Height=21
 Color=65535
 Font=[MS Sans Serif,10,1,0,1]
 Ctl3D=0
 SetDateOnChange=1
 Point(DateTime)
 link(onChange,7553719:doConvert,[])
}
Add(DateConvertor,7553719,917,378)
{
 Mode=9
 Format="dd-MM-yyyy"
 Point(Data)
 Point(Result)
 link(onResult,886002:doString,[])
 link(Data,15467716:DateTime,[(923,359)(910,359)(910,426)(860,426)])
}
Add(FormatStr,886002,980,378)
{
 Mask="SELECT rowid,* FROM table1  WHERE Date='%1';"
 Point(FString)
 link(onFString,7246378:doText,[])
}
Add(ChanelToIndex,9778624,609,448)
{
 link(onIndex,4287698:doIndex,[])
}
Add(GetIndexData,4287698,728,448)
{
 link(onIndex,4821829:doQuery,[(772,454)(772,489)(716,489)(716,524)])
 link(Data1,5868771:Text,[])
 link(Data2,7246378:Text,[(741,443)(1049,443)])
}
Add(Edit,5868771,728,357)
{
 Left=745
 Top=640
 Text=""
 link(Str,1534372:FString,[(734,345)(696,345)(696,401)(657,401)])
}
Add(Edit,7246378,1043,378)
{
 Left=650
 Top=725
 Text=""
 link(Str,886002:FString,[(1049,366)(1017,366)(1017,422)(986,422)])
}
Add(RadioButton,9300976,518,420)
{
 Left=345
 Top=340
 Width=90
 Selected=0
 Caption="нет поиска"
 link(onSelect,9778624:doWork1,[(558,426)(558,454)])
}
Add(RadioButton,9009600,518,476)
{
 Left=345
 Top=360
 Width=105
 Caption="поиск по дате"
 link(onSelect,9778624:doWork2,[(586,482)(586,461)])
}
Add(FormatStr,1534372,651,357)
{
 Mask="SELECT rowid,* FROM table1  ORDER BY rowid DESC;"
 Point(FString)
 link(onFString,5868771:doText,[])
}