HiAsm
HiAsm
Вверх ↑
ФорумыСхемыПростой метод печати табличных данных. ← Ctrl12Ctrl →
Этот топик читают: Гость
Ответов: 16884
Рейтинг: 1239
#1: 2017-04-26 16:45:09 ЛС | профиль | цитата
http://forum.hiasm.com/getfile/38098
Бог в помощь!
и
http://ab-w.net/HTML/HTML_na4alo.php

Редактировалось 1 раз(а), последний 2017-04-27 15:05:48
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 824
Рейтинг: 138
#2: 2017-04-27 11:23:15 ЛС | профиль | цитата
Ваш пример не корректен.

"‹" и "›"

Редактировалось 1 раз(а), последний 2017-04-27 11:23:53
карма: 1

0
Ответов: 196
Рейтинг: 2
#3: 2017-04-27 13:36:59 ЛС | профиль | цитата
Я нашел проблему.
проблема оказалась в фигурных скобках в тегах.
Add(ChildGroupBox,16596836,343,161)
{
}
BEGIN_SDK
Add(EditMulti,12324586,21,21)
{
WorkCount=2
Width=720
Height=368
link(doWork1,2822035:doBringToFront,[(28,27)(28,34)])
link(doWork2,2822035:doSendToBack,[(28,34)(28,41)])
}
Add(GroupBox,2822035,35,28)
{
Left=35
Top=105
Align=5
Caption="На печать."
Point(doBringToFront)
Point(doSendToBack)
}
Add(Button,7347469,91,77)
{
Left=5
Top=20
Width=90
Caption="Создать HTML"
link(onClick,8056583:doEvent1,[])
}
Add(DoData,682558,210,84)
{
Data=String(<html><head></head><body><h3 align="center" style="color:Tomato">Домашняя бухгалтерия. РАСХОДЫ.</h3> <table lign="center" border="1" width="90%"> <tr><td>Наименование расходов </td><td>&nbspСумма </td></tr> )
link(onEventData,4584918:doWork1,[(473,90)])
}
Add(DoData,5200042,287,252)
{
Data=String(</table></body></html>)
link(onEventData,14204559:doWork3,[(473,258)])
}
Add(Hub,8056583,147,77)
{
OutCount=5
link(onEvent1,7247405:doClear,[(486,83)(486,244)])
link(onEvent2,682558:doData,[])
link(onEvent3,3517164:doEnum,[(177,97)(177,195)])
link(onEvent4,14204559:doWork2,[(170,104)(170,237)])
link(onEvent5,6248942:doEvent1,[(167,111)(167,300)])
}
Add(StrList,7247405,511,231)
{
}
Add(HubEx,14204559,469,231)
{
link(onEvent,7247405:doAdd,[])
}
Add(DoData,3641262,511,294)
{
link(onEventData,13482478:doMask,[])
link(Data,7247405:Text,[])
}
Add(WebBrowser,14981452,658,259)
{
Left=120
Top=15
Width=605
Height=510
Point(doFromText)
Point(doPreview)
}
Add(Button,5676408,511,336)
{
Left=5
Top=50
Width=90
Caption="Печать"
link(onClick,14981452:doPreview,[(651,342)(651,300)])
}
Add(StrList,14624440,217,126)
{
Strings=#8:Вася;230|8:Коля;150|8:Петя;470|8:Витя;100|
}
Add(ArrayEnum,3517164,231,189)
{
@Hint=#20:Подключаешь к своей |21:таблице к точке Array|
link(onItem,10559579:doSplit,[])
link(onEndEnum,5200042:doData,[(275,202)(275,258)])
link(Array,14624440:Array,[])
AddHint(60,-54,131,26,@Hint)
}
Add(FormatStr,3358128,357,189)
{
Mask="<tr><td> %1 </td><td> %2</td></tr>"
link(onFString,4584918:doWork2,[])
link(Str1,10559579:Left,[(363,177)(335,177)(335,233)(307,233)])
link(Str2,10559579:Right,[(370,177)(342,177)(342,233)(314,233)])
}
Add(StrPart,10559579,301,189)
{
Char=";"
Point(Left)
Point(Right)
link(onSplit,3358128:doString,[])
}
Add(HubEx,4584918,469,189)
{
Angle=1
link(onEvent,14204559:doWork1,[])
}
Add(FormatStr,13482478,574,287)
{
DataCount=5
Mask=""
Point(doMask)
link(onFString,14981452:doFromText,[])
}
Add(Hub,6248942,448,294)
{
link(onEvent1,3641262:doData,[])
link(onEvent2,13482478:doString,[(476,307)(476,293)])
}
END_SDK
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#4: 2017-04-27 15:04:33 ЛС | профиль | цитата
Сто раз зарекался выкладывать схемы только в rar
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1Пример.rar [1.3KB] [712]
Ответов: 196
Рейтинг: 2
#5: 2017-04-27 16:24:38 ЛС | профиль | цитата
И попутный вопрос, а как сделать так чтоб в конце распечатки считалась общая сумма отдельной строкой?
карма: 0

0
Разработчик
Ответов: 26113
Рейтинг: 2126
#6: 2017-04-27 16:57:47 ЛС | профиль | цитата
zhorik5 писал(а):
И попутный вопрос, а как сделать так чтоб в конце распечатки считалась общая сумма отдельной строкой?

Как-то так

Схема


Add(MainForm,2953706,21,105)
{
 Width=755
 Height=572
}
Add(ChildGroupBox,16596836,70,105)
{
}
BEGIN_SDK
  Add(EditMulti,12324586,21,21)
  {
   WorkCount=2
   Width=755
   Height=424
   link(doWork1,2822035:doBringToFront,[(28,27)(28,34)])
   link(doWork2,2822035:doSendToBack,[(28,34)(28,41)])
  }
  Add(GroupBox,2822035,35,28)
  {
   Width=739
   Height=534
   Align=5
   Caption="На печать."
   Point(doBringToFront)
   Point(doSendToBack)
  }
  Add(Button,7347469,63,77)
  {
   Left=5
   Top=20
   Width=90
   Caption="Создать HTML"
   link(onClick,8056583:doEvent1,[])
  }
  Add(DoData,682558,217,91)
  {
   Data=String(<html><head></head><body><h3 align="center" style="color:Tomato">Домашняя бухгалтерия. РАСХОДЫ.</h3> <table lign="center" border="1" width="90%"> <tr><td><b>Наименование расходов  </b></td><td>&nbsp<b>Сумма </b></td></tr> )
   link(onEventData,4584918:doWork1,[(536,97)])
  }
  Add(DoData,5200042,322,259)
  {
   Data=String(</table></body></html>)
   link(onEventData,795683:doWork2,[])
  }
  Add(Hub,8056583,112,77)
  {
   OutCount=7
   link(onEvent1,7247405:doClear,[(543,83)(543,244)])
   link(onEvent2,9199990:doClear,[(158,90)(158,335)])
   link(onEvent3,682558:doData,[])
   link(onEvent4,3517164:doEnum,[(200,104)(200,195)])
   link(onEvent5,14204559:doWork2,[(155,111)(155,244)(347,244)(347,237)])
   link(onEvent6,6248942:doEvent1,[(144,118)(144,300)])
  }
  Add(StrList,7247405,595,231)
  {
  }
  Add(HubEx,14204559,532,231)
  {
   link(onEvent,7247405:doAdd,[])
  }
  Add(DoData,3641262,595,294)
  {
   link(onEventData,13482478:doMask,[])
   link(Data,7247405:Text,[])
  }
  Add(WebBrowser,14981452,721,259)
  {
   Left=120
   Top=15
   Width=605
   Height=510
   Point(doFromText)
   Point(doPreview)
  }
  Add(Button,5676408,595,336)
  {
   Left=5
   Top=50
   Width=90
   Caption="Печать"
   link(onClick,14981452:doPreview,[(714,342)(714,300)])
  }
  Add(StrList,14624440,217,133)
  {
   Strings=#8:Вася;230|8:Коля;150|8:Петя;470|8:Витя;100|
  }
  Add(ArrayEnum,3517164,231,189)
  {
   @Hint=#20:Подключаешь к своей |21:таблице к точке Array|
   link(onItem,10559579:doSplit,[])
   link(onEndEnum,218615:doEvent1,[(275,202)(275,258)])
   link(Array,14624440:Array,[])
   AddHint(60,-54,131,26,@Hint)
  }
  Add(FormatStr,3358128,434,189)
  {
   Mask="<tr><td> %1 </td><td> %2</td></tr>"
   link(onFString,4584918:doWork2,[])
   link(Str1,10559579:Left,[(440,177)(335,177)(335,233)(307,233)])
   link(Str2,10559579:Right,[(447,177)(342,177)(342,233)(314,233)])
  }
  Add(StrPart,10559579,301,189)
  {
   Char=";"
   Point(Left)
   Point(Right)
   link(onSplit,13091119:doEvent1,[])
  }
  Add(HubEx,4584918,532,189)
  {
   Angle=1
   link(onEvent,14204559:doWork1,[])
  }
  Add(FormatStr,13482478,658,287)
  {
   DataCount=5
   Mask=""
   Point(doMask)
   link(onFString,14981452:doFromText,[])
  }
  Add(Hub,6248942,560,294)
  {
   link(onEvent1,3641262:doData,[])
   link(onEvent2,13482478:doString,[(581,307)(581,293)])
  }
  Add(Hub,13091119,357,189)
  {
   link(onEvent1,3358128:doString,[])
   link(onEvent2,9199990:doAdd,[(382,202)(382,328)])
  }
  Add(StrList,9199990,406,322)
  {
  }
  Add(ArraySum,4914408,420,385)
  {
   ArrayType=1
   link(onSum,157244:doString,[])
   link(Array,9199990:Array,[])
  }
  Add(FormatStr,157244,469,385)
  {
   DataCount=1
   Mask="<tr><td><b> Итого: </b></td><td><b> %1</b></td></tr>"
   link(onFString,795683:doWork3,[(536,391)])
  }
  Add(HubEx,795683,532,259)
  {
   Angle=3
   link(onEvent,14204559:doWork3,[])
  }
  Add(Hub,218615,287,252)
  {
   link(onEvent1,4914408:doSum,[(312,258)(312,391)])
   link(onEvent2,5200042:doData,[])
  }
END_SDK
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#7: 2017-04-28 11:51:35 ЛС | профиль | цитата
1. или так

Add(MainForm,3591892,140,112)
{
 Width=755
 Height=572
}
Add(ChildGroupBox,16596836,189,112)
{
}
BEGIN_SDK
  Add(EditMulti,12324586,21,21)
  {
   WorkCount=2
   Width=650
   Height=298
   VOffset=49
   link(doWork1,2822035:doBringToFront,[])
   link(doWork2,2822035:doSendToBack,[])
  }
  Add(GroupBox,2822035,35,70)
  {
   Width=739
   Height=534
   Align=5
   Caption="На печать."
   Point(doBringToFront)
   Point(doSendToBack)
  }
  Add(Button,7347469,35,28)
  {
   Left=5
   Top=20
   Width=90
   Caption="Создать HTML"
   link(onClick,8056583:doEvent1,[])
  }
  Add(DoData,682558,420,42)
  {
   Data=String(<html><head></head><body><h3 align="center" style="color:Tomato">Домашняя бухгалтерия. РАСХОДЫ.</h3> <table lign="center" border="1" width="90%"> <tr><td><b>Наименование расходов  </b></td><td>&nbsp<b>Сумма </b></td></tr> )
   link(onEventData,4584918:doWork1,[(508,48)])
  }
  Add(DoData,5200042,420,231)
  {
   Data=String(</table></body></html>)
   link(onEventData,14204559:doWork3,[(508,237)])
  }
  Add(Hub,8056583,84,28)
  {
   OutCount=4
   link(onEvent1,7247405:doClear,[(515,34)(515,181)])
   link(onEvent2,13503857:doClear,[(136,41)(136,181)])
   link(onEvent3,682558:doData,[])
   link(onEvent4,3517164:doEnum,[(172,55)(172,146)])
  }
  Add(StrList,7247405,532,168)
  {
  }
  Add(HubEx,14204559,504,168)
  {
   link(onEvent,7247405:doAdd,[])
  }
  Add(DoData,3641262,532,238)
  {
   link(onEventData,14981452:doFromText,[])
   link(Data,7247405:Text,[])
  }
  Add(WebBrowser,14981452,630,210)
  {
   Left=120
   Top=15
   Width=605
   Height=510
   Point(doFromText)
   Point(doPreview)
  }
  Add(Button,5676408,574,245)
  {
   Left=5
   Top=50
   Width=90
   Caption="Печать"
   link(onClick,14981452:doPreview,[])
  }
  Add(StrList,14624440,189,84)
  {
   Strings=#8:Вася;230|8:Коля;150|9:Петя;4270|8:Витя;100|
  }
  Add(ArrayEnum,3517164,203,140)
  {
   @Hint=#20:Подключаешь к своей |21:таблице к точке Array|
   link(onItem,10559579:doSplit,[])
   link(onEndEnum,218615:doEvent1,[(247,153)(247,230)])
   link(Array,14624440:Array,[])
   AddHint(60,-54,131,26,@Hint)
  }
  Add(FormatStr,3358128,420,140)
  {
   Mask="<tr><td> %1 </td><td align="Right"> %2</td></tr>"
   link(onFString,4584918:doWork2,[])
   link(Str1,10559579:Left,[(426,128)(318,128)(318,178)(279,178)])
  }
  Add(StrPart,10559579,273,140)
  {
   Char=";"
   Point(Left)
   Point(Right)
   link(onSplit,13091119:doEvent1,[])
  }
  Add(HubEx,4584918,504,140)
  {
   Angle=1
   link(onEvent,14204559:doWork1,[])
  }
  Add(Hub,13091119,329,140)
  {
   link(onEvent1,3358128:doString,[])
   link(onEvent2,13503857:doOperation,[(350,153)(350,174)])
  }
  Add(FormatStr,157244,357,224)
  {
   DataCount=1
   Mask="<tr  style="color:Red"><td><b> Итого: </b></td><td align="Right"><b> %1</b></td></tr>"
   link(onFString,14204559:doWork2,[(409,230)(409,174)])
   link(Str1,3473619:Var2,[])
  }
  Add(Hub,218615,329,224)
  {
   OutCount=3
   link(onEvent1,157244:doString,[])
   link(onEvent2,5200042:doData,[])
   link(onEvent3,3641262:doData,[])
  }
  Add(Math,13503857,357,168)
  {
   Point(doClear)
   link(Op1,3473619:Var3,[(363,156)(396,156)(396,208)])
  }
  Add(GetDataEx,3473619,357,203)
  {
   link(Data,13503857:Result,[])
  }
END_SDK


2. или так

Add(MainForm,3591892,119,112)
{
 Width=755
 Height=572
}
Add(ChildGroupBox,16596836,168,112)
{
 link(Data1,14624440:Array,[])
}
BEGIN_SDK
  Add(EditMulti,12324586,21,21)
  {
   WorkCount=2
   DataCount=1
   Width=545
   Height=263
   VOffset=49
   HOffset=105
   link(doWork1,2822035:doBringToFront,[])
   link(doWork2,2822035:doSendToBack,[])
  }
  Add(GroupBox,2822035,35,70)
  {
   Width=739
   Height=534
   Align=5
   Caption="На печать."
   Point(doBringToFront)
   Point(doSendToBack)
  }
  Add(Button,7347469,35,28)
  {
   Left=5
   Top=20
   Width=90
   Caption="Создать HTML"
   link(onClick,8056583:doEvent1,[])
  }
  Add(DoData,682558,343,42)
  {
   Data=String(<html><head></head><body><h3 align="center" style="color:Tomato">Домашняя бухгалтерия. РАСХОДЫ.</h3> <table lign="center" border="1" width="90%"> <tr><td><b>Наименование расходов  </b></td><td>&nbsp<b>Сумма </b></td></tr> )
   link(onEventData,4584918:doWork1,[(389,48)])
  }
  Add(Hub,8056583,84,28)
  {
   OutCount=4
   link(onEvent1,7247405:doClear,[(408,34)(408,153)])
   link(onEvent2,13503857:doClear,[(110,41)(110,181)])
   link(onEvent3,682558:doData,[])
   link(onEvent4,3517164:doEnum,[(121,55)(121,146)])
  }
  Add(StrList,7247405,413,140)
  {
  }
  Add(DoData,3641262,413,231)
  {
   link(onEventData,14981452:doFromText,[])
   link(Data,7247405:Text,[])
  }
  Add(WebBrowser,14981452,511,203)
  {
   Left=120
   Top=15
   Width=605
   Height=510
   Point(doFromText)
   Point(doPreview)
  }
  Add(Button,5676408,455,238)
  {
   Left=5
   Top=50
   Width=90
   Caption="Печать"
   link(onClick,14981452:doPreview,[])
  }
  Add(ArrayEnum,3517164,126,140)
  {
   @Hint=#20:Подключаешь к своей |21:таблице к точке Array|
   link(onItem,10559579:doSplit,[])
   link(onEndEnum,218615:doEvent1,[(170,153)(170,230)])
   link(Array,12324586:Data1,[])
   AddHint(14,-51,131,26,@Hint)
  }
  Add(FormatStr,3358128,343,140)
  {
   Mask="<tr><td> %1 </td><td align="Right"> %2</td></tr>"
   link(onFString,4584918:doWork2,[])
   link(Str1,10559579:Left,[(349,128)(241,128)(241,178)(202,178)])
  }
  Add(StrPart,10559579,196,140)
  {
   Char=";"
   Point(Left)
   Point(Right)
   link(onSplit,13091119:doEvent1,[])
  }
  Add(HubEx,4584918,385,140)
  {
   link(onEvent,7247405:doAdd,[])
  }
  Add(Hub,13091119,252,140)
  {
   link(onEvent1,3358128:doString,[])
   link(onEvent2,13503857:doOperation,[(273,153)(273,174)])
  }
  Add(FormatStr,157244,280,224)
  {
   DataCount=1
   Mask="<tr  style="color:Red"><td><b> Итого: </b></td><td align="Right"><b> %1</b></td></tr> </table></body></html>"
   link(onFString,4584918:doWork3,[(389,230)])
   link(Str1,3473619:Var2,[])
  }
  Add(Hub,218615,252,224)
  {
   link(onEvent1,157244:doString,[])
   link(onEvent2,3641262:doData,[])
  }
  Add(Math,13503857,280,168)
  {
   Point(doClear)
   link(Op1,3473619:Var3,[(286,156)(319,156)(319,208)])
  }
  Add(GetDataEx,3473619,280,203)
  {
   link(Data,13503857:Result,[])
  }
END_SDK
Add(StrList,14624440,154,49)
{
 Strings=#8:Вася;230|8:Коля;150|9:Петя;4270|8:Витя;100|
}

можно так
Вариантов море.

А можно HTML создавать и "напрямую" запросом к таблице в БД

Редактировалось 3 раз(а), последний 2017-04-28 12:47:36
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 196
Рейтинг: 2
#8: 2017-04-28 15:51:58 ЛС | профиль | цитата
Как-то так

малость под себя допилил


Add(ChildForm,12807136,532,91)
{
}
BEGIN_SDK
  Add(EditMulti,2252790,21,21)
  {
   WorkCount=1
   DataCount=1
   Width=678
   Height=333
   link(doWork1,10120050:doShowModal,[(28,27)(28,146)])
  }
  Add(MainForm,10120050,84,112)
  {
   Left=35
   Top=105
   Width=964
   Height=647
   Visible=1
   Point(doShowModal)
   link(onActivate,9796773:doWork3,[(184,118)(184,153)])
  }
  Add(ChildGroupBox,16596836,651,28)
  {
  }
  BEGIN_SDK
    Add(EditMulti,12324586,21,21)
    {
     WorkCount=3
     DataCount=1
     Width=720
     Height=620
     link(doWork1,2822035:doBringToFront,[])
     link(doWork2,2822035:doSendToBack,[])
     link(doWork3,8056583:doEvent1,[(81,41)(81,83)])
    }
    Add(GroupBox,2822035,147,21)
    {
     Width=956
     Height=613
     Align=5
     Caption="На печать."
     Point(doBringToFront)
     Point(doSendToBack)
    }
    Add(Button,7347469,63,133)
    {
     Left=5
     Top=20
     Width=90
     Caption="Отобразить"
    }
    Add(DoData,682558,210,84)
    {
     Data=String(<html><head></head><body><h3 align="center" style="color:Tomato">Домашняя бухгалтерия. РАСХОДЫ.</h3><table align="center" border="1" width="60%"><tr><td>Наименование расходов</td><td>&nbspСумма1 </td><td>&nbspСумма2 </td><td>&nbspСумма3 </td><td>&nbspСумма4 </td><td>&nbspСумма5 </td><td>&nbspСумма6 </td><td>&nbspСумма7 </td></tr>)
     link(onEventData,4584918:doWork1,[(473,90)])
    }
    Add(DoData,5200042,322,273)
    {
     Data=String(</table></body></html>)
     link(onEventData,13862976:doWork2,[])
    }
    Add(Hub,8056583,140,77)
    {
     OutCount=8
     link(onEvent1,7247405:doClear,[(482,83)(482,223)])
     link(onEvent2,682558:doData,[])
     link(onEvent3,3517164:doEnum,[(177,97)(177,216)])
     link(onEvent4,14204559:doWork2,[(175,104)(175,258)])
     link(onEvent5,6248942:doEvent1,[(167,111)(167,300)])
     link(onEvent7,9199990:doClear,[(259,125)(259,405)])
     link(onEvent8,5463605:doClear,[(217,132)(217,454)])
    }
    Add(StrList,7247405,525,210)
    {
    }
    Add(HubEx,14204559,469,252)
    {
     link(onEvent,16251860:doEvent1,[(490,258)(490,125)])
    }
    Add(DoData,3641262,511,294)
    {
     link(onEventData,13482478:doMask,[])
     link(Data,7247405:Text,[(517,274)(531,274)])
    }
    Add(WebBrowser,14981452,693,259)
    {
     Left=120
     Top=15
     Width=605
     Height=510
     Point(doFromText)
     Point(doPreview)
    }
    Add(Button,5676408,658,343)
    {
     Left=5
     Top=50
     Width=90
     Caption="Печать"
     link(onClick,14981452:doPreview,[(692,349)(692,300)])
    }
    Add(ArrayEnum,3517164,217,210)
    {
     @Hint=#20:Подключаешь к своей |21:таблице к точке Array|
     link(onItem,12801865:doSplit,[(268,216)(268,195)])
     link(onEndEnum,10171220:doEvent1,[(257,223)(257,307)])
     link(Array,12324586:Data1,[(223,105)(27,105)])
     AddHint(30,-58,131,26,@Hint)
    }
    Add(FormatStr,3358128,406,210)
    {
     DataCount=8
     Mask="<tr><td> %1 </td><td> %2 </td><td> %3 </td><td> %4 </td><td> %5 </td><td> %6 </td><td> %7 </td><td> %8 </td></tr>"
     link(onFString,4584918:doWork2,[(467,216)(467,195)])
     link(Str1,12801865:Part1,[(412,184)(328,184)(328,266)(279,266)])
     link(Str2,12801865:Part3,[(419,184)(352,184)(352,254)(293,254)])
     link(Str3,12801865:Part4,[(426,184)(359,184)(359,254)(300,254)])
     link(Str4,12801865:Part5,[(433,184)(366,184)(366,254)(307,254)])
     link(Str5,12801865:Part6,[(440,184)(373,184)(373,254)(314,254)])
     link(Str6,12900287:Var3,[(447,198)(384,198)(384,233)])
     link(Str7,8431962:Var2,[(454,184)(387,184)(387,254)(328,254)])
     link(Str8,12801865:Part13,[(461,184)(408,184)(408,254)(363,254)])
    }
    Add(HubEx,4584918,469,189)
    {
     Angle=1
     link(onEvent,14204559:doWork1,[])
    }
    Add(FormatStr,13482478,595,287)
    {
     DataCount=5
     Mask=""
     Point(doMask)
     link(onFString,14981452:doFromText,[])
    }
    Add(Hub,6248942,448,294)
    {
     link(onEvent1,3641262:doData,[])
     link(onEvent2,13482478:doString,[(476,307)(476,293)])
    }
    Add(MultiStrPart,12801865,273,189)
    {
     Char="\9"
     Count=13
     link(onSplit,5393464:doEvent1,[])
    }
    Add(Memo,13642479,609,105)
    {
     Left=15
     Top=525
     Width=925
    }
    Add(Hub,16251860,539,119)
    {
     link(onEvent1,13642479:doAdd,[(581,125)(581,111)])
     link(onEvent2,7247405:doAdd,[(565,132)(565,174)(513,174)(513,216)])
    }
    Add(StrList,9199990,364,392)
    {
     link(Str,8431962:Var3,[(370,236)])
    }
    Add(ArraySum,4914408,378,455)
    {
     ArrayType=1
     Delimiter="\9"
     link(Array,9199990:Array,[])
    }
    Add(FormatStr,157244,434,546)
    {
     DataCount=8
     Mask="<tr><td><b> Итого: </b></td><td> +++</td><td> +++ </td><td> ++++ </td><td> +++++</td><td> %6 </td><td> %7 </td><td> ++++++++ </td></tr>"
     link(onFString,13862976:doWork3,[(519,552)(519,371)(466,371)])
     link(Str6,2030785:Sum,[(475,534)(307,534)])
     link(Str7,4914408:Sum,[(482,516)(384,516)])
    }
    Add(Hub,5393464,378,189)
    {
     OutCount=3
     link(onEvent1,3358128:doString,[(399,195)(399,216)])
     link(onEvent2,9199990:doAdd,[(404,202)(404,300)(352,300)(352,398)])
     link(onEvent3,5463605:doAdd,[(404,209)(404,328)(268,328)(268,447)])
    }
    Add(Hub,10171220,266,301)
    {
     OutCount=3
     link(onEvent1,5200042:doData,[(301,307)(301,279)])
     link(onEvent2,4914408:doSum,[(329,314)(329,461)])
     link(onEvent3,2030785:doSum,[(292,321)(292,415)(268,415)(268,510)])
    }
    Add(HubEx,13862976,462,273)
    {
     link(onEvent,14204559:doWork3,[(473,278)])
    }
    Add(GetDataEx,8431962,322,231)
    {
     link(Data,12801865:Part8,[])
    }
    Add(ArraySum,2030785,301,504)
    {
     ArrayType=1
     Delimiter="\9"
     link(onSum,157244:doString,[(383,510)(383,552)])
     link(Array,5463605:Array,[])
    }
    Add(StrList,5463605,287,441)
    {
     link(Str,12900287:Var2,[(293,339)(377,339)])
    }
    Add(GetDataEx,12900287,371,228)
    {
     Angle=3
     link(Data,12801865:Part7,[(321,233)])
    }
  END_SDK
  Add(ChildGroupBox,9796773,252,133)
  {
   link(Data1,2252790:Data1,[(258,98)(27,98)])
  }
  BEGIN_SDK
    Add(EditMulti,15694451,21,21)
    {
     WorkCount=3
     DataCount=1
     Width=720
     Height=620
     link(doWork1,8738447:doBringToFront,[])
     link(doWork2,8738447:doSendToBack,[])
     link(doWork3,15181694:doEvent1,[(81,41)(81,83)])
    }
    Add(GroupBox,8738447,147,21)
    {
     Width=956
     Height=613
     Align=5
     Caption=""
     Point(doBringToFront)
     Point(doSendToBack)
    }
    Add(DoData,10659148,245,84)
    {
     Data=String()
     link(onEventData,12313307:doWork1,[(473,90)])
     link(Data,82158:Text,[])
    }
    Add(DoData,6550412,322,273)
    {
     Data=String(</table></body></html>)
     link(onEventData,1875310:doWork2,[])
    }
    Add(Hub,15181694,140,77)
    {
     OutCount=8
     link(onEvent1,14211770:doClear,[(482,83)(482,223)])
     link(onEvent2,10659148:doData,[])
     link(onEvent3,11882783:doEnum,[(177,97)(177,216)])
     link(onEvent4,546942:doWork2,[(175,104)(175,258)])
     link(onEvent5,12350044:doEvent1,[(167,111)(167,300)])
     link(onEvent7,16390816:doClear,[(259,125)(259,405)])
     link(onEvent8,4434477:doClear,[(217,132)(217,454)])
    }
    Add(StrList,14211770,525,210)
    {
    }
    Add(HubEx,546942,469,252)
    {
     link(onEvent,14211770:doAdd,[(490,258)(490,125)(565,132)(565,174)(513,174)(513,216)])
    }
    Add(DoData,11899190,511,294)
    {
     link(onEventData,4515053:doMask,[])
     link(Data,14211770:Text,[(517,274)(531,274)])
    }
    Add(WebBrowser,16257086,693,259)
    {
     Left=79
     Top=15
     Width=875
     Height=596
     Align=5
     Point(doFromText)
     Point(doPreview)
    }
    Add(ArrayEnum,11882783,217,210)
    {
     @Hint=#20:Подключаешь к своей |21:таблице к точке Array|
     link(onItem,4003050:doSplit,[(268,216)(268,195)])
     link(onEndEnum,9736086:doEvent1,[(257,223)(257,307)])
     link(Array,15694451:Data1,[(223,105)(27,105)])
     AddHint(30,-58,131,26,@Hint)
    }
    Add(FormatStr,11724555,406,210)
    {
     DataCount=8
     Mask="<tr><td> %1 </td><td> %2 </td><td> %3 </td><td> %4 </td><td> %5 </td><td> %6 </td><td> %7 </td><td> %8 </td></tr>"
     link(onFString,12313307:doWork2,[(467,216)(467,195)])
     link(Str1,4003050:Part1,[(412,184)(328,184)(328,266)(279,266)])
     link(Str2,4003050:Part3,[(419,184)(352,184)(352,254)(293,254)])
     link(Str3,4003050:Part4,[(426,184)(359,184)(359,254)(300,254)])
     link(Str4,4003050:Part5,[(433,184)(366,184)(366,254)(307,254)])
     link(Str5,4003050:Part6,[(440,184)(373,184)(373,254)(314,254)])
     link(Str6,5173517:Var3,[(447,198)(384,198)(384,233)])
     link(Str7,9447706:Var2,[(454,184)(387,184)(387,254)(328,254)])
     link(Str8,4003050:Part13,[(461,184)(408,184)(408,254)(363,254)])
    }
    Add(HubEx,12313307,469,189)
    {
     Angle=1
     link(onEvent,546942:doWork1,[])
    }
    Add(FormatStr,4515053,595,287)
    {
     DataCount=5
     Mask=""
     Point(doMask)
     link(onFString,16257086:doFromText,[])
    }
    Add(Hub,12350044,448,294)
    {
     link(onEvent1,11899190:doData,[])
     link(onEvent2,4515053:doString,[(476,307)(476,293)])
    }
    Add(MultiStrPart,4003050,273,189)
    {
     Char="\9"
     Count=13
     link(onSplit,7317657:doEvent1,[])
    }
    Add(StrList,16390816,364,392)
    {
     link(Str,9447706:Var3,[(370,236)])
    }
    Add(ArraySum,11641580,378,455)
    {
     ArrayType=1
     Delimiter="\9"
     link(Array,16390816:Array,[])
    }
    Add(FormatStr,5835805,434,546)
    {
     DataCount=8
     Mask="<tr><td><b> Итого: </b></td><td><center>------</center></td><td><center>------</center></td><td><center>------</center></td><td><center>------</center></td><td><b><center> %6 </center></b></td><td><b><center> %7 </center></b></td><td><center>------</center></td></tr>"
     link(onFString,12176136:doEvent1,[(502,552)(502,461)])
     link(Str6,12456890:Sum,[(475,534)(307,534)])
     link(Str7,11641580:Sum,[(482,516)(384,516)])
    }
    Add(Hub,7317657,378,189)
    {
     OutCount=3
     link(onEvent1,11724555:doString,[(399,195)(399,216)])
     link(onEvent2,16390816:doAdd,[(404,202)(404,300)(352,300)(352,398)])
     link(onEvent3,4434477:doAdd,[(404,209)(404,328)(268,328)(268,447)])
    }
    Add(Hub,9736086,266,301)
    {
     OutCount=3
     link(onEvent2,11641580:doSum,[(329,314)(329,461)])
     link(onEvent3,12456890:doSum,[(292,321)(292,415)(268,415)(268,510)])
    }
    Add(HubEx,1875310,462,273)
    {
     link(onEvent,546942:doWork3,[(473,278)])
    }
    Add(GetDataEx,9447706,322,231)
    {
     link(Data,4003050:Part8,[])
    }
    Add(ArraySum,12456890,301,504)
    {
     ArrayType=1
     Delimiter="\9"
     link(onSum,5835805:doString,[(383,510)(383,552)])
     link(Array,4434477:Array,[])
    }
    Add(StrList,4434477,287,441)
    {
     link(Str,5173517:Var2,[(293,339)(377,339)])
    }
    Add(GetDataEx,5173517,371,228)
    {
     Angle=3
     link(Data,4003050:Part7,[(321,233)])
    }
    Add(Hub,12176136,511,455)
    {
     link(onEvent1,1875310:doWork3,[(537,461)(537,371)(466,371)])
     link(onEvent2,6550412:doData,[(537,468)(537,374)(310,374)(310,279)])
    }
    Add(ChildPanel,630608,63,364)
    {
     link(onEvent1,7844811:In,[])
    }
    BEGIN_SDK
      Add(EditMulti,3907775,21,21)
      {
       EventCount=1
      }
      Add(Panel,5757991,35,105)
      {
       Left=2
       Top=15
       Width=77
       Height=596
       Align=1
       BorderWidth=0
       BevelWidth=0
      }
      Add(Button,13894097,63,21)
      {
       Left=5
       Top=5
       Width=60
       Height=30
       Caption="Печать"
       link(onClick,3907775:onEvent1,[])
      }
    END_SDK
    Add(LineBreak,13394926,651,301)
    {
     link(Out,16257086:doPreview,[(687,307)(687,300)])
     Primary=[7844811,-546,63]
    }
    Add(StrList,82158,245,28)
    {
     Strings=#12:<html><head>|23:<style type="text/css">|9:   BODY {|22:    background: white;|4:   }|10:   TABLE {|32:      border-collapse: collapse;|7:      }|11:   TD, TR {|17:    padding: 1px;|26:       text-align: center;|4:   }|23:  </style></head><body>|71:<h3 align="center" style="color:Tomato">Отчет о проделанной работе</h3>|45:<table align="center" border="1" width="60%">|4:<tr>|16:<td><b>Дата</td>|19:<td><b>Клиент </td>|22:<td><b>Сотрудник </td>|19:<td><b>Услуга </td>|19:<td><b>Модель </td>|22:<td><b>Стоимость </td>|27:<td><b>Вознаграждение </td>|21:<td><b>Штрихкод </td>|5:</tr>|
    }
  END_SDK
END_SDK
Add(Button,14880709,243,168)
{
 Left=80
 Top=5
 Caption="К печати"
 link(onClick,12807136:doWork1,[(470,174)(470,97)])
}
Ребята вы просто гуру!!!!

--- Добавлено в 2017-04-28 15:56:42

А можно HTML создавать и "напрямую" запросом к таблице в БД

а вот это кстати интересно!

Редактировалось 3 раз(а), последний 2017-05-03 12:52:21
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#9: 2017-04-28 16:27:15 ЛС | профиль | цитата
zhorik5,схему нужно ещё заключать в теги code
Посмотри то, что ты выложил.
Ну нахрена кому нужна "вроде схема", разукрашенная смайликами ?

Редактировалось 1 раз(а), последний 2017-04-28 16:27:37
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 824
Рейтинг: 138
#10: 2017-04-30 17:27:15 ЛС | профиль | цитата
Tad писал(а):
А можно HTML создавать и "напрямую" запросом к таблице в БД

zhorik5 писал(а):
а вот это кстати интересно!

Где-то так


Add(MainForm,2953706,238,140)
{
 Width=579
 Height=469
 link(onCreate,951801:doOpen,[])
}
Add(WebBrowser,3468261,364,224)
{
 Left=85
 Top=10
 Width=470
 Height=415
 Point(doFromText)
}
Add(Button,8840981,245,252)
{
 Left=15
 Top=10
 Caption="Отчет"
 link(onClick,5178164:doQuery,[])
}
Add(DS_SQLite,951801,301,154)
{
 Name="baaaseee"
 FileName=":memory:"
 link(onOpen,683309:doExec,[])
}
Add(DSC_Query,5178164,301,252)
{
 SQL="SELECT '<html><head><title>Отчет</title></head><body><h2 align="center">Ценник</h2>\r\n      <table align="center" border="1" width="90%"><tr>\r\n      <td align="center" style="color: Maroon"><b>Товар</b></td>\r\n      <td align="center" style="color: Maroon"><b>Ед. изм.</b></td>\r\n      <td align="center" style="color: Maroon"><b>Цена</b></td></tr>'||\r\n      group_concat('<tr><td>'||tovar||'</td><td>'||unit||'</td><td align="right">'||cena||'</td></tr>',' ')||\r\n      '<tr style="background-color: Aqua;"><td>Всего наименований</td><td>&nbsp</td><td align="right">'||Count(tovar)||'</td></tr></table></body></html>'\r\n FROM price"
 DSManager="baaaseee"
 link(onQuery,3468261:doFromText,[])
}
Add(DSC_Exec,683309,357,154)
{
 SQL="BEGIN TRANSACTION;\r\nCREATE TABLE IF NOT EXISTS price(id INTEGER  PRIMARY KEY AUTOINCREMENT NULL, tovar TEXT  NULL, unit TEXT  NULL, cena FLOAT  NULL);\r\nINSERT INTO price(tovar, unit, cena) VALUES('ситро','бут.',20);\r\nINSERT INTO price(tovar, unit, cena) VALUES('колбаса','кг.',2.25);\r\nINSERT INTO price(tovar, unit, cena) VALUES('огурец соленый','шт.',150);\r\nINSERT INTO price(tovar, unit, cena) VALUES('водка (неплохая)','бут.',100);\r\nINSERT INTO price(tovar, unit, cena) VALUES('водка (хорошая)','бут.',123);\r\nINSERT INTO price(tovar, unit, cena) VALUES('водка (очень хорошая)','бут.',150);\r\nINSERT INTO price(tovar, unit, cena) VALUES('хлеб','буханка',50);\r\nCOMMIT;"
 DSManager="baaaseee"
}
[/scroll]
карма: 1

1
Голосовали:Tad
Ответов: 16884
Рейтинг: 1239
#11: 2017-04-30 22:48:51 ЛС | профиль | цитата
sashaoli, обычно Ценник печатают из БД товара на складе.
Добавил Дату

Add(MainForm,6358390,126,140)
{
 Width=836
 Height=469
 link(onCreate,951801:doOpen,[])
}
Add(WebBrowser,3468261,245,196)
{
 Left=85
 Top=10
 Width=730
 Height=415
 Point(doFromText)
 Point(doPreview)
}
Add(Button,8840981,126,224)
{
 Left=15
 Top=10
 Caption="Отчет"
 link(onClick,5178164:doQuery,[])
}
Add(DS_SQLite,951801,182,154)
{
 Name="baaaseee"
 FileName=":memory:"
 link(onOpen,683309:doExec,[])
}
Add(DSC_Query,5178164,182,224)
{
 SQL="SELECT '<html><head><title>Отчет</title></head><body>\r\n<h3 align="center">Наличие товара на складе на '|| (date("now"))||'</h3>\r\n<table align="center" border="1" width=100%>\r\n<tr>\r\n<td align="center" style="color: Maroon"><b>Товар</b></td>\r\n<td align="center" style="color: Maroon"><b>Ед.изм</b></td>\r\n<td align="center" style="color: Maroon"><b>Кол-во</b></td>\r\n<td align="center" style="color: Maroon"><b>Цена</b></td>\r\n<td align="center" style="color: Maroon"><b>На сумму</b></td></tr>'||\r\ngroup_concat('\r\n<tr>\r\n <td>'||tovar||'</td>\r\n <td align="center">'||unit||'</td>\r\n <td align="right">'||kol||'</td>\r\n <td align="right">'||cena||'</td>\r\n <td align="right">'||(kol*cena)||'</td>\r\n</tr>',' ')||\r\n'<tr><td>&nbsp</td><td>&nbsp</td><td>&nbsp</td><td>&nbsp</td><td>&nbsp</td></tr>\r\n <tr>\r\n <td>Всего наименований</td>\r\n <td>&nbsp</td>\r\n <td align="right">'||Count(tovar)||'</td>\r\n <td>&nbsp</td>\r\n <td align="right">'||(sum(kol*cena))||'</td>\r\n</tr>\r\n</table>\r\n</body>\r\n</html>'\r\nFROM price;"
 DSManager="baaaseee"
 link(onQuery,3468261:doFromText,[])
}
Add(DSC_Exec,683309,245,154)
{
 SQL="BEGIN TRANSACTION;\r\nCREATE TABLE IF NOT EXISTS price(id INTEGER  PRIMARY KEY AUTOINCREMENT, tovar TEXT, unit TEXT,kol FLOAT, cena FLOAT);\r\nINSERT INTO price VALUES(NULL,'ситро','бут.',10,20);\r\nINSERT INTO price VALUES(NULL,'колбаса','кг.',15,2.25);\r\nINSERT INTO price VALUES(NULL,'огурец соленый','кГ.',5,150);\r\nINSERT INTO price VALUES(NULL,'водка (неплохая)','бут.',10,100);\r\nINSERT INTO price VALUES(NULL,'водка (хорошая)','бут.',10,123);\r\nINSERT INTO price VALUES(NULL,'водка (очень хорошая)','бут.',25,150);\r\nINSERT INTO price VALUES(NULL,'хлеб','буханка',30,50);\r\nCOMMIT;"
 DSManager="baaaseee"
}
Add(Button,14629197,126,259)
{
 Left=15
 Top=35
 link(onClick,3468261:doPreview,[(230,265)(230,237)])
}

и так вроде нагляднее

Редактировалось 2 раз(а), последний 2017-04-30 23:07:42
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
Голосовали:sashaoli
Ответов: 16884
Рейтинг: 1239
#12: 2017-05-01 15:47:49 ЛС | профиль | цитата
sashaoli
А почему для демонстрации ты применил список товаров забегаловки "Похмелкино" ?

Редактировалось 1 раз(а), последний 2017-05-01 15:51:37
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 824
Рейтинг: 138
#13: 2017-05-01 19:53:22 ЛС | профиль | цитата
А почему
Ну как-же - первомайские праздники...
карма: 1

1
Голосовали:Tad
Ответов: 16884
Рейтинг: 1239
#14: 2017-05-01 21:00:10 ЛС | профиль | цитата
А селёдку и сало забыл.

Редактировалось 1 раз(а), последний 2017-05-01 21:03:23
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 824
Рейтинг: 138
#15: 2017-05-01 22:02:13 ЛС | профиль | цитата
Tad писал(а):
А селёдку и сало забыл.

Это, сейчас, из разряда супер закусон.
Поди дороговато будет.
карма: 1

0
ФорумыСхемыПростой метод печати табличных данных. ← Ctrl12Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2024
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика