Вверх ↑
Этот топик читают: Гость
Ответов: 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
vip
#1.1контекстная реклама от партнеров
Ответов: 824
Рейтинг: 138
#2: 2017-04-27 11:23:15 ЛС | профиль | цитата
Ваш пример не корректен.

"‹" и "›"

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

0
Ответов: 188
Рейтинг: 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] [675]
Ответов: 188
Рейтинг: 2
#5: 2017-04-27 16:24:38 ЛС | профиль | цитата
И попутный вопрос, а как сделать так чтоб в конце распечатки считалась общая сумма отдельной строкой?
карма: 0

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#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
Ответов: 188
Рейтинг: 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
Сообщение
...
Прикрепленные файлы
(файлы не залиты)