Make(delphi)
ver(4.05 build 186)
Add(MainForm,7194982,483,420)
{
 Width=616
 Height=441
 Point(onClose)
 link(onCreate,7377209:doOpen,[])
 link(onClose,7377209:doClose,[])
}
Add(Edit,6135272,504,266)
{
 Left=180
 Top=45
 Text=""
}
Add(Edit,9263952,567,266)
{
 Left=275
 Top=45
 Text=""
}
Add(Edit,11820544,644,266)
{
 Left=370
 Top=45
 Text=""
}
Add(StringTableMT,6358939,784,343)
{
 Left=65
 Top=80
 Width=475
 Height=250
 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)
 link(onClick,6185485:doSplit,[])
}
Add(Button,10230466,245,175)
{
 Left=475
 Top=45
 Width=65
 Caption="Добавить"
 link(onClick,9970:doEvent1,[])
}
Add(DS_SQLite,7377209,560,434)
{
 Name="db1"
 FileName="C:\\test.db"
 WaitClose=0
 Point(onError)
 link(onOpen,15046218:doEvent1,[])
}
Add(DSC_Query,4821829,707,378)
{
 SQL="SELECT rowid,* FROM table1  ORDER BY rowid DESC;"
 DSManager="db1"
 link(onQuery,6358939:doMT_Add,[])
}
Add(DSC_Exec,10923020,651,434)
{
 SQL="CREATE TABLE IF NOT EXISTS table1 (Date TEXT, nuber1 TEXT, nuber2 TEXT, nuber3 TEXT);"
 DSManager="db1"
}
Add(DSC_Exec,15737299,602,371)
{
 DSManager="db1"
 link(onExec,13786616:doEvent1,[])
}
Add(FormatStr,9133225,560,371)
{
 DataCount=4
 Mask="INSERT INTO table1 VALUES ('%1', '%2', '%3', '%4')"
 link(onFString,15737299:doExec,[])
 link(Str1,1427951:Result,[(566,359)(458,359)(458,387)(349,387)])
 link(Str2,6135272:Text,[(573,335)(510,335)])
 link(Str3,9263952:Text,[(580,335)(573,335)])
 link(Str4,11820544:Text,[(587,335)(650,335)])
}
Add(Hub,15046218,609,434)
{
 link(onEvent1,10923020:doExec,[])
 link(onEvent2,13786616:doEvent2,[(644,447)(644,384)])
}
Add(Hub,13786616,665,371)
{
 InCount=3
 link(onEvent1,6358939:doClear,[(770,377)(770,356)])
 link(onEvent2,4821829:doQuery,[])
}
Add(Hub,9970,301,175)
{
 OutCount=5
 link(onEvent1,9133225:doString,[(427,181)(427,377)])
 link(onEvent2,14558761:doSetDate,[(332,188)(332,342)])
 link(onEvent3,6135272:doText2,[(399,195)(399,279)])
 link(onEvent4,9263952:doText2,[(430,202)(430,279)])
 link(onEvent5,11820544:doText2,[(469,209)(469,279)])
}
Add(StrPart,6185485,847,343)
{
 Char="\9"
 link(onPart,8798942:doString,[])
 link(Str,6358939:Select,[(853,331)(825,331)(825,400)(797,400)])
}
Add(DSC_Exec,12012279,945,350)
{
 DSManager="db1"
 link(onExec,13786616:doEvent3,[(990,356)(990,416)(653,416)(653,391)])
}
Add(FormatStr,8798942,896,350)
{
 DataCount=1
 Mask="DELETE FROM table1 WHERE rowid=%1;"
 link(onFString,12012279:doExec,[])
}
Add(DatePicker,14558761,245,336)
{
 Left=70
 Top=45
 Width=85
 Height=21
 Color=65535
 Font=[MS Sans Serif,10,1,0,1]
 Ctl3D=0
 SetDateOnChange=1
 Point(DateTime)
 link(onChange,1427951:doConvert,[(272,342)(272,349)])
}
Add(DateConvertor,1427951,343,343)
{
 Mode=9
 Format="dd-MM-yyyy"
 Point(Data)
 Point(Result)
 link(Data,14558761:DateTime,[(349,331)(300,331)(300,380)(251,380)])
}
Add(DatePicker,15467716,294,511)
{
 Left=295
 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,[(321,517)(321,524)])
}
Add(DateConvertor,7553719,392,518)
{
 Mode=9
 Format="dd-MM-yyyy"
 Point(Data)
 Point(Result)
 link(Data,15467716:DateTime,[(398,506)(349,506)(349,555)(300,555)])
}
Add(Button,10992761,294,567)
{
 Left=400
 Top=360
 Width=105
 Caption="поиск по дате"
}