HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуДинамическое изменение таблицы ← Ctrl1Ctrl →
Этот топик читают: Гость
Ответов: 115
Рейтинг: 1
#1: 2016-10-03 16:51:19 ЛС | профиль | цитата
пытаюсь создать из файла Excel - таблицу, а заголовки выводятся в выпадающие списки. теперь вот проблема в том что при выборе значения из ComboBox ,выводиться столбец не тот который должен был быть, а как то рандомно. в чем может быть ошибка? если несколько раз по нажимать на каком нибудь ComboBox ,то он выводит разные столбцы
,

Схема

Add(MainForm,2953706,98,140)
{
 Width=1252
 Height=791
 link(onCreate,12987101:doEvent1,[])
}
Add(ChildPanelRush,16763009,217,210)
{
 @Hint=#18:Список спортсменов|
 link(onError,7275040:doWork,[])
 link(Data1,10742668:Var2,[])
}
BEGIN_SDK
  Add(EditMultiEx,3445826,21,21)
  {
   WorkCount=#9:doVisible|8:doString|7:doWork2|
   EventCount=#7:onError|
   DataCount=#5:Data1|
   Width=937
   Height=956
   link(doVisible,396614:doEvent1,[(158,27)(158,202)])
   link(doString,5183992:doWork1,[(49,34)(49,188)])
   link(doWork2,5183992:doWork2,[(36,41)(36,195)])
  }
  Add(PanelRush,2319833,224,35)
  {
   Left=5
   Top=40
   Width=1220
   Height=624
   Layout="parent.sidebar"
   WidthScale=100
   Glyphs=[]
   Point(doVisible)
  }
  Add(ChildPanel,5183992,70,182)
  {
   link(onEvent1,1722227:doWork2,[(121,188)(121,153)])
   link(onEvent2,6949883:doQuery,[(121,195)(121,233)(58,233)(58,272)])
   link(onEvent3,16258063:doEvent1,[(464,202)(464,461)])
   link(onEvent4,396614:doEvent2,[])
   link(Data1,3445826:Data1,[(76,102)(27,102)])
  }
  BEGIN_SDK
    Add(EditMulti,12371822,21,21)
    {
     EventCount=4
     WorkCount=3
     DataCount=1
     VarCount=2
     Width=1084
     Height=382
     link(doWork1,1154872:doEvent2,[(582,27)(582,139)])
     link(doWork2,6701094:doExecute,[(67,34)(67,139)])
     link(Var1,15072164:dbSession,[(27,354)(699,354)])
     link(Var2,6111724:FString,[(34,357)(1000,357)])
    }
    Add(Panel,6465823,112,49)
    {
     Left=2
     Top=2
     Width=1216
     Height=53
     Align=2
     Layout="parent.vert"
    }
    Add(ComboBox,15474256,756,140)
    {
     Left=12
     Top=16
     Width=285
     Height=21
     Font=[Verdana,10,0,0,204]
     Text=""
     ReadOnly=0
     Point(doSelectString)
     link(onClick,162677:doEvent2,[(800,153)(800,195)(583,195)(583,237)])
    }
    Add(ODialog,6701094,112,133)
    {
     Filter="Microsoft Excel (.xls,.xlsx)|*.xls;*.xlsx"
     Title="Выбрать файл"
     FileName=""
     Select=1
     link(onExecute,5822952:doString,[])
    }
    Add(FileTools,9696297,357,133)
    {
     link(onEnd,1966518:doEvent,[])
    }
    Add(FilePartElm,10813017,231,133)
    {
     Point(Part)
     link(onPart,2318333:doString,[])
    }
    Add(FormatStr,2318333,294,133)
    {
     Mask="%2%1"
     Point(FString)
     link(onFString,9696297:doFileExists,[(342,139)(342,160)])
     link(Str2,3713749:Var1,[(307,103)])
    }
    Add(IndexToChanel,1966518,406,133)
    {
     link(onEvent1,5492936:doCopy,[])
    }
    Add(FormatStr,5822952,175,133)
    {
     Mask="%1"
     Point(FString)
     link(onFString,10813017:doPart,[])
    }
    Add(FileTools,5492936,462,126)
    {
     link(onEnd,6884805:doEvent1,[])
     link(FileName,5822952:FString,[(468,114)(162,114)(162,179)(181,179)])
     link(NewFileName,2318333:FString,[(475,114)(514,114)(514,177)(300,177)])
    }
    Add(FileSearch,7071899,630,140)
    {
     Ext="*.xl*"
     link(onSearch,16246838:doPart,[])
     link(onEndSearch,6106797:doData,[(668,153)(668,121)(219,121)(219,188)])
     link(Dir,3713749:Var2,[])
    }
    Add(Hub,1154872,595,126)
    {
     InCount=2
     OutCount=3
     link(onEvent1,15474256:doClear,[(733,132)(733,153)])
     link(onEvent2,8773124:doString,[(623,139)(623,69)])
     link(onEvent3,7071899:doSearch,[])
    }
    Add(FormatStr,8773124,637,63)
    {
     Mask="%1Files\"
     Point(FString)
     link(Str1,12371822:Data1,[(643,42)(27,42)])
    }
    Add(FilePartElm,16246838,693,140)
    {
     link(onPart,15474256:doAdd,[])
    }
    Add(GetDataEx,3713749,637,98)
    {
     link(Data,8773124:FString,[])
    }
    Add(DoData,6106797,231,182)
    {
     link(onEventData,15474256:doSelectString,[])
     link(Data,10813017:Part,[])
    }
    Add(FormatStr,8382041,840,140)
    {
     Mask="Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};\r\nDriverID=22;\r\nDBQ=%1;\r\nDefaultDir=%2;\r\nFirstRowWhasNames=1;\r\nReadOnly=true;\r\nScanRows=0;"
     Point(FString)
     link(Str2,15693269:Var3,[(853,103)])
     AddHint(53,-106,187,104,Mask)
    }
    Add(OLEdb,7245872,630,287)
    {
     Point(onError)
     link(onConnect,15072164:doCreate,[])
     link(Driver,8382041:FString,[(636,207)(846,207)])
     link(onError,3993591:doWork2,[(676,300)(676,328)])
    }
    Add(OLEdb_Session,15072164,693,287)
    {
     Point(onError)
     link(onError,3993591:doWork1,[(737,300)])
    }
    Add(ArrayRW,10125309,938,294)
    {
     link(onRead,6111724:doString,[])
     link(Array,14512374:Array,[])
     link(Index,14512374:Index,[(951,268)(958,268)])
    }
    Add(FormatStr,6111724,994,294)
    {
     DataCount=3
     Mask="SELECT * FROM "%2"."%1$A1:P" "%1$";"
     Point(FString)
     link(onFString,12371822:onEvent2,[(1066,300)(1066,34)])
     link(Str2,4260558:FString,[(1007,275)(762,275)])
     AddHint(-100,-146,183,26,Mask)
    }
    Add(ComboBox,14512374,938,203)
    {
     Left=327
     Top=16
     Width=200
     Height=21
     Font=[Verdana,10,1,0,204]
     Text=""
     ReadOnly=0
     DropDownCount=20
     Point(Index)
     Point(doSelectString)
    }
    Add(VBJScript,10100796,840,238)
    {
     @Hint=#16:Query SQL Server|
     WorkPoints=#6:doOpen|7:doSheet|7:doClose|
     EventPoints=#8:onSheets|6:onOpen|
     Script=#9:Dim strIn|5:Dim i|5:Dim j|12:Dim objExcel|11:Dim onExcel|0:|22:Sub doWork(Data,Index)|18: Select Case Index|15:  Case "doOpen"|52:    Set objExcel = CreateObject("Excel.Application")|52:    Set objWorkbook = objExcel.Workbooks.Open (Data)|71:    j = objWorkbook.Sheets.Count              'Узнаём количество листов|88:     For i=1 To j                             'Листы начинаются не с "0", а с "1"       |86:      strIn = objWorkbook.Sheets(i).Name      'Узнаём имя очередного листа            |65:      sys.onSheets strIn                      'Выводим имя наружу|9:     Next|17:    sys.onOpen 1 |94:   'Case "doSheet"                              'На вход подаётся строка, содержащая имя Листа|33:    'objExcel.Sheets(Data).Select|38:    'objExcel.ActiveSheet.Cells.Select|43:    'objExcel.Selection.NumberFormat = "@" |39:    'objExcel.ActiveWorkbook.Save()    |17:   Case "doClose"|17:    objExcel.Quit|26:    Set objExcel = Nothing|17:    sys.onOpen 0 |0:|11: End Select|0:|7:End Sub|
     UseName=0
     link(onSheets,11519168:doEvent1,[])
    }
    Add(FormatStr,4260558,756,224)
    {
     DataCount=3
     Mask="%3%2"
     Point(FString)
     link(onFString,2059942:doEvent1,[])
     link(Str2,15474256:String,[])
     link(Str3,15693269:Var2,[])
    }
    Add(Hub,2059942,805,224)
    {
     OutCount=4
     link(onEvent1,8382041:doString,[(829,230)(829,146)])
     link(onEvent2,14512374:doClear,[(914,237)(914,216)])
     link(onEvent3,10100796:doOpen,[])
     link(onEvent4,10100796:doClose,[(829,251)(829,258)])
    }
    Add(Hub,11519168,889,238)
    {
     link(onEvent1,14512374:doAdd,[(921,244)(921,209)])
     link(onEvent2,14512374:doSelectString,[])
    }
    Add(Hub,6884805,525,126)
    {
     link(onEvent1,1154872:doEvent1,[])
     link(onEvent2,162677:doEvent1,[(567,139)(567,230)])
    }
    Add(Hub,162677,595,224)
    {
     InCount=3
     link(onEvent1,4260558:doString,[])
     link(onEvent2,7245872:doOpen,[(619,237)(619,293)])
    }
    Add(Button,13955783,511,238)
    {
     Left=300
     Top=15
     Width=25
     Height=25
     Font=[MS Sans Serif,10,0,0,1]
     Caption=">"
     link(onClick,162677:doEvent3,[])
    }
    Add(GetDataEx,15693269,770,98)
    {
     Angle=3
     link(Data,3713749:Var3,[])
    }
    Add(Button,16694623,840,294)
    {
     Left=530
     Top=16
     Width=75
     Caption="Прочитать"
     link(onClick,10125309:doRead,[])
    }
    Add(LineBreakEx,505374,756,322)
    {
     Caption="error"
    }
    Add(HubEx,3993591,733,322)
    {
     link(onEvent,505374:doWork,[])
    }
    Add(LineBreakEx,15609658,819,21)
    {
     Caption="error"
     Type=1
     link(OnEvent,12371822:onEvent1,[])
    }
    Add(Button,15176750,1050,350)
    {
     Left=630
     Top=17
     Width=135
     Caption="Вывод в таблицу"
     link(onClick,12371822:onEvent3,[(1094,356)(1094,41)])
    }
  END_SDK
  Add(MTStrTbl,11420048,469,203)
  {
   Left=10
   Top=60
   Width=1188
   Height=540
   Font=[Trebuchet MS,10,0,0,204]
   Name="tab_1"
   Layout="vert"
   HeightScale=100
   ColumnWidth=125
   Grid=0
   ChangeWidth=1
   SmallIconsManager="icons"
   DrawManager="parent.color"
   Point(onResize)
   link(onClientRect,7369290:doValue,[])
  }
  Add(MST_Clear,4248970,231,203)
  {
   ClearAll=0
   MSTControl="tab_1"
   link(onChange,7468935:doEnum,[])
  }
  Add(MST_RowAction,11858166,406,245)
  {
   MSTControl="tab_1"
  }
  Add(VisualStrings,8002343,357,245)
  {
   Point(doText)
   Point(onText)
   link(onText,11858166:doRowAction,[])
  }
  Add(IconsManager,6182759,406,154)
  {
   Name="icons"
   ImgSize=23
   Icons=[]
  }
  Add(For,15293353,483,259)
  {
   Start=2
   IncludeEnd=1
   link(onEvent,15398697:doEvent1,[])
   link(End,11420048:CountCol,[])
  }
  Add(Hub,396614,182,196)
  {
   InCount=3
   OutCount=3
   link(onEvent1,8037998:doClear,[(221,202)(221,328)])
   link(onEvent2,4248970:doClear,[])
  }
  Add(MT_Add,12744814,567,259)
  {
   Data=Integer(0)
   InputMT=1
   link(onAdd,11420048:doClientRect,[(606,265)(606,195)(459,195)(459,209)])
  }
  Add(Hub,15398697,532,259)
  {
   OutCount=5
   link(onEvent2,12744814:doAdd,[(556,272)(556,265)])
   link(onEvent3,13943142:doAdd,[(581,279)(581,272)])
  }
  Add(MT_Memory,7369290,623,224)
  {
  }
  Add(MT_Add,13943142,623,266)
  {
   link(onAdd,14592175:##add,[])
   link(Data,7369290:Value,[])
  }
  Add(MT_Add,10032579,812,266)
  {
   InputMT=1
   link(onAdd,2164106:doEvent1,[])
   link(Data,3581317:GetData,[])
  }
  Add(EventFromData,3581317,812,196)
  {
   link(onEvent,2375588:doOperation,[])
  }
  Add(Math,2375588,868,196)
  {
   Op2=2
   ResultType=0
   link(onResult,3581317:doData,[(914,202)(914,177)(804,177)(804,202)])
   link(Op1,14592175:##eventIndex,[(874,191)(905,191)(905,348)(734,348)])
  }
  Add(MST_ColAction,8424163,406,203)
  {
   MSTControl="tab_1"
  }
  Add(StrList,8126035,273,133)
  {
   Strings=#3: =0|8:№=45==2;|19:Фамилия Имя=170==0;|13:Дата рождения|3:Пол|13:Тренер/Регион|6:Разряд|12:Группа (А-Б)|13:Вид программы|19:Партнер для Дуйлянь|
  }
  Add(ArrayEnum,7468935,287,203)
  {
   link(onItem,8424163:doColAction,[])
   link(onEndEnum,8002343:doText,[(334,216)(334,251)])
   link(Array,8126035:Array,[])
  }
  Add(VBoxLayout,8984564,224,77)
  {
   Name="vert"
  }
  Add(LineBreakEx,4329885,168,147)
  {
   Caption="error"
  }
  Add(LineBreakEx,8129517,833,63)
  {
   Caption="error"
   Type=1
   link(OnEvent,3445826:onError,[(916,69)(916,27)])
  }
  Add(OLEdb_Query,6949883,70,266)
  {
   link(onQuery,16341124:doStr,[(132,272)(132,391)])
   link(onColumns,3706937:doEnum,[(122,279)(122,335)])
   link(onError,1722227:doWork3,[(144,286)])
   link(dbSession,5183992:Var1,[])
   link(Text,5183992:Var2,[])
  }
  Add(MT_Enum,3706937,161,329)
  {
   link(onItem,8037998:doAdd,[(598,335)(598,321)])
   link(onEndEnum,16347290:doEvent1,[])
  }
  Add(HubEx,1722227,140,147)
  {
   link(onEvent,4329885:doWork,[])
  }
  Add(MST_RowAction,3745421,497,385)
  {
   MSTControl="tab_1"
  }
  Add(FormatStr,16026086,273,448)
  {
   Mask=";%2;%1"
   link(onFString,7529942:doMultiReplace,[])
   link(Str2,7748722:Count,[])
  }
  Add(CounterEx,7748722,280,385)
  {
   Max=50000
   Point(doReset)
  }
  Add(Hub,1756548,231,385)
  {
   link(onEvent1,7748722:doNext,[])
   link(onEvent2,16026086:doString,[(263,398)(263,454)])
  }
  Add(MT_String,16341124,161,385)
  {
   link(onResult,15716330:doAdd,[(206,391)(206,783)])
  }
  Add(MT_String,6368181,448,385)
  {
   link(onResult,3745421:doRowAction,[])
  }
  Add(ChildPanelEx,14592175,728,266)
  {
   Mode=1
   link(onClick,10032579:doAdd,[])
   link(onEvent3,14930183:doEnum,[(774,279)(774,416)(632,416)(632,377)])
  }
  BEGIN_SDK
    Add(EditMultiEx,3666061,21,21)
    {
     WorkCount=#5:##add|7:##clear|5:doAdd|7:doClear|0:|
     EventCount=#7:onClick|8:onEvent3|8:onEvent2|
     VarCount=#12:##eventIndex|0:|
     Height=347
     Point(##add)
     Point(##clear)
     Point(##eventIndex)
     link(##add,3080955:doEvent1,[])
     link(doAdd,700701:doEvent1,[(32,41)(32,104)])
    }
    Add(ComboBox,11831577,161,133)
    {
     Width=56
     Height=21
     Text="Метро"
     ReadOnly=0
     DropDownCount=15
     BoxDrawManager="col"
     Point(doSelect)
     Point(doWidth)
     Point(doHeight)
     link(onClick,3666061:onClick,[(257,146)(257,27)])
    }
    Add(Panel,13780392,161,42)
    {
     Left=30
     Top=92
     Width=150
     Point(doLeft)
     Point(doTop)
     Point(doWidth)
     Point(doHeight)
     Point(doBringToFront)
    }
    Add(MT_MultiData,6426008,91,49)
    {
     From=1
     Count=4
     link(onData1,13780392:doLeft,[])
     link(onData2,13780392:doTop,[])
     link(onData3,13780392:doWidth,[])
     link(onData4,13780392:doHeight,[])
    }
    Add(Hub,3080955,42,21)
    {
     OutCount=5
     link(onEvent2,3666061:onEvent3,[])
     link(onEvent3,6426008:doSeparateMT,[(74,41)(74,55)])
     link(onEvent4,14082670:doSeparateMT,[(74,48)(74,167)])
     link(onEvent5,13780392:doBringToFront,[(64,55)(64,83)])
    }
    Add(MT_MultiData,14082670,91,161)
    {
     Count=5
     link(onData1,2228938:doOperation,[(135,167)(135,213)(79,213)(79,230)])
     link(onData4,11831577:doWidth,[])
     link(onData5,11831577:doHeight,[])
    }
    Add(StrList,1422913,252,161)
    {
     Strings=#1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|2:10|2:11|2:12|2:13|2:14|2:15|2:16|2:17|2:18|2:19|2:20|
     Point(doGetString)
     Point(onGetString)
     Point(Index)
    }
    Add(BoxDrawManager,15301189,28,161)
    {
     Name="col"
     Gutter=1
     StyleBack=1
     ImageShift=1
     GutterShift=1
     GutterWidth=1
     InversGrad=0
     InversGutt=0
     DarkColor=-16777214
     ColorFrame=-16777201
     LightClrGutt=-16777201
     DarkClrGutt=-16777201
     DarkClrBack=-16777201
    }
    Add(Math,2228938,91,224)
    {
     Op2=-2
     link(onResult,11831577:doSelect,[(142,230)(142,181)])
    }
    Add(Hub,700701,112,98)
    {
     link(onEvent1,11831577:doAdd,[(144,104)(144,139)])
    }
  END_SDK
  Add(StrList,8037998,630,315)
  {
  }
  Add(ArrayEnum,14930183,644,371)
  {
   link(onItem,14592175:doAdd,[(705,377)(705,286)])
   link(Array,8037998:Array,[])
  }
  Add(StrList,10284801,329,371)
  {
   Strings=#10: 0:00:00=;|
  }
  Add(MultiReplace,7529942,322,448)
  {
   link(onResult,6368181:doMTString,[(401,454)(401,405)])
   link(ReplaceList,10284801:Text,[])
  }
  Add(FormatStr,9502191,448,896)
  {
   DataCount=9
   Mask="%2;%3;%4;%5;%6;%7;%8;%9"
   Point(FString)
   link(onFString,1756548:doEvent1,[(525,902)(525,934)(214,934)(214,391)])
   link(Str2,9496124:Part1,[])
   link(Str3,7650402:Part1,[(468,879)(475,879)])
   link(Str4,3129939:Part1,[(475,879)(489,879)])
   link(Str5,13630037:Part1,[(482,879)(503,879)])
   link(Str6,3860584:Part1,[(489,879)(517,879)])
   link(Str7,1191090:Part1,[(496,879)(531,879)])
   link(Str8,15714012:Part1,[(503,879)(545,879)])
   link(Str9,11512437:Part1,[(510,879)(559,879)])
   AddHint(-51,51,148,13,Mask)
  }
  Add(MultiStrPart,9496124,455,518)
  {
   Count=1
   Point(doFrom)
  }
  Add(StrList,15716330,245,777)
  {
  }
  Add(ArrayEnum,6808174,259,840)
  {
   link(onItem,3343078:doEvent1,[])
   link(Array,15716330:Array,[])
  }
  Add(Hub,3343078,308,840)
  {
   OutCount=9
   link(onEvent1,9496124:doSplit,[(396,846)(396,524)])
   link(onEvent2,7650402:doSplit,[(396,853)(396,566)])
   link(onEvent3,3129939:doSplit,[(396,860)(396,608)])
   link(onEvent4,13630037:doSplit,[(396,867)(396,650)])
   link(onEvent5,3860584:doSplit,[(396,874)(396,699)])
   link(onEvent6,1191090:doSplit,[(396,881)(396,741)])
   link(onEvent7,15714012:doSplit,[(396,888)(396,783)])
   link(onEvent8,11512437:doSplit,[(396,895)(396,825)])
   link(onEvent9,9502191:doString,[])
  }
  Add(MST_Clear,124635,868,455)
  {
   MSTControl="tab_1"
  }
  Add(Hub,16258063,826,455)
  {
   InCount=3
   OutCount=4
   link(onEvent1,124635:doClear,[])
   link(onEvent2,7748722:doReset,[(852,468)(852,437)(268,437)(268,398)])
   link(onEvent3,239713:doData,[(852,475)(852,661)(177,661)(177,846)])
  }
  Add(Hub,16347290,399,336)
  {
   InCount=2
   link(onEvent1,15293353:doFor,[(465,342)(465,265)])
   link(onEvent2,16258063:doEvent2,[(619,349)(619,468)])
  }
  Add(MT_MultiData,4576189,273,644)
  {
   link(onData1,14206171:doEvent,[])
  }
  Add(MultiStrPart,7650402,469,560)
  {
   From=1
   Count=1
   Point(doFrom)
  }
  Add(MultiStrPart,3129939,483,602)
  {
   From=2
   Count=1
   Point(doFrom)
  }
  Add(MultiStrPart,13630037,497,644)
  {
   From=3
   Count=1
   Point(doFrom)
  }
  Add(MultiStrPart,3860584,511,693)
  {
   From=4
   Count=1
   Point(doFrom)
  }
  Add(MultiStrPart,1191090,525,735)
  {
   From=5
   Count=1
   Point(doFrom)
  }
  Add(MultiStrPart,15714012,539,777)
  {
   From=6
   Count=1
   Point(doFrom)
  }
  Add(MultiStrPart,11512437,553,819)
  {
   From=7
   Count=1
   Point(doFrom)
  }
  Add(Hub,2164106,854,266)
  {
   OutCount=5
   link(onEvent2,3353702:doColAction,[])
   link(onEvent3,16258063:doEvent3,[(886,286)(886,382)(814,382)(814,475)])
   link(onEvent5,9880631:doEvent1,[(900,300)(900,506)(231,506)(231,531)])
  }
  Add(MST_ColAction,3353702,917,273)
  {
   Action=5
   MSTControl="tab_1"
  }
  Add(DoData,239713,189,840)
  {
   link(onEventData,6808174:doEnum,[])
  }
  Add(IndexToChanel,14206171,343,644)
  {
   Count=10
   Point(Data)
   link(onEvent3,9496124:doFrom,[(401,664)(401,538)])
   link(onEvent4,7650402:doFrom,[(408,671)(408,580)])
   link(onEvent5,3129939:doFrom,[(415,678)(415,622)])
   link(onEvent6,13630037:doFrom,[(422,685)(422,664)])
   link(onEvent7,3860584:doFrom,[(429,692)(429,713)])
   link(onEvent8,1191090:doFrom,[(436,699)(436,755)])
   link(onEvent9,15714012:doFrom,[(443,706)(443,797)])
   link(onEvent10,11512437:doFrom,[(450,713)(450,839)])
   link(Data,5658346:Value2,[(349,632)(317,632)(317,744)(286,744)])
  }
  Add(MT_MultiMem,5658346,273,700)
  {
  }
  Add(Hub,9880631,238,525)
  {
   OutCount=4
   link(onEvent2,4576189:doSeparateMT,[(262,538)(262,650)])
   link(onEvent3,5658346:doValue,[(262,545)(262,706)])
  }
END_SDK
Add(LineBreakEx,7275040,266,210)
{
 Caption="error"
}
Add(Button,12630303,98,224)
{
 Left=15
 Top=10
 Width=165
 Caption="OpenExcel"
 link(onClick,16763009:doWork2,[])
}
Add(Dir,5699205,217,77)
{
 Point(MyDocumentDir)
}
Add(FormatStr,10996460,259,154)
{
 Mask="%1Files\"
 link(onFString,5699205:doDir,[(303,160)(303,118)(205,118)(205,83)])
 link(Str1,10742668:Var3,[(265,131)])
}
Add(GetDataEx,10742668,217,126)
{
 link(Data,5699205:CurrentDir,[])
}
Add(Hub,12987101,140,154)
{
 OutCount=3
 link(onEvent1,10996460:doString,[])
 link(onEvent2,16763009:doVisible,[(186,167)(186,216)])
 link(onEvent3,16763009:doString,[(186,174)(186,223)])
}




Редактировалось 8 раз(а), последний 2016-10-03 16:57:20
карма: 0
well done turner
0
Ответов: 1328
Рейтинг: 69
#2: 2016-10-03 20:51:37 ЛС | профиль | цитата
powerbatman писал(а):
пытаюсь создать из файла Excel - таблицу


надо бы и пример Excel файла приложить
карма: 2

0
Ответов: 115
Рейтинг: 1
#3: 2016-10-04 09:25:29 ЛС | профиль | цитата
Konst писал(а):
надо бы и пример Excel файла приложить

вот тестовый список Excel

--- Добавлено в 2016-10-04 09:26:12

список

--- Добавлено в 2016-10-04 09:38:44

тут что то со схемой выборки столбца происходит, возможно все дело пенели с СomboBox . делал выборку столбцов так
часть схемы


Add(ComboBox,9190551,707,42)
{
 Left=530
 Top=10
 Width=160
 Height=21
 Font=[Arial Narrow,11,0,0,204]
 WinStyle=1
 Text=""
 ReadOnly=0
 ItemHeight=18
 DropDownCount=15
 BoxDrawManager="u"
 Point(Index)
 Point(onSelect)
 Point(doSelect)
 link(onClick,2006738:doEvent1,[])
}
Add(ComboBox,12976959,707,105)
{
 Left=530
 Top=35
 Width=160
 Height=21
 Font=[Arial Narrow,11,0,0,204]
 WinStyle=1
 Text=""
 ReadOnly=0
 ItemHeight=18
 DropDownCount=15
 BoxDrawManager="u"
 Point(Index)
 Point(onSelect)
 Point(doSelect)
 link(onClick,14546244:doEvent1,[])
}
Add(ComboBox,14118439,707,168)
{
 Left=530
 Top=85
 Width=160
 Height=21
 Font=[Arial Narrow,11,0,0,204]
 WinStyle=1
 Text=""
 ReadOnly=0
 ItemHeight=18
 DropDownCount=15
 BoxDrawManager="u"
 Point(Index)
 Point(onSelect)
 Point(doSelect)
 link(onClick,445091:doEvent1,[])
}
Add(ComboBox,16368869,707,231)
{
 Left=530
 Top=110
 Width=160
 Height=21
 Font=[Arial Narrow,11,0,0,204]
 WinStyle=1
 Text=""
 ReadOnly=0
 ItemHeight=18
 DropDownCount=15
 BoxDrawManager="u"
 Point(Index)
 Point(onSelect)
 Point(doSelect)
 link(onClick,3555121:doEvent1,[])
}
Add(ComboBox,5801888,707,294)
{
 Left=530
 Top=135
 Width=160
 Height=21
 Font=[Arial Narrow,11,0,0,204]
 WinStyle=1
 Text=""
 ReadOnly=0
 ItemHeight=18
 DropDownCount=15
 BoxDrawManager="u"
 Point(Index)
 Point(onSelect)
 Point(doSelect)
 link(onClick,11847291:doEvent1,[])
}
Add(ComboBox,9943641,707,357)
{
 Left=530
 Top=160
 Width=160
 Height=21
 Font=[Arial Narrow,11,0,0,204]
 WinStyle=1
 Text=""
 ReadOnly=0
 ItemHeight=18
 DropDownCount=15
 BoxDrawManager="u"
 Point(Index)
 Point(onSelect)
 Point(doSelect)
 link(onClick,6798721:doEvent1,[])
}
Add(Edit,9240923,784,77)
{
 Left=715
 Top=10
 Width=135
 Font=[Times New Roman,10,0,0,204]
 Ctl3D=1
 Text="Фамилия Имя"
 Point(doEnabled)
}
Add(Edit,15557466,791,140)
{
 Left=715
 Top=35
 Width=135
 Font=[Times New Roman,10,0,0,204]
 Ctl3D=1
 Text="Дата рождения"
 Point(doEnabled)
}
Add(Edit,13834263,798,203)
{
 Left=715
 Top=60
 Width=135
 Font=[Times New Roman,10,0,0,204]
 Ctl3D=1
 Text="Пол"
 Point(doEnabled)
}
Add(Edit,1025435,805,259)
{
 Left=715
 Top=85
 Width=135
 Font=[Times New Roman,10,0,0,204]
 Ctl3D=1
 Text="Тренер/Регион"
 Point(doEnabled)
}
Add(Edit,10475092,819,371)
{
 Left=715
 Top=135
 Width=135
 Font=[Times New Roman,10,0,0,204]
 Ctl3D=1
 Text="Группа (А-Б)"
 Point(doEnabled)
}
Add(Edit,12483492,826,434)
{
 Left=715
 Top=160
 Width=135
 Font=[Times New Roman,10,0,0,204]
 Ctl3D=1
 Text="Вид программы"
 Point(doEnabled)
}
Add(ComboBox,1900216,707,420)
{
 Left=530
 Top=185
 Width=160
 Height=21
 Font=[Arial Narrow,11,0,0,204]
 WinStyle=1
 Text=""
 ReadOnly=0
 ItemHeight=18
 DropDownCount=15
 BoxDrawManager="u"
 Point(Index)
 Point(onSelect)
 Point(doSelect)
 link(onClick,4095364:doEvent1,[])
}
Add(Edit,5507248,819,483)
{
 Left=715
 Top=185
 Width=135
 Font=[Times New Roman,10,0,0,204]
 Ctl3D=1
 Text="Партнер для Дуйлянь"
 Point(doEnabled)
}
Add(CheckBox,1306476,868,77)
{
 Left=695
 Top=10
 Width=15
 Checked=0
 Caption=""
 Flat=0
}
Add(CheckBox,9996687,868,140)
{
 Left=695
 Top=35
 Width=15
 Checked=0
 Caption=""
 Flat=0
}
Add(CheckBox,4511359,868,203)
{
 Left=695
 Top=60
 Width=15
 Checked=0
 Caption=""
 Flat=0
}
Add(CheckBox,7854724,868,259)
{
 Left=695
 Top=85
 Width=15
 Checked=0
 Caption=""
 Flat=0
}
Add(CheckBox,16371521,868,308)
{
 Left=695
 Top=110
 Width=15
 Checked=0
 Caption=""
 Flat=0
}
Add(CheckBox,428583,868,371)
{
 Left=695
 Top=135
 Width=15
 Checked=0
 Caption=""
 Flat=0
}
Add(CheckBox,14401704,868,434)
{
 Left=695
 Top=160
 Width=15
 Checked=0
 Caption=""
 Flat=0
}
Add(Hub,7568766,658,476)
{
 OutCount=8
 link(onEvent1,9190551:doAdd,[(693,482)(693,48)])
 link(onEvent2,12976959:doAdd,[(693,489)(693,111)])
 link(onEvent3,14118439:doAdd,[(693,496)(693,174)])
 link(onEvent4,16368869:doAdd,[(693,503)(693,237)])
 link(onEvent5,5801888:doAdd,[(693,510)(693,300)])
 link(onEvent6,9943641:doAdd,[(693,517)(693,363)])
 link(onEvent7,1900216:doAdd,[(693,524)(693,426)])
 link(onEvent8,15461858:doAdd,[(693,531)(693,496)])
}
Add(Hub,867147,658,385)
{
 InCount=2
 OutCount=9
 link(onEvent1,9190551:doClear,[(693,391)(693,55)])
 link(onEvent2,12976959:doClear,[(693,398)(693,118)])
 link(onEvent3,14118439:doClear,[(693,405)(693,181)])
 link(onEvent4,16368869:doClear,[(693,412)(693,244)])
 link(onEvent5,5801888:doClear,[(693,419)(693,307)])
 link(onEvent6,9943641:doClear,[(693,426)(693,370)])
 link(onEvent7,1900216:doClear,[])
 link(onEvent8,15461858:doClear,[(693,440)(693,503)])
 link(onEvent9,7872250:doEvent2,[(679,447)(679,463)(636,463)(636,699)])
}
Add(FormatStr,16676898,777,651)
{
 DataCount=9
 Mask="%2=130\;%3=100==2\;%4=40\;%5=120\;%6=60\;%7=90\;%8=170\;%9=130"
 Point(FString)
 link(onFString,1089399:doEnum,[])
 link(Str2,9240923:Text,[])
 link(Str3,15557466:Text,[])
 link(Str4,13834263:Text,[])
 link(Str5,1025435:Text,[])
 link(Str6,12191828:Text,[])
 link(Str7,10475092:Text,[])
 link(Str8,12483492:Text,[])
 link(Str9,7698753:Part3,[])
}
Add(StrList,12961750,1120,651)
{
}
Add(Hub,3731093,665,623)
{
 OutCount=7
 link(onEvent1,12961750:doClear,[(1054,629)(1054,664)])
 link(onEvent2,7754327:doClear,[(697,636)(697,573)])
 link(onEvent3,7692095:doString,[(705,643)(705,559)])
 link(onEvent4,13985413:doEvent1,[])
 link(onEvent5,2724359:doClear,[])
 link(onEvent6,2751956:doData,[(704,664)(704,741)])
 link(onEvent7,12872175:doEnum,[(699,671)(699,748)])
}
Add(StrList,4165990,1036,679)
{
}
Add(ArrayEnum,12872175,1050,742)
{
 link(onItem,12535587:doEvent1,[(1165,748)(1165,545)])
 link(onEndEnum,12038690:doEvent1,[(1091,755)(1091,804)])
 link(Array,4165990:Array,[])
}
Add(FormatStr,5551025,1211,595)
{
 DataCount=9
 Mask="%2;%3;%9;%4;%5;%6;%7;%8"
 Point(FString)
 link(Str2,2858264:Part1,[])
 link(Str3,10546063:Part1,[(1231,363)(1224,363)])
 link(Str4,15711505:Part1,[(1238,387)(1224,387)])
 link(Str5,15186809:Part1,[(1245,425)(1224,425)])
 link(Str6,7841049:Part1,[(1252,457)(1224,457)])
 link(Str7,8785621:Part1,[(1259,481)(1224,481)])
 link(Str8,8846148:Part1,[(1266,513)(1224,513)])
 link(Str9,11780600:Part1,[(1273,541)(1224,541)])
 AddHint(-6,63,148,13,Mask)
}
Add(MultiStrPart,8846148,1218,413)
{
 Count=1
 Point(doFrom)
}
Add(DoData,9247540,1078,427)
{
 Data=Integer(0)
 link(onEventData,8846148:doFrom,[])
 link(Data,8140438:Var3,[(1084,411)])
}
Add(MultiStrPart,8785621,1218,350)
{
 Count=1
 Point(doFrom)
}
Add(DoData,9454781,1078,364)
{
 Data=Integer(0)
 link(onEventData,8785621:doFrom,[])
 link(Data,2303222:Var3,[(1084,348)])
}
Add(MultiStrPart,7841049,1218,287)
{
 Count=1
 Point(doFrom)
}
Add(DoData,14120203,1078,301)
{
 Data=Integer(0)
 link(onEventData,7841049:doFrom,[])
 link(Data,4160589:Var3,[(1084,285)])
}
Add(MultiStrPart,15186809,1218,224)
{
 Count=1
 Point(doFrom)
}
Add(DoData,261413,1078,238)
{
 Data=Integer(0)
 link(onEventData,15186809:doFrom,[])
 link(Data,7467321:Var3,[(1084,222)])
}
Add(MultiStrPart,15711505,1218,161)
{
 Count=1
 Point(doFrom)
}
Add(DoData,11215507,1078,175)
{
 Data=Integer(0)
 link(onEventData,15711505:doFrom,[])
 link(Data,13644517:Var3,[(1084,159)])
}
Add(MultiStrPart,10546063,1218,98)
{
 Count=1
 Point(doFrom)
}
Add(DoData,8235971,1078,112)
{
 Data=Integer(0)
 link(onEventData,10546063:doFrom,[])
 link(Data,16734005:Var3,[(1084,96)])
}
Add(MultiStrPart,2858264,1218,35)
{
 Count=1
 Point(doFrom)
}
Add(DoData,15963495,1078,49)
{
 Data=Integer(0)
 link(onEventData,2858264:doFrom,[])
 link(Data,6229501:Var3,[(1084,33)])
}
Add(Hub,12535587,1183,539)
{
 OutCount=10
 link(onEvent1,2858264:doSplit,[(1207,545)(1207,41)])
 link(onEvent2,10546063:doSplit,[(1207,552)(1207,104)])
 link(onEvent3,15711505:doSplit,[(1207,559)(1207,167)])
 link(onEvent4,15186809:doSplit,[(1207,566)(1207,230)])
 link(onEvent5,7841049:doSplit,[(1207,573)(1207,293)])
 link(onEvent6,8785621:doSplit,[(1207,580)(1207,356)])
 link(onEvent7,8846148:doSplit,[(1207,587)(1207,419)])
 link(onEvent8,11780600:doSplit,[(1207,594)(1207,489)])
 link(onEvent9,5551025:doString,[])
}
Add(BoxDrawManager,7072611,651,49)
{
 Name="u"
 StyleBack=1
 ImageShift=1
 GutterShift=1
 GutterWidth=1
 LightColor=15793151
 DarkColor=-16777201
 LightClrBack=15793151
 DarkClrBack=-16777212
}
Add(Hub,3134335,1120,539)
{
 InCount=9
 link(onEvent2,3731093:doEvent1,[(1142,552)(1142,615)(653,615)(653,629)])
}
Add(Hub,2006738,1036,49)
{
 InCount=2
 link(onEvent1,15963495:doData,[])
 link(onEvent2,3134335:doEvent1,[(1063,62)(1063,545)])
}
Add(Hub,14546244,1036,112)
{
 InCount=2
 link(onEvent1,8235971:doData,[])
 link(onEvent2,3134335:doEvent2,[(1063,125)(1063,552)])
}
Add(Hub,445091,1036,175)
{
 InCount=2
 link(onEvent1,11215507:doData,[])
 link(onEvent2,3134335:doEvent3,[(1063,188)(1063,559)])
}
Add(Hub,3555121,1036,238)
{
 InCount=2
 link(onEvent1,261413:doData,[])
 link(onEvent2,3134335:doEvent4,[(1063,251)(1063,566)])
}
Add(Hub,11847291,1036,301)
{
 InCount=2
 link(onEvent1,14120203:doData,[])
 link(onEvent2,3134335:doEvent5,[(1063,314)(1063,573)])
}
Add(Hub,6798721,1036,364)
{
 InCount=2
 link(onEvent1,9454781:doData,[])
 link(onEvent2,3134335:doEvent6,[(1063,377)(1063,580)])
}
Add(Hub,4095364,1036,427)
{
 InCount=2
 link(onEvent1,9247540:doData,[])
 link(onEvent2,3134335:doEvent7,[(1063,440)(1063,587)])
}
Add(MultiStrData,8412067,651,161)
{
 Count=9
 link(onPart1,9190551:doSelect,[(695,167)(695,90)])
 link(onPart2,12976959:doSelect,[(695,174)(695,153)])
 link(onPart3,14118439:doSelect,[(695,181)(695,216)])
 link(onPart4,16368869:doSelect,[(695,188)(695,279)])
 link(onPart5,5801888:doSelect,[(695,195)(695,342)])
 link(onPart6,9943641:doSelect,[(695,202)(695,405)])
 link(onPart7,1900216:doSelect,[(695,209)(695,468)])
 link(onPart8,15461858:doSelect,[(695,216)(695,538)])
}
Add(FormatStr,7692095,917,553)
{
 DataCount=9
 Mask="%2;%3;%4;%5;%6;%7;%8;%9"
 Point(FString)
 link(Str2,6229501:Var2,[])
 link(Str3,16734005:Var2,[])
 link(Str4,13644517:Var2,[])
 link(Str5,7467321:Var2,[])
 link(Str6,4160589:Var2,[])
 link(Str7,2303222:Var2,[])
 link(Str8,8140438:Var2,[])
 link(Str9,11930704:Var2,[])
}
Add(GetDataEx,6229501,924,28)
{
 Angle=3
 link(Data,9190551:Index,[(762,33)(762,99)(727,99)])
}
Add(GetDataEx,16734005,931,91)
{
 Angle=3
 link(Data,12976959:Index,[(762,96)(762,163)(727,163)])
}
Add(GetDataEx,13644517,938,154)
{
 Angle=3
 link(Data,14118439:Index,[(762,159)(762,228)(727,228)])
}
Add(GetDataEx,7467321,945,217)
{
 Angle=3
 link(Data,16368869:Index,[(762,222)(762,295)(727,295)])
}
Add(GetDataEx,4160589,952,280)
{
 Angle=3
 link(Data,5801888:Index,[(762,285)(762,353)(727,353)])
}
Add(GetDataEx,2303222,959,343)
{
 Angle=3
 link(Data,9943641:Index,[(762,348)(762,417)(727,417)])
}
Add(GetDataEx,8140438,966,406)
{
 Angle=3
 link(Data,1900216:Index,[(762,411)(762,478)(727,478)])
}
Add(Hub,9936957,994,539)
{
 InCount=2
 OutCount=9
 link(onEvent1,2006738:doEvent2,[(1019,545)(1019,62)])
 link(onEvent2,14546244:doEvent2,[(1019,552)(1019,125)])
 link(onEvent3,445091:doEvent2,[(1019,559)(1019,188)])
 link(onEvent4,3555121:doEvent2,[(1019,566)(1019,251)])
 link(onEvent5,11847291:doEvent2,[(1019,573)(1019,314)])
 link(onEvent6,6798721:doEvent2,[(1019,580)(1019,377)])
 link(onEvent7,4095364:doEvent2,[(1019,587)(1019,440)])
 link(onEvent8,13096878:doEvent2,[(1019,594)(1019,510)])
}
Add(Str_Enum,1089399,861,651)
{
 link(onEnum,11183150:doReplace,[])
}
Add(Replace,15695488,994,651)
{
 SubStr="\"
 DestStr=";"
 link(onReplace,12961750:doAdd,[])
}
Add(MST_Clear,7754327,707,567)
{
 ClearAll=0
 MSTControl="rrt"
}
Add(DoData,2751956,1120,735)
{
 link(Data,12961750:Text,[])
}
Add(MST_Clear,2724359,707,651)
{
 MSTControl="rrt"
}
Add(Hub,7872250,665,686)
{
 InCount=2
 OutCount=1
 link(onEvent1,4165990:doClear,[])
}
Add(ComboBox,15461858,707,490)
{
 Left=530
 Top=60
 Width=160
 Height=21
 Font=[Arial Narrow,11,0,0,204]
 WinStyle=1
 Text=""
 ReadOnly=0
 ItemHeight=18
 DropDownCount=15
 BoxDrawManager="u"
 Point(Index)
 Point(onSelect)
 Point(doSelect)
 link(onClick,13096878:doEvent1,[])
}
Add(DoData,4057761,1085,497)
{
 Data=Integer(0)
 link(onEventData,11780600:doFrom,[])
 link(Data,11930704:Var1,[(1091,464)(979,464)])
}
Add(Hub,13096878,1036,497)
{
 InCount=2
 link(onEvent1,4057761:doData,[])
 link(onEvent2,3134335:doEvent8,[(1063,510)(1063,594)])
}
Add(GetDataEx,11930704,973,469)
{
 Angle=3
 link(Data,15461858:Index,[(762,474)(762,552)(727,552)])
}
Add(MultiStrPart,11780600,1218,483)
{
 Count=1
 Point(doFrom)
}
Add(Edit,12191828,812,308)
{
 Left=715
 Top=110
 Width=135
 Font=[Times New Roman,10,0,0,204]
 Ctl3D=1
 Text="Разряд"
 Point(doEnabled)
}
Add(MultiStrPart,7698753,819,560)
{
 Char=" "
 Count=3
 link(Str,5507248:Text,[])
}
Add(Hub,13985413,749,644)
{
 link(onEvent1,7698753:doSplit,[(772,650)(772,566)])
 link(onEvent2,16676898:doString,[])
}
Add(CheckBox,3555934,868,483)
{
 Left=695
 Top=185
 Width=15
 Checked=0
 Caption=""
 Flat=0
}
Add(LineBreak,4247421,1253,1029)
{
 Primary=[9641064,-14,-231]
}
Add(DoData,11410136,1134,798)
{
 Data=String(CTRL + вверх / вниз  ----> перемещение строк)
 link(onEventData,9641064:In,[])
}
Add(LineBreak,4340443,1253,931)
{
 Primary=[8331133,-14,-91]
}
Add(DoData,10084272,1190,840)
{
 link(onEventData,8331133:In,[])
 link(Data,1330640:Text,[])
}
Add(Hub,12038690,1099,798)
{
 link(onEvent1,11410136:doData,[])
 link(onEvent2,2038624:doTimer,[(1123,811)(1123,846)])
}
Add(Timer,2038624,1134,840)
{
 Interval=5000
 Enable=1
 AutoStop=1
 link(onTimer,10084272:doData,[])
}
Add(StrList,1330640,1190,749)
{
 Strings=#39:Внимательно проверьте список участников|
}
Add(Replace,11183150,924,651)
{
 SubStr="."
 DestStr="-"
 link(onReplace,15695488:doReplace,[])
}




немного сложно, но все получалось

Редактировалось 3 раз(а), последний 2016-10-04 09:40:06
карма: 0
well done turner
0
файлы: 1список1.rar [27.3KB] [411]
Ответов: 115
Рейтинг: 1
#4: 2016-10-04 11:48:54 ЛС | профиль | цитата
нашел решение проблемы! долго мучался , и вот все функционирует правильно , хотя может и не так это делается, но вот оно -
с этим можно изменять столбец


Add(StrList,15716330,679,518)
{
}
Add(ArrayEnum,6808174,693,623)
{
 link(onItem,3343078:doEvent1,[])
 link(Array,15716330:Array,[])
}
Add(Hub,3343078,763,623)
{
 OutCount=11
 link(onEvent1,3129939:doSplit,[(823,629)(823,531)])
 link(onEvent2,548751:doSplit,[(826,636)(826,538)])
 link(onEvent3,1997480:doSplit,[(829,643)(829,545)])
 link(onEvent4,3735067:doSplit,[(833,650)(833,552)])
 link(onEvent5,10701597:doSplit,[(837,657)(837,559)])
 link(onEvent6,2393852:doSplit,[(840,664)(840,566)])
 link(onEvent7,12888184:doSplit,[(843,671)(843,573)])
 link(onEvent8,7450264:doSplit,[(847,678)(847,580)])
 link(onEvent9,358077:doSplit,[(851,685)(851,587)])
 link(onEvent10,7192331:doSplit,[(854,692)(854,594)])
 link(onEvent11,8122643:doString,[])
}
Add(MultiStrPart,3129939,868,525)
{
 From=2
 Count=1
 Point(doFrom)
}
Add(MT_IndexToChanel,3702979,749,525)
{
 Count=12
 Point(Data)
 link(onEvent3,3129939:doFrom,[])
 link(onEvent4,548751:doFrom,[])
 link(onEvent5,1997480:doFrom,[])
 link(onEvent6,3735067:doFrom,[])
 link(onEvent7,10701597:doFrom,[])
 link(onEvent8,2393852:doFrom,[])
 link(onEvent9,12888184:doFrom,[])
 link(onEvent10,7450264:doFrom,[])
 link(onEvent11,358077:doFrom,[])
 link(onEvent12,7192331:doFrom,[])
}
Add(MultiStrPart,548751,875,532)
{
 From=2
 Count=1
 Point(doFrom)
}
Add(MultiStrPart,1997480,882,539)
{
 From=2
 Count=1
 Point(doFrom)
}
Add(MultiStrPart,3735067,889,546)
{
 From=2
 Count=1
 Point(doFrom)
}
Add(MultiStrPart,10701597,896,553)
{
 From=2
 Count=1
 Point(doFrom)
}
Add(MultiStrPart,2393852,903,560)
{
 From=2
 Count=1
 Point(doFrom)
}
Add(MultiStrPart,12888184,910,567)
{
 From=2
 Count=1
 Point(doFrom)
}
Add(MultiStrPart,7450264,917,574)
{
 From=2
 Count=1
 Point(doFrom)
}
Add(MultiStrPart,358077,924,581)
{
 From=2
 Count=1
 Point(doFrom)
}
Add(MultiStrPart,7192331,931,588)
{
 From=2
 Count=1
 Point(doFrom)
}
Add(FormatStr,8122643,861,693)
{
 DataCount=11
 Mask="%2;%3;%4;%5;%6;%7;%8;%9"
 link(Str2,3129939:Part1,[])
 link(Str3,548751:Part1,[])
 link(Str4,1997480:Part1,[])
 link(Str5,3735067:Part1,[])
 link(Str6,10701597:Part1,[])
 link(Str7,2393852:Part1,[])
 link(Str8,12888184:Part1,[])
 link(Str9,7450264:Part1,[])
 link(Str10,358077:Part1,[])
 link(Str11,7192331:Part1,[])
}




дальше просто, при каждом изменении, то есть выборе в в выпадающем списке какого то значения, снова перебирается массив - StrList , который хранит весь текст, а вот MT_IdexToChanel выдает только тот самый канал который менялся, и MultiStrPart выдает нужное значение. на остальные это не влияет и они сохраняют свое значение.

Редактировалось 1 раз(а), последний 2016-10-04 11:49:35
карма: 0
well done turner
0
Ответов: 8953
Рейтинг: 824
#5: 2016-10-05 16:16:48 ЛС | профиль | цитата
powerbatman, на форуме много схем для работы с Excel непосредственно, вот пример: http://forum.hiasm.com/getfile/37858
карма: 19

0
файлы: 1список2.rar [104KB] [526]
Ответов: 16884
Рейтинг: 1239
#6: 2016-10-05 17:05:05 ЛС | профиль | цитата
powerbatman писал(а):
создать из файла Excel - таблицу, а заголовки выводятся в выпадающие списки
Леонид, я вообще не понимаю - зачем заголовки выводить в ComboBox-ы ? ТС внятно не объяснил.
"Нафига попу гармонь ?(с)"

Леонид писал(а):
на форуме
Не только на форуме.
Прекрасный пример идет в комплекте с HiAsm в "Каталог проектов->DataBase->TabExcel_with_OleDataSource"

Редактировалось 4 раз(а), последний 2016-10-05 17:14:16
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 115
Рейтинг: 1
#7: 2016-10-06 11:52:59 ЛС | профиль | цитата
Tad писал(а):
заголовки выводить в ComboBox-ы ?

ну тк , что бы сопоставить таблицу из Excel с программой , нужны например только эти колонки. а как иначе поступить ?

--- Добавлено в 2016-10-06 11:58:58

а вот насчет - VBScript , он читает заголовки . все вроде бы прекрасно , но иногда почему то он не может завершить процесс EXCEL , и приходилось завершать через диспетчер задач. а пот как получить заголовки с помощью запросов в OLEDB я так и не понял , перепробывал много вариантов но так и не получилось

Редактировалось 1 раз(а), последний 2016-10-06 11:58:58
карма: 0
well done turner
0
Ответов: 8953
Рейтинг: 824
#8: 2016-10-06 12:54:27 ЛС | профиль | цитата
powerbatman, у меня в выложенной программке Excel закрывается и при нажатии на кнопку "Закрыть", и без кнопки при закрытии программы (Win7, Excel-2003).
карма: 19

0
Ответов: 115
Рейтинг: 1
#9: 2016-10-06 13:10:10 ЛС | профиль | цитата
Tad писал(а):
Леонид

да это я думаю проблема в самом файле Excel, некоторые просто при закрытии выдавали диалог - "сохранить изменения ?"
карма: 0
well done turner
0
Ответов: 16884
Рейтинг: 1239
#10: 2016-10-06 21:20:49 ЛС | профиль | цитата
powerbatman_2.jpg
Ну и какие проблемы с заголовками колонок ?
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
10
ФорумыПомощь по пакетуДинамическое изменение таблицы ← Ctrl1Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2025
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика