*Конвертирован под новую версию HiAsm 20081229_2000#13#10Модернизированый Sqlite_Demo.#13#101. Добавлена кнопка Browse#13#102. Для ввода команд, вместо Edit применен ComboBox с запоминанием введенной команды (при потере фокуса)#13#103. Добавлена возможность сохранения активной таблицы в виде текстового файла.#13#104. Список таблиц выводится в алфавитном порядке.#13#105. Сообщения об ошибках выводится в окно сообщений в первую строку. И в это же окно выводится и информация о создании открываемой БД.#13#106. При <Close> очищаются все окна.#13#10#13#10* Примечание: #13#101.тем, кто использует компилятор FPC,  необходимо удалить из схемы элемент StyleXP !#13#102. Если путь к открываемой БД содержит не английские буквы - работать не будет.#13#10#13#10
Make(delphi)
ver(4.04 build 183)
Add(MainForm,15567381,14,77)
{
 Width=979
 Height=610
 Font=[Tahoma,8,1,0,204]
 Caption="AdmSQLiteMT"
 Position=1
 Point(doIcon)
 link(onCreate,9395875:doReadPathToDB,[])
}
Add(ChildPanelEx,9395875,77,91)
{
 link(onEvent,1897764:doAddInfo,[])
 link(onColumns,1897764:doAddCol,[])
 link(onResult,1897764:doAddRow,[])
 link(onAddTable,1897764:doAddTable,[])
 link(onClear,1897764:doClear,[])
 link(doWcol,1897764:doColAction,[])
}
BEGIN_SDK
  Add(EditMultiEx,2041326,28,14)
  {
   WorkCount=#42:doReadPathToDB=Чтение пути к БД из реестра|30:doOrderBy=Запрос с сортировкой|34:doChangeTable1=Имя текущей таблицы|43:doInit=Количество записей в текущей таблице|
   EventCount=#25:onEvent=В окно информации|29:onColumns=Список имен колонок|34:onResult=Данные результата запроса|32:onAddTable=В окно имен таблиц БД|7:onClear|6:doWcol|
   Width=627
   Height=572
   VOffset=14
   link(doReadPathToDB,117125:doRead,[])
   link(doOrderBy,4490964:doString,[(31,41)(31,377)])
   link(doChangeTable1,12893583:doEvent1,[(36,48)(36,314)])
   link(doInit,12692548:doEvent1,[(35,55)(35,167)])
  }
  Add(Panel,1153699,469,490)
  {
   Width=971
   Height=101
   Align=2
   Color=16776680
   Font=[Tahoma,8,0,0,204]
   Ctl3D=0
   ModeSp=3
   BevelInner=0
   Point(doColor)
  }
  Add(Button,11958215,294,119)
  {
   @Color=16766164
   Left=530
   Top=10
   Width=60
   Height=21
   Font=[Tahoma,9,1,0,204]
   TabOrder=-1
   Caption="Open"
   link(onClick,8598513:doOpen,[])
  }
  Add(Edit,11123252,343,77)
  {
   Left=80
   Top=10
   Width=445
   Color=15793151
   Font=[Tahoma,8,0,0,204]
   Text="Elements\Delphi\Elements.db"
   link(onChange,117125:doWrite,[(381,83)(381,20)(226,20)(226,41)])
  }
  Add(Button,10284059,112,196)
  {
   @Color=16766164
   Left=595
   Top=10
   Width=60
   Height=21
   Font=[Tahoma,9,1,0,204]
   TabOrder=-1
   Caption="Close"
   link(onClick,11969734:doWork2,[])
  }
  Add(Button,16020080,427,364)
  {
   @Color=16766164
   Left=5
   Top=40
   Width=65
   Height=21
   Font=[Tahoma,9,1,0,204]
   Caption="Exec"
   link(onClick,921486:doExec,[])
  }
  Add(DoData,4600624,532,287)
  {
   link(onEventData,9564302:doCompare,[])
   link(Data,12527344:Var3,[(538,282)(523,282)(523,320)])
  }
  Add(SQLite_DB,8598513,343,119)
  {
   link(onOpen,81402:doEvent1,[])
   link(onError,6373040:doWork,[])
   link(FileName,11123252:Text,[])
  }
  Add(SQLite_Exec,921486,490,364)
  {
   link(onError,2679584:doWork,[])
   link(dbHandle,7597315:Var,[])
   link(SQL,12527344:Var2,[])
  }
  Add(Button,1246604,77,434)
  {
   @Color=16766164
   Left=5
   Top=70
   Width=65
   Height=21
   Font=[Tahoma,9,1,0,204]
   TabOrder=-1
   Caption="Query"
   link(onClick,15265412:doWork3,[(172,440)])
  }
  Add(Edit,3174856,294,315)
  {
   Left=80
   Top=70
   Width=460
   Height=22
   Color=15793151
   Font=[Tahoma,8,0,0,204]
   Text=""
   link(onChange,5660882:doValue,[])
  }
  Add(SQLite_Query,14626731,287,413)
  {
   link(onQuery,10731457:In,[])
   link(onColumns,12687218:In,[])
   link(onError,6683680:doWork,[])
   link(dbHandle,12584296:Var,[])
   link(SQL,3174856:Text,[])
  }
  Add(Registry,117125,238,28)
  {
   HKey=1
   Key="software\hiasm_prog"
   Value="dbname"
   link(onRead,11123252:doText2,[(307,34)(307,90)])
  }
  Add(SQLite_Query,5629196,469,133)
  {
   @Hint=#19:Чтение имен таблиц |13:и их вывод в |18:алфавитном порядке|
   SQL="select name from sqlite_master ORDER BY name"
   link(onQuery,3365573:doWork3,[(522,139)])
   link(onError,12705031:doWork1,[(522,153)])
  }
  Add(HubEx,15265412,168,406)
  {
   link(onEvent,4682163:doEvent1,[(213,412)(213,433)])
  }
  Add(StrCat,15850111,196,315)
  {
   Str1="SELECT * FROM   "
   link(onStrCat,3174856:doText,[])
   link(Str2,16173470:Var,[])
  }
  Add(Hub,12893583,63,308)
  {
   @Color=9342719
   OutCount=3
   link(onEvent2,15850111:doStrCat,[])
   link(onEvent3,15265412:doWork1,[(172,328)])
  }
  Add(Hub,81402,427,119)
  {
   @Color=9342719
   OutCount=4
   link(onEvent1,13265523:doValue,[(458,125)(458,83)])
   link(onEvent2,12539203:doData,[(465,132)(465,104)])
   link(onEvent3,5629196:doQuery,[])
   link(onEvent4,4973532:doQuery,[(458,146)(458,174)])
  }
  Add(HubEx,3365573,518,98)
  {
   link(onEvent,2041326:onAddTable,[(636,104)(636,55)])
  }
  Add(DropFile,16683987,238,77)
  {
   link(onDropFile,14004071:doWork2,[])
  }
  Add(HubEx,14004071,280,77)
  {
   link(onEvent,11123252:doText,[])
  }
  Add(FormatStr,4490964,77,371)
  {
   DataCount=3
   Mask="%1 ORDER BY %2  %3"
   link(onFString,1259825:doEvent1,[])
   link(Str1,5660882:Value,[(83,357)(349,357)])
  }
  Add(Hub,1259825,119,371)
  {
   @Color=9342719
   link(onEvent1,6651086:doWork3,[(277,377)])
   link(onEvent2,15265412:doWork2,[(155,384)(155,412)])
  }
  Add(DoData,12539203,469,98)
  {
   Data=String()
   link(onEventData,3365573:doWork2,[])
  }
  Add(Button,14099037,112,112)
  {
   @Color=16766164
   Left=5
   Top=10
   Width=65
   Height=21
   Font=[Tahoma,9,1,0,204]
   TabOrder=-1
   Caption="Browse"
   link(onClick,14393362:doEvent1,[])
  }
  Add(ODialog,2567534,238,119)
  {
   Filter="SQLite files|*.db|New Format|*.db3|All|*.*"
   FileName=""
   link(onExecute,14004071:doWork3,[(284,125)])
  }
  Add(SQLite_Query,4973532,469,168)
  {
   @Hint=#23:SQL-запросы,примененные|15:при создании БД|
   SQL="Select sql from sqlite_master"
   link(onQuery,12705031:doWork2,[])
   link(onError,12705031:doWork3,[(522,188)])
  }
  Add(GetDataEx,12527344,497,315)
  {
   link(Data,11439649:EditText,[])
  }
  Add(ComboBox,11439649,483,273)
  {
   Left=80
   Top=40
   Width=575
   Height=21
   Color=15793151
   Font=[Tahoma,8,0,0,204]
   Ctl3D=0
   Text=""
   DataType=1
   Point(EditText)
   Point(onKillFocus)
   link(onKillFocus,4600624:doData,[])
  }
  Add(If_else,9564302,574,287)
  {
   Type=5
   link(onTrue,11439649:doAdd,[(621,293)(621,263)(471,263)(471,279)])
  }
  Add(Hub,15325790,287,196)
  {
   @Color=9342719
   OutCount=3
   link(onEvent1,2041326:onClear,[(644,202)(644,62)])
   link(onEvent2,8598513:doClose,[(332,209)(332,132)])
   link(onEvent3,14334116:doData,[(327,216)(327,237)(184,237)(184,251)])
  }
  Add(DoData,14334116,196,245)
  {
   Data=String()
   link(onEventData,15378999:doEvent1,[])
  }
  Add(Hub,15378999,245,245)
  {
   @Color=9342719
   OutCount=3
   link(onEvent1,15335792:doWork3,[(277,251)])
   link(onEvent2,7899699:In,[])
   link(onEvent3,6651086:doWork1,[(277,265)])
  }
  Add(LineBreak,16689218,63,511)
  {
   Caption="Clear"
   Color=65535
   Primary=[7899699,224,-259]
  }
  Add(LineBreakEx,6373040,385,126)
  {
   @Color=16748287
   Caption="Err"
  }
  Add(LineBreakEx,14945096,595,28)
  {
   @Color=16748287
   Caption="Err"
   Type=1
   link(OnEvent,2041326:onEvent,[])
  }
  Add(LineBreakEx,5421584,532,168)
  {
   @Color=16748287
   Caption="Err"
  }
  Add(LineBreakEx,2679584,546,364)
  {
   @Color=16748287
   Caption="Err"
  }
  Add(LineBreakEx,6683680,329,427)
  {
   @Color=16748287
   Caption="Err"
  }
  Add(HubEx,12705031,518,168)
  {
   link(onEvent,5421584:doWork,[])
  }
  Add(InfoTip,14668348,420,231)
  {
   Info=#66:Ручной ввод,запоминание,вызов ранее введенных команд и "Выполнить"|
   Font=[MS Sans Serif,8,0,255,1]
   Frame=3
   Width=225
   Height=179
   Margin=3
  }
  Add(HubEx,6651086,273,322)
  {
   link(onEvent,3174856:doText2,[])
  }
  Add(InfoTip,9040042,56,231)
  {
   Info=#23:Выполнение запроса к БД|
   Font=[MS Sans Serif,8,1,255,1]
   Frame=3
   VAlign=2
   HAlign=2
   Width=358
   Height=333
   Margin=10
  }
  Add(Hub,14393362,175,112)
  {
   @Color=9342719
   link(onEvent1,11969734:doWork1,[(200,118)])
   link(onEvent2,2567534:doExecute,[])
  }
  Add(HubEx,11969734,196,196)
  {
   link(onEvent,15325790:doEvent1,[])
  }
  Add(LineBreak,12709383,518,35)
  {
   Caption="onColums"
   Color=65280
   link(Out,2041326:onColumns,[])
   Primary=[12687218,-189,385]
  }
  Add(LineBreak,10348117,588,42)
  {
   Caption="Rows"
   Color=16777088
   link(Out,2041326:onResult,[])
   Primary=[10731457,-259,371]
  }
  Add(Memory,5660882,343,315)
  {
  }
  Add(Hub,4682163,238,427)
  {
   @Color=9342719
   OutCount=3
   link(onEvent2,14626731:doQuery,[(276,440)(276,419)])
   link(onEvent3,2041326:doWcol,[(650,447)(650,69)])
  }
  Add(Label,10721069,294,161)
  {
   Left=545
   Top=74
   Width=88
   Height=17
   Color=16776680
   Font=[MS Sans Serif,8,1,0,1]
   Caption=""
  }
  Add(GlobalVar,13265523,469,77)
  {
   @Color=7063295
   Name="dbHandle"
  }
  Add(GlobalVar,7597315,490,336)
  {
   @Color=7063295
   Name="dbHandle"
  }
  Add(GlobalVar,12584296,287,385)
  {
   @Color=7063295
   Name="dbHandle"
  }
  Add(GlobalVar,16173470,203,287)
  {
   @Color=14474240
   Name="RabTab"
  }
  Add(HubEx,15335792,273,161)
  {
   link(onEvent,10721069:doText,[])
  }
  Add(Memory,6829097,161,448)
  {
   Default=Integer(100)
  }
  Add(InfoTip,12032848,427,56)
  {
   Info=#15:Информация о БД|
   Font=[MS Sans Serif,8,1,255,1]
   Frame=3
   Width=148
   Height=158
   Margin=3
  }
  Add(FormatStr,9862442,238,161)
  {
   DataCount=1
   Mask="Total lines: %1"
   link(onFString,15335792:doWork2,[])
  }
  Add(Hub,12692548,84,161)
  {
   @Color=9342719
   link(onEvent1,9862442:doString,[])
  }
  Add(StrCat,1078990,161,497)
  {
  }
  Add(ChildGroupBox,10683234,238,497)
  {
  }
  BEGIN_SDK
    Add(EditMulti,15964330,21,21)
    {
    }
    Add(GroupBox,2209472,35,105)
    {
     Left=700
     Top=5
     Width=266
     Height=88
    }
    Add(ChildPanelEx,11843543,110,110)
    {
     @Hint=#9:Навигатор|
    }
    BEGIN_SDK
      Add(EditMultiEx,16199866,21,21)
      {
       WorkCount=#6:doInit|
       EventCount=#22:onLimit=Строка условия|
       VarCount=#21:vLimit=Строка условия|
       DataCount=#16:CountLinesInTabl|18:CountLinesInTablMT|
       Width=258
       Height=340
       VOffset=70
       HOffset=150
       link(doInit,4259439:doEvent1,[])
       link(vLimit,11889548:Value,[(177,245)(223,245)])
      }
      Add(Panel,5690641,49,105)
      {
       Left=125
       Top=60
       Width=131
       Height=22
       Color=16777215
      }
      Add(InlineCode,1940250,171,91)
      {
       WorkPoints=#6:doInit|6:doWork|
       EventPoints=#6:onWork|
       DataPoints=#8:MaxCount|13:TabLinesCount|
       Code=#0:|0:|15:unit HiAsmUnit;|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|22:    mc,tlc,st:integer;|9:   public|16:{ Event Points }|21:  onWork : THI_Event;|15:{ Data Points }|38:  MaxCount, TabLinesCount : THI_Event;|0:|15:{ Work Points }|47:Procedure doInit (var _Data:TData; Index:word);|47:Procedure doWork (var _Data:TData; Index:word);|0:|5: end;|0:|14:implementation|15:{ Work Points }|64:Procedure  THiAsmClass.doInit; // (var _Data:TData; Index:word);|5:Begin|36:  mc := ReadInteger(_Data,MaxCount);|41: tlc := ReadInteger(_Data,TabLinesCount);|4:end;|0:|64:Procedure  THiAsmClass.doWork; // (var _Data:TData; Index:word);|13:var s:string;|5:Begin|25: Case toInteger(_Data) of|14:    0:st := 0;|72:    1:begin st := st - tlc; If st < 0 then st := 0; end;                |52:    2:begin st := st-1; If st < 0 then st := 0; end;|68:    3:begin st := st + 1; If st > mc - tlc then st := mc - tlc; end;|68:    4:begin st := st + tlc; If st > mc - tlc then st := mc-tlc; end;|21:    5:st := mc - tlc;|6:  end;|57:  s:=' LIMIT ' + int2str(tlc) + ' OFFSET ' + int2str(st);|36: _hi_CreateEvent(_data, @onWork,s); |4:end;|0:|4:end.|
       link(onWork,11889548:doValue,[])
       link(MaxCount,16199866:CountLinesInTabl,[])
       link(TabLinesCount,16199866:CountLinesInTablMT,[])
      }
      Add(ChanelToIndex,9332956,112,140)
      {
       Count=6
       link(onIndex,1940250:doWork,[(158,146)(158,104)])
      }
      Add(Memory,11889548,217,91)
      {
       link(onData,16199866:onLimit,[])
      }
      Add(Hub,4259439,28,91)
      {
       link(onEvent1,1940250:doInit,[])
       link(onEvent2,5589024:doWork1,[(95,104)])
      }
      Add(HubEx,5589024,91,140)
      {
       link(onEvent,9332956:doWork1,[])
      }
      Add(ImgBtn,9245056,49,140)
      {
       Left=1
       Top=1
       Width=16
       Height=16
       Font=[MS Sans Serif,8,1,0,1]
       TabOrder=-1
       Flat=1
       Normal=[ZIP3604000078DA73F235636100033320D600620128666450804840E591C1FF41023676A7FE5F906BF57F7585EBFF1DAD41FF0F4F88FD7F66462A1883D82031901C480D482D3A98976DF1FFFFD333FF811AF063A01AB05A2C60798923C48CCBCBB163A01C580D3E7FD4FB40CCB8B7071503C5C07244803D9D6110339030588C047074523C5C2F984D068085FF50887F70BC108A7B28C61687D8C21C17C61617373676FFBF302FF7FFB56515FFEF6C68FDFF68C784FFCFF6CD0063101B24069203A901A91D2C0000295DA284]
       link(onClick,5589024:doWork2,[])
      }
      Add(ImgBtn,16660573,49,175)
      {
       Left=22
       Top=1
       Width=16
       Height=16
       Font=[MS Sans Serif,8,1,0,1]
       TabOrder=-1
       Flat=1
       Normal=[ZIP3604000078DA73F235636100033320D600620128666450804840E591C1FF41023676A7FE9F916A04C620362E804B7E7686E9FFFF67668031988D0580C49F6DAAC72A3F3FC712AE1FCCC622FF7C73034EF9258576FFFF9F9B0BC660369ADC8B6DAD38E541606599F3FFFF97968031988D24FE6A570F5C0E5D1E06D6D778FEFF7F6D2D1883D950B1D7FBA7C0C5D1E591C19646BFFFFF6F6F0363301B26F6F40C5C1C5D1E19EC6A0FF9FFFFFE7E3006B391C5416640E5D0E561607F4FE4FFFF8F8F8331988D2E073203873C081C9918075103C4603689F227A726C1E5C16C2C00A6069BFC8D8DDDC0A4910AC620362E40489EDE000094B799C6]
       link(onClick,9332956:doWork2,[(97,181)(97,153)])
      }
      Add(ImgBtn,1115812,49,210)
      {
       Left=43
       Top=1
       Width=16
       Height=16
       Font=[MS Sans Serif,8,1,0,1]
       TabOrder=-1
       Flat=1
       Normal=[ZIP3604000078DA73F235636100033320D600620128666450804840E591C17F3A8119A946FF3776A792A57756BAC9FF679BEAC134A9605EB6C5FFE79B1BFEFF3F3303CC26052CCCB3FEFF626BCBFFFFE7E68031884F2C5856ECF0FFE58ECEFFFF2F2C84639018316055B9CBFF57BBFBFEFFBFBC1C0583C40981F5359EFF5FEF9FFAFFFFF57518182447086C69F4FBFFFFE999FFFF6F6DC5C0603922C0CEB6608819F7F6A060B03891606F5738C48C8787E0182C460238D41F0331E3F1093006F349044727C543CC0062309B0C706A5A32583F9826139C9991FAFFC6C66EAAE74B008807BFCE]
       link(onClick,9332956:doWork3,[(97,216)(97,160)])
      }
      Add(ImgBtn,9050570,49,245)
      {
       Left=64
       Top=1
       Width=16
       Height=16
       Font=[MS Sans Serif,8,1,0,1]
       TabOrder=-1
       Flat=1
       Normal=[ZIP3604000078DA73F235636100033320D600620128666450804840E591C17F2A838DDDA9FF67A41A91AD7F56BAC9FF679BEAC13439605EB6C5FFFF6766FC7FBEB901C226112CCCB3FEFFFFDC1C307EB1B505C227012C2B76F8FFFFC242387EB9A3132246245855EEF2FFFFE5E528F8D5EE3E883811607D8DE7FFFFD7D761E0D7FBA742E408802D8D7EFFFFDFDA8A899F9E81C811003BDB82FFFFBFB7071503F582C589007BBBC2FFFF7F780881817AC162448243FD31FFFF3F3E01C140BD603E09E0E8A478B03E1006B34904A7A62583F5826932C08D8DDDC0E49BFA9F5E00001FD9BFCE]
       link(onClick,9332956:doWork4,[(97,251)(97,167)])
      }
      Add(ImgBtn,10470493,49,280)
      {
       Left=85
       Top=1
       Width=16
       Height=16
       Font=[MS Sans Serif,8,1,0,1]
       TabOrder=-1
       Flat=1
       Normal=[ZIP3604000078DA73F235636100033320D600620128666450804840E591C1FF41023676A7FE9F916A44501E84416C74303BC3F4FFB34DF5601A1B008B9F9901C6D8D4CCCFB104CB3DDFDC0061E39007616CF24B0AEDFEFF3F37178C5F6C6B85F071C8A3CB81C0CA32E7FFFF2F2D81E357BB7A206258E491C561607D8DE7FFFFD7D6A2E0D7FBA740C4D1E46162C8604BA3DFFFFFB7B7A1E2A76720E268F2303164B0AB3DE4FFFFFBFB1118A8172C86451E591C06F6F744FEFFFFF8380403F582F938E4D1E540E0C8C438B03E1006B349943F3935092C07A6B100983C2E353736760393462ACEF40B930761107BB000003DE699C6]
       link(onClick,9332956:doWork5,[(97,286)(97,174)])
      }
      Add(ImgBtn,14344029,49,315)
      {
       Left=107
       Top=1
       Width=16
       Height=16
       Font=[MS Sans Serif,8,1,0,1]
       TabOrder=-1
       Flat=1
       Normal=[ZIP3604000078DA73F235636100033320D600620128666450804840E591C1FF41023676A7FE5F906BF57F7585EBFF1DAD41FF0F4F88FD7F66462A1883D82031901C480D482D3A585EE2F81FA898280C568B06F67486FDFFFFF40C5118AC160DDCD8D8FDFFC2BCDCFFD79655FCBFB3A1F5FFA31D13FE3FDB37038C416C9018480EA406A4961E6046AA11189303E6655BFC7FBEB9018C416C5200287C5F6E6D828737888D2DCCB1A6837A9FFF6FF64EF8FFFFF272140C1203C9E103A078797772D1FFFFF7F660C520396C7107024727C5131DFF60B54320FE890100AF4AA57A]
       link(onClick,9332956:doWork6,[(97,321)(97,181)])
      }
    END_SDK
    Add(ChildGroupBox,15832623,161,112)
    {
     @Hint=#22:Панель записи таблицы |16:в текстовый файл|
    }
    BEGIN_SDK
      Add(EditMulti,1114294,3,3)
      {
       WorkCount=2
       Width=454
       Height=291
       link(doWork1,13028726:doStrCat,[(50,9)(50,76)])
       link(doWork2,16275145:doEvent1,[])
      }
      Add(GroupBox,4353856,14,35)
      {
       Left=5
       Top=4
       Width=252
       Height=49
       Color=16777183
       Font=[MS Sans Serif,8,0,255,1]
       Ctl3D=0
       Caption="Save table as cvs-file"
      }
      Add(Button,1469172,395,63)
      {
       Left=190
       Top=20
       Font=[Tahoma,9,1,0,204]
       Enabled=1
       Ctl3D=0
       WinStyle=1
       Caption="Save"
       Point(doEnabled)
       link(onClick,10892918:doEvent1,[(440,69)(440,255)(16,255)(16,132)])
      }
      Add(Edit,5898392,301,70)
      {
       Left=5
       Top=20
       Width=180
       Color=15793151
       Text=""
       link(onChange,1062615:doWork2,[])
      }
      Add(StrCat,13028726,96,70)
      {
       Str2=".csv"
       link(onStrCat,5898392:doText,[])
       link(Str1,1808633:Var2,[])
      }
      Add(GlobalVar,16173470,96,35)
      {
       Name="RabTab"
      }
      Add(DataToFile,14599168,301,210)
      {
       Type=7
       link(Stream,5272720:Stream,[])
      }
      Add(FileStream,5272720,301,126)
      {
       Mode=1
       link(FileName,5898392:Text,[])
      }
      Add(SQLite_Query,5599435,98,210)
      {
       link(onQuery,13752483:doWork2,[])
       link(onColumns,13752483:doWork3,[(141,223)])
       link(dbHandle,12584296:Var,[])
      }
      Add(Hub,10892918,28,126)
      {
       OutCount=3
       link(onEvent1,5272720:doOpen,[])
       link(onEvent2,6694209:doString,[(49,139)(49,216)])
       link(onEvent3,5272720:doClose,[(196,146)(196,139)])
      }
      Add(FormatStr,6694209,56,210)
      {
       DataCount=1
       Mask="SELECT * FROM %1"
       link(onFString,5599435:doQuery,[])
       link(Str1,1808633:Var1,[(62,61)])
      }
      Add(GlobalVar,12584296,98,168)
      {
       @Color=7063295
       Name="dbHandle"
      }
      Add(MT_String,2489212,154,210)
      {
       link(onResult,5809579:doReplace,[])
      }
      Add(GetDataEx,1808633,96,56)
      {
       link(Data,16173470:Var,[])
      }
      Add(HubEx,13752483,137,210)
      {
       link(onEvent,2489212:doStr,[])
      }
      Add(Replace,5809579,196,210)
      {
       SubStr=";"
       DestStr="','"
       link(onReplace,11946292:doString,[])
      }
      Add(FormatStr,11946292,252,210)
      {
       DataCount=1
       Mask="'%1'"
       link(onFString,14599168:doPut,[])
      }
      Add(ChanelToIndex,1062615,350,63)
      {
       link(onIndex,1469172:doEnabled,[])
      }
      Add(Hub,16275145,84,10)
      {
       link(onEvent1,5898392:doText2,[(296,16)(296,83)])
       link(onEvent2,1062615:doWork1,[(344,23)(344,69)])
      }
    END_SDK
  END_SDK
END_SDK
Add(ChildPanelEx,1897764,140,91)
{
 link(onSort,9395875:doOrderBy,[(201,97)(201,159)(52,159)(52,104)])
 link(onTableChange,9395875:doChangeTable1,[(193,104)(193,151)(57,151)(57,111)])
 link(CountLines,9395875:doInit,[(186,111)(186,143)(64,143)(64,118)])
}
BEGIN_SDK
  Add(EditMultiEx,9924836,21,0)
  {
   WorkCount=#9:doAddInfo|8:doAddCol|8:doAddRow|10:doAddTable|15:doClear=Очистка|11:doColAction|
   EventCount=#33:onSort=Имя колонки для сортировки|33:onTableChange=Имя текущей таблицы|29:CountLines=Количество записей|
   Width=703
   Height=473
   HOffset=10
   link(doAddInfo,1933824:doWork1,[(172,6)])
   link(doAddCol,6966357:doEvent1,[(103,13)(103,111)])
   link(doAddRow,15410866:doAddRow,[(94,20)(94,97)])
   link(doAddTable,10520:doWork1,[])
   link(doClear,3091927:doEvent1,[(84,34)(84,62)])
   link(doColAction,13741915:doColAction,[(47,41)(47,111)])
  }
  Add(Panel,14357374,49,217)
  {
   Top=105
   Width=971
   Height=471
   Align=5
   Font=[Tahoma,8,0,0,204]
   BevelInner=0
   Point(doColor)
  }
  Add(Hub,6966357,112,105)
  {
   @Color=9342719
   OutCount=3
   link(onEvent1,15813322:doWork2,[])
   link(onEvent2,15410866:doAddCols,[(149,118)(149,104)])
   link(onEvent3,1849858:doLoad,[(148,125)(148,132)])
  }
  Add(Hub,9296352,329,364)
  {
   @Color=9342719
   link(onEvent1,9548068:doStrMask,[])
   link(onEvent2,10983168:doStr,[(350,377)(350,426)])
  }
  Add(MT_String,10983168,357,420)
  {
   Delimeter=","
   link(onResult,3795758:doString,[])
  }
  Add(MT_Add,10167940,280,364)
  {
   link(onAdd,9296352:doEvent1,[])
   link(Data,1849858:MThread,[(286,317)(265,317)])
  }
  Add(MT_Array,1849858,252,126)
  {
   @Hint=#27:Запоминаем названия колонок|
   AddHint(-220,33,176,13,@Hint)
  }
  Add(FormatStr,3795758,399,420)
  {
   DataCount=3
   Mask="INSERT INTO %1(%2) VALUES(%3)"
   link(onFString,3832485:doWork3,[(599,426)])
   link(Str1,8911680:Var,[])
   link(Str3,9548068:Str,[])
  }
  Add(MT_String,9548068,413,343)
  {
   Delimeter=","
   Mask="null"
   Point(doStrMask)
  }
  Add(Case,15658564,119,357)
  {
   Value=Integer(1)
   link(onTrue,12490530:doPopupHere,[])
  }
  Add(PopupMenu,12490530,168,364)
  {
   Menu=#3:Add|6:Delete|
   link(onClick,12652234:doEvent,[])
  }
  Add(IndexToChanel,12652234,210,364)
  {
   link(onEvent1,10167940:doAdd,[])
   link(onEvent2,3423042:doEvent1,[(254,377)(254,265)])
  }
  Add(MultiElementEx,6398218,476,259)
  {
   link(onResult,3963481:doString,[])
   link(MT,11284801:Var3,[(482,163)])
  }
  BEGIN_SDK
    Add(EditMultiEx,15282780,3,3)
    {
     WorkCount=#5:doMix|
     EventCount=#8:onResult|
     DataCount=#2:MT|
     Width=321
     link(doMix,9032576:doEnum,[(12,9)(12,90)])
    }
    Add(MT_Enum,9032576,42,84)
    {
     link(onItem,1907825:doRead,[])
     link(onEndEnum,3370294:doEvent1,[(81,97)(81,146)])
    }
    Add(ArrayRW,1907825,119,84)
    {
     link(onRead,7939533:doString,[])
     link(Array,15282780:MT,[(125,18)(9,18)])
     link(Index,9032576:Index,[(132,74)(107,74)(107,126)(55,126)])
    }
    Add(GetDataEx,3856790,224,123)
    {
     link(Data,16548342:Value,[])
    }
    Add(FormatStr,7939533,175,84)
    {
     DataCount=4
     Mask="%1 %4 %2 = '%3'"
     link(onFString,16548342:doValue,[])
     link(Str1,3856790:Var1,[(181,76)(169,76)(169,128)])
     link(Str3,9032576:Item,[(195,69)(156,69)(156,131)(48,131)])
     link(Str4,9859866:Var2,[])
    }
    Add(Memory,16548342,224,84)
    {
    }
    Add(Delete,14623516,224,140)
    {
     link(onDelete,15282780:onResult,[(302,146)(302,9)])
     link(Str,3856790:Var2,[])
    }
    Add(Memory,11791821,196,21)
    {
     Default=String(AND)
     MakeExt(Default,Разделитель запроса,Delimiter)
    }
    Add(Hub,3370294,91,140)
    {
     link(onEvent1,5538388:doLength,[])
     link(onEvent2,16548342:doClear,[(212,153)(212,97)])
    }
    Add(Length,5538388,140,140)
    {
     link(onLength,805807:doOperation,[])
     link(Str,9859866:Var1,[(146,65)])
    }
    Add(Math,805807,182,140)
    {
     Op2=1
     ResultType=0
     link(onResult,14623516:doDelete,[])
    }
    Add(GetDataEx,9859866,196,60)
    {
     link(Data,11791821:Value,[])
    }
  END_SDK
  Add(FormatStr,3963481,525,259)
  {
   Mask="DELETE FROM %1 WHERE %2"
   link(onFString,3832485:doWork2,[])
   link(Str1,5167247:Var,[])
  }
  Add(Hub,3423042,280,259)
  {
   @Color=9342719
   link(onEvent1,9873485:doData,[])
   link(onEvent2,5163618:doData,[(301,272)(301,300)])
  }
  Add(DoData,5163618,315,294)
  {
   link(onEventData,2730517:doRowAction,[])
   link(Data,7597825:Index,[(321,245)(377,245)])
  }
  Add(ChildGroupBox,10520,196,21)
  {
   @Hint=#16:Список таблиц БД|
   link(onEvent1,9924836:onTableChange,[(250,27)(250,13)])
   link(onEvent2,4678825:doData,[])
   link(onEvent4,9924836:CountLines,[(708,48)(708,20)])
  }
  BEGIN_SDK
    Add(EditMulti,14870379,7,7)
    {
     EventCount=4
     WorkCount=2
     Width=377
     Height=137
     link(doWork1,4974339:doCompare,[(21,13)(21,48)])
     link(doWork2,11530851:doWork1,[(81,20)])
    }
    Add(GroupBox,3561319,35,91)
    {
     Left=1
     Top=1
     Width=111
     Height=349
     Align=1
     Color=0
     Font=[Arial,9,1,16777215,204]
     Ctl3D=0
     ModeSp=2
     Caption="Tables list"
    }
    Add(ListBox,10621175,98,42)
    {
     Left=2
     Top=15
     Width=107
     Height=332
     Align=5
     Color=0
     Font=[Arial,9,1,16777215,204]
     Ctl3D=1
     ModeSp=3
     SizeSp=1
     DataType=1
     Point(String)
     link(onClick,1203345:doEvent1,[])
    }
    Add(If_else,4974339,35,42)
    {
     Type=5
     Op2=String()
     link(onTrue,10621175:doAdd,[])
     link(onFalse,11530851:doWork2,[])
    }
    Add(HubEx,11530851,77,49)
    {
     link(onEvent,10621175:doClear,[])
    }
    Add(GlobalVar,5503195,266,28)
    {
     @Color=16777067
     Name="RabTab"
     link(onValue,14870379:onEvent1,[(335,34)(335,13)])
    }
    Add(Hub,1203345,161,49)
    {
     OutCount=3
     link(onEvent1,14870379:onEvent2,[(185,55)(185,20)])
     link(onEvent2,5503195:doValue,[(193,62)(193,34)])
     link(onEvent3,12940740:doString,[(199,69)(199,83)])
    }
    Add(SQLite_Query,15252778,266,77)
    {
     link(onQuery,14870379:onEvent4,[(343,83)(343,34)])
     link(dbHandle,11656725:Var,[])
    }
    Add(FormatStr,12940740,224,77)
    {
     DataCount=1
     Mask="SELECT count() FROM %1"
     link(onFString,15252778:doQuery,[])
    }
    Add(GlobalVar,11656725,266,56)
    {
     @Color=7063295
     Name="dbHandle"
    }
    Add(InfoTip,13723645,203,49)
    {
     Info=#23:Число записей в таблице|
     Font=[MS Sans Serif,8,1,255,1]
     VAlign=2
     Width=169
     Height=81
     Margin=5
    }
  END_SDK
  Add(Hub,3091927,112,56)
  {
   @Color=9342719
   OutCount=3
   link(onEvent1,10520:doWork2,[(150,62)(150,34)])
   link(onEvent2,11325574:doClear,[])
   link(onEvent3,15813322:doWork1,[(165,76)])
  }
  Add(HubEx,15813322,161,105)
  {
   link(onEvent,15410866:doClearAll,[])
  }
  Add(InfoTip,3092050,238,224)
  {
   Info=#26:Удаление записи из таблицы|
   Font=[MS Sans Serif,8,0,255,1]
   Frame=3
   VAlign=2
   HAlign=2
   Width=351
   Height=109
   Margin=10
  }
  Add(InfoTip,16682924,259,336)
  {
   Info=#10:Добавление|7:новой  |6:записи|1:в|9:таблицу  |
   Font=[MS Sans Serif,8,0,255,1]
   Frame=3
   HAlign=2
   Width=330
   Height=123
   Margin=10
  }
  Add(InfoTip,9858866,420,77)
  {
   Info=#18:Исправление записи|
   Font=[MS Sans Serif,8,0,255,1]
   Frame=3
   Width=169
   Height=144
   Margin=5
  }
  Add(MTStrTbl,7597825,364,98)
  {
   @Color=7077739
   Left=112
   Top=1
   Width=858
   Height=349
   Align=5
   Name="tab"
   Redaction=0
   Grid=0
   EnableOnClick=1
   Point(onBeforeLineChange)
   Point(onLineChange)
   Point(onMouseUp)
   link(onColumnClick,9924836:onSort,[(408,111)(408,6)])
   link(onBeforeLineChange,1502567:doMix,[])
   link(onLineChange,6153062:doMix,[(437,139)(437,181)])
   link(onMouseUp,15658564:doCase,[(405,146)(405,206)(107,206)(107,363)])
  }
  Add(MST_DB,15410866,196,91)
  {
   @Color=7077739
   MSTControl="tab"
   Point(doClearAll)
   Point(doClear)
  }
  Add(MST_ColAction,13741915,63,105)
  {
   @Color=7077739
   Action=9
   MinColWidth=30
   MaxColWidth=225
   Index=-1
   MSTControl="tab"
   Point(doMaxColWidth)
  }
  Add(MST_RowAction,2730517,364,294)
  {
   @Color=7077739
   Action=3
   MSTControl="tab"
  }
  Add(DoData,9873485,364,259)
  {
   link(onEventData,6398218:doMix,[])
   link(Data,7597825:Select,[])
  }
  Add(GlobalVar,5503195,511,98)
  {
   @Color=16777067
   Name="RabTab"
  }
  Add(GlobalVar,8911680,399,385)
  {
   @Color=16777067
   Name="RabTab"
  }
  Add(GlobalVar,5167247,525,231)
  {
   @Color=16777067
   Name="RabTab"
  }
  Add(ChildPanelEx,11325574,196,56)
  {
   @Color=11657983
  }
  BEGIN_SDK
    Add(EditMultiEx,12535171,21,21)
    {
     WorkCount=#5:doAdd|7:doClear|
     Width=125
     Height=130
     link(doAdd,14316015:doAdd,[(81,27)(81,69)])
     link(doClear,14316015:doClear,[(59,34)(59,76)])
    }
    Add(Panel,3489430,35,105)
    {
     Left=5
     Top=345
     Width=680
     Height=120
     Align=4
     Ctl3D=0
    }
    Add(Memo,14316015,98,63)
    {
     @Hint=#14:Окно сообщений|
     Left=2
     Top=2
     Width=676
     Height=116
     Align=5
     Color=16776680
     Font=[Tahoma,8,0,0,204]
     ModeSp=2
     AddType=1
     ScrollBars=3
    }
  END_SDK
  Add(HubEx,3832485,595,259)
  {
   link(onEvent,7913076:doExec,[])
  }
  Add(SQLite_Exec,7913076,623,259)
  {
   link(onError,1976262:doWork,[])
   link(dbHandle,12814663:Var,[])
  }
  Add(LineBreakEx,1976262,672,259)
  {
   Caption="Err"
  }
  Add(InfoTip,14365809,609,217)
  {
   Info=#
   Font=[MS Sans Serif,8,0,255,1]
   Frame=3
   HAlign=2
   Width=106
   Height=81
  }
  Add(GlobalVar,12814663,623,231)
  {
   @Color=7063295
   Name="dbHandle"
  }
  Add(LineBreakEx,11901841,112,7)
  {
   Caption="Err"
   Type=1
   link(OnEvent,1933824:doWork2,[])
  }
  Add(HubEx,1933824,168,7)
  {
   Angle=1
   link(onEvent,11325574:doAdd,[(172,62)])
  }
  Add(ChangeMon,4678825,280,28)
  {
   link(onData,15813322:doWork3,[(323,34)(323,122)(165,122)])
  }
  Add(Memory,14750366,525,126)
  {
  }
  Add(MultiElementEx,1502567,469,126)
  {
   link(onResult,14750366:doValue,[])
   link(MT,11284801:Var1,[(475,115)(447,115)])
  }
  BEGIN_SDK
    Add(EditMultiEx,15282780,3,3)
    {
     WorkCount=#5:doMix|
     EventCount=#8:onResult|
     DataCount=#2:MT|
     Width=286
     Height=179
     link(doMix,9032576:doEnum,[(12,9)(12,90)])
    }
    Add(MT_Enum,9032576,42,84)
    {
     link(onItem,1907825:doRead,[])
     link(onEndEnum,3370294:doEvent1,[(81,97)(81,146)])
    }
    Add(ArrayRW,1907825,119,84)
    {
     link(onRead,7939533:doString,[])
     link(Array,15282780:MT,[(125,18)(9,18)])
     link(Index,9032576:Index,[(132,74)(107,74)(107,126)(55,126)])
    }
    Add(GetDataEx,3856790,224,123)
    {
     link(Data,16548342:Value,[])
    }
    Add(FormatStr,7939533,175,84)
    {
     DataCount=4
     Mask="%1 %4 %2 = '%3'"
     link(onFString,16548342:doValue,[])
     link(Str1,3856790:Var1,[(181,76)(169,76)(169,128)])
     link(Str3,9032576:Item,[(195,69)(156,69)(156,131)(48,131)])
     link(Str4,9859866:Var2,[])
    }
    Add(Memory,16548342,224,84)
    {
    }
    Add(Delete,14623516,224,140)
    {
     link(onDelete,15282780:onResult,[(269,146)(269,9)])
     link(Str,3856790:Var2,[])
    }
    Add(Memory,11791821,196,21)
    {
     Default=String(AND)
     MakeExt(Default,Разделитель запроса,Delimiter)
    }
    Add(Hub,3370294,91,140)
    {
     link(onEvent1,5538388:doLength,[])
     link(onEvent2,16548342:doClear,[(212,153)(212,97)])
    }
    Add(Length,5538388,140,140)
    {
     link(onLength,805807:doOperation,[])
     link(Str,9859866:Var1,[(146,65)])
    }
    Add(Math,805807,182,140)
    {
     Op2=1
     ResultType=0
     link(onResult,14623516:doDelete,[])
    }
    Add(GetDataEx,9859866,196,60)
    {
     link(Data,11791821:Value,[])
    }
  END_SDK
  Add(MultiElementEx,6153062,441,175)
  {
   link(onResult,192421:doString,[])
   link(MT,11284801:Var2,[])
  }
  BEGIN_SDK
    Add(EditMultiEx,15282780,3,3)
    {
     WorkCount=#5:doMix|
     EventCount=#8:onResult|
     DataCount=#2:MT|
     Width=286
     Height=179
     link(doMix,9032576:doEnum,[(12,9)(12,90)])
    }
    Add(MT_Enum,9032576,42,84)
    {
     link(onItem,1907825:doRead,[])
     link(onEndEnum,3370294:doEvent1,[(81,97)(81,146)])
    }
    Add(ArrayRW,1907825,119,84)
    {
     link(onRead,7939533:doString,[])
     link(Array,15282780:MT,[(125,18)(9,18)])
     link(Index,9032576:Index,[(132,74)(107,74)(107,126)(55,126)])
    }
    Add(GetDataEx,3856790,224,123)
    {
     link(Data,16548342:Value,[])
    }
    Add(FormatStr,7939533,175,84)
    {
     DataCount=4
     Mask="%1 %4 %2 = '%3'"
     link(onFString,16548342:doValue,[])
     link(Str1,3856790:Var1,[(181,76)(169,76)(169,128)])
     link(Str3,9032576:Item,[(195,69)(156,69)(156,131)(48,131)])
     link(Str4,9859866:Var2,[])
    }
    Add(Memory,16548342,224,84)
    {
    }
    Add(Delete,14623516,224,140)
    {
     link(onDelete,15282780:onResult,[(269,146)(269,9)])
     link(Str,3856790:Var2,[])
    }
    Add(Memory,11791821,196,21)
    {
     Default=String(,)
     MakeExt(Default,Разделитель запроса,Delimiter)
    }
    Add(Hub,3370294,91,140)
    {
     link(onEvent1,5538388:doLength,[])
     link(onEvent2,16548342:doClear,[(212,153)(212,97)])
    }
    Add(Length,5538388,140,140)
    {
     link(onLength,805807:doOperation,[])
     link(Str,9859866:Var1,[(146,65)])
    }
    Add(Math,805807,182,140)
    {
     Op2=1
     ResultType=0
     link(onResult,14623516:doDelete,[])
    }
    Add(GetDataEx,9859866,196,60)
    {
     link(Data,11791821:Value,[])
    }
  END_SDK
  Add(GetDataEx,11284801,441,158)
  {
   Angle=3
   link(Data,1849858:Array,[(258,163)])
  }
  Add(FormatStr,192421,511,175)
  {
   DataCount=3
   Mask="UPDATE %1 SET %2 WHERE %3"
   link(onFString,3832485:doWork1,[(599,181)])
   link(Str1,5503195:Var,[])
   link(Str3,14750366:Value,[])
  }
END_SDK
Add(Version,9011230,63,49)
{
 Version="119"
 Description="Work with SQLite database"
 InternalName="AdmSQLiteMT.exe"
 E-mail="tad@zmail.ru"
}
Add(ScriptEvents,779014,105,49)
{
 Script=#21:function SaveBefore()|70:  sdk.SetProp(9011230, "Version", 1 + sdk.GetProp(9011230, "Version"))|3:end|
}
Add(Label,11980367,147,49)
{
 Left=445
 Top=255
 Width=196
 Height=41
 Font=[MS Sans Serif,24,5,255,1]
 Visible=1
 Caption="Ж Д И Т Е  !"
 Point(doVisible)
}