HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуВывод на принтер созданного листа ← Ctrl1Ctrl →
Этот топик читают: Гость
Ответов: 323
Рейтинг: 8
#1: 2016-11-19 19:24:43 ЛС | профиль | цитата
Не могу понять как вывести на принтер акт входного контроля. Перебрал примеры от HiAsm, по ним не получается сделать вывод документа. Подскажите кто знает.
Заранее спасибо. 

Add(MainForm,2953706,56,35)
{
 Width=146
 Height=164
 link(onCreate,7967225:doWork1,[])
}
Add(ButtonRush,8042314,56,91)
{
 Left=10
 Top=10
 Width=110
 Caption="Входной контроль"
 Glyphs=[]
 RoundWidth=9
 RoundHeight=9
 link(onClick,7195136:doWork1,[])
}
Add(ChildForm,7195136,154,91)
{
}
BEGIN_SDK
  Add(EditMulti,16338709,14,14)
  {
   WorkCount=1
   Width=734
   Height=767
   link(doWork1,168940:doEvent1,[(31,20)(31,62)])
  }
  Add(MainForm,1296654,70,28)
  {
   Left=35
   Top=105
   Width=605
   Height=714
   Visible=1
   Point(doVisible)
  }
  Add(Label,145948,868,28)
  {
   Left=130
   Top=5
   Width=252
   Height=28
   Font=[Arial,16,0,0,204]
   Caption="Акт входного контроля №"
  }
  Add(Label,13987827,217,154)
  {
   @Hint=#22:Номер акта вх.контроля|
   Left=385
   Top=5
   Width=10
   Height=28
   Font=[Arial,16,0,0,204]
   Caption=" "
  }
  Add(Label,8150652,217,63)
  {
   @Hint=#4:Дата|
   Left=465
   Top=10
   Width=8
   Height=21
   Font=[Arial,11,0,0,204]
   Caption=" "
  }
  Add(Label,14783900,774,35)
  {
   @Hint=#4:Дата|
   Left=5
   Top=40
   Width=283
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Наименование дочерней организации:"
  }
  Add(ComboBox,11363950,273,35)
  {
   Left=295
   Top=40
   Width=285
   Height=21
   Strings=#19:ПАО "Оренбургнефть"|
   Text=""
   DataType=1
  }
  Add(Label,15727758,783,151)
  {
   @Hint=#4:Дата|
   Left=5
   Top=60
   Width=281
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Наименование МТР, тех.обозначение:"
  }
  Add(Label,13403458,784,185)
  {
   @Hint=#4:Дата|
   Left=5
   Top=80
   Width=267
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Номер партии или заводской номер:"
  }
  Add(Label,16483111,774,63)
  {
   @Hint=#4:Дата|
   Left=5
   Top=100
   Width=154
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Завод изготовитель:"
  }
  Add(Edit,14918806,322,77)
  {
   Left=295
   Top=60
   Width=285
   Text=""
  }
  Add(Edit,11007876,277,142)
  {
   Left=280
   Top=80
   Width=300
   Text=""
  }
  Add(Edit,5832959,320,140)
  {
   Left=185
   Top=100
   Width=395
   Text=""
  }
  Add(Label,13407879,778,88)
  {
   @Hint=#4:Дата|
   Left=5
   Top=140
   Width=87
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Поставщик:"
  }
  Add(Edit,13701347,370,105)
  {
   Left=95
   Top=145
   Width=330
   Text=""
  }
  Add(Label,15273524,780,116)
  {
   @Hint=#4:Дата|
   Left=5
   Top=165
   Width=154
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="№ и дата накладной:"
  }
  Add(Edit,11604062,427,73)
  {
   Left=155
   Top=165
   Width=80
   Text=""
  }
  Add(Label,1681953,788,214)
  {
   @Hint=#4:Дата|
   Left=330
   Top=165
   Width=92
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Количество:"
  }
  Add(DatePicker,11037338,231,217)
  {
   Left=235
   Top=165
   Width=90
   Height=21
   link(onChange,4182781:doValue,[])
  }
  Add(Edit,2389326,336,213)
  {
   Left=420
   Top=165
   Width=90
   Text=""
  }
  Add(ComboBox,16213106,238,274)
  {
   Left=515
   Top=165
   Width=65
   Height=21
   Strings=#3:шт.|3:кг.|2:т.|2:м.|0:|
   Text=""
  }
  Add(Label,15745116,791,232)
  {
   @Hint=#4:Дата|
   Left=5
   Top=185
   Width=107
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Дата прихода:"
  }
  Add(DatePicker,9063667,302,291)
  {
   Left=125
   Top=185
   Width=110
   Height=21
   link(onChange,11524898:doValue,[(342,297)(342,300)])
  }
  Add(Label,15163640,796,255)
  {
   @Hint=#4:Дата|
   Left=5
   Top=205
   Width=73
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Код КСМ:"
  }
  Add(Label,16596598,803,274)
  {
   @Hint=#4:Дата|
   Left=5
   Top=225
   Width=158
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="№ первичной заявки:"
  }
  Add(Edit,7897313,389,180)
  {
   Left=160
   Top=205
   Width=165
   Text=""
  }
  Add(Edit,16533434,398,264)
  {
   Left=160
   Top=225
   Width=165
   Text=""
  }
  Add(Label,8757194,809,301)
  {
   @Hint=#4:Дата|
   Left=5
   Top=255
   Width=159
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Объект капитального"
  }
  Add(Label,6681919,811,330)
  {
   @Hint=#4:Дата|
   Left=35
   Top=275
   Width=115
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="строительства:"
  }
  Add(Label,13589287,824,354)
  {
   @Hint=#4:Дата|
   Left=5
   Top=305
   Width=77
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Шифр РД:"
  }
  Add(Edit,10883126,447,153)
  {
   Left=90
   Top=305
   Width=490
   Text=""
  }
  Add(Label,9191739,833,385)
  {
   @Hint=#4:Дата|
   Left=5
   Top=530
   Width=484
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="В результате входного контроля комиссией установлено, что МТР"
  }
  Add(Label,11141154,843,404)
  {
   @Hint=#4:Дата|
   Left=5
   Top=385
   Width=472
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="В результате входного контроля комиссией найдены следующие"
  }
  Add(Label,11377417,852,447)
  {
   @Hint=#4:Дата|
   Left=165
   Top=245
   Width=376
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="   "Техническое перевооружение систем измерения"
  }
  Add(Label,12424063,848,430)
  {
   @Hint=#4:Дата|
   Left=165
   Top=265
   Width=323
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="     количества и параметров газа (СИКГ) на"
  }
  Add(Label,6616979,862,464)
  {
   @Hint=#4:Дата|
   Left=165
   Top=285
   Width=378
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="     месторождениях ЦППН-2 ПАО "Оренбургнефть""
  }
  Add(Memo,8957129,462,245)
  {
   Left=195
   Top=325
   Width=385
   Height=65
  }
  Add(Label,10636026,877,486)
  {
   @Hint=#4:Дата|
   Left=5
   Top=405
   Width=312
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="несоответствия по МТР НД или чертежам:"
  }
  Add(Label,11032230,886,504)
  {
   @Hint=#4:Дата|
   Left=5
   Top=550
   Width=484
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="соответствует технической документации заводов-изготовителей."
  }
  Add(Memo,3221637,511,246)
  {
   Left=5
   Top=425
   Width=575
   Height=105
   Font=[Arial,10,0,0,204]
   Strings=#2:1.|2:2.|2:3.|2:4.|2:5.|2:6.|
  }
  Add(ComboBox,14490142,394,336)
  {
   Left=5
   Top=575
   Width=475
   Height=21
   Strings=#75:Ведедущий инженер по надзору строительства ПАО "Оренбургнефть" Русаков Д.А.|51:Инженер ПТО "Инженерный Центр "Гамма" Ряшенцев Е.В.|0:|
   Text=""
  }
  Add(ComboBox,3202060,443,361)
  {
   Left=5
   Top=600
   Width=475
   Height=21
   Strings=#63:Вед.инженер по надзору строит. ПАО "Оренбургнефть" Русаков Д.А.|51:Инженер ПТО "Инженерный Центр "Гамма" Ряшенцев Е.В.|0:|
   Text=""
  }
  Add(ComboBox,13625332,499,363)
  {
   Left=5
   Top=625
   Width=475
   Height=21
   Strings=#63:Вед.инженер по надзору строит. ПАО "Оренбургнефть" Русаков Д.А.|51:Инженер ПТО "Инженерный Центр "Гамма" Ряшенцев Е.В.|0:|
   Text=""
  }
  Add(ButtonRush,2573760,49,679)
  {
   Left=5
   Top=650
   Width=80
   Height=20
   Caption="Сохранить"
   Glyphs=[]
   RoundWidth=9
   RoundHeight=9
   link(onClick,15620860:doEvent1,[])
  }
  Add(ButtonRush,7800800,546,35)
  {
   Left=90
   Top=650
   Width=90
   Height=20
   Caption="Печать акта"
   Glyphs=[]
   RoundWidth=9
   RoundHeight=9
   link(onClick,9383360:doPrint,[])
  }
  Add(ButtonRush,198514,56,357)
  {
   Left=185
   Top=650
   Width=90
   Height=20
   Caption="Новый акт"
   Glyphs=[]
   RoundWidth=9
   RoundHeight=9
  }
  Add(ButtonRush,10411536,49,175)
  {
   Left=280
   Top=650
   Width=90
   Height=20
   Caption="Отмена"
   Glyphs=[]
   RoundWidth=9
   RoundHeight=9
   link(onClick,9082554:doEvent1,[(93,181)(93,157)(51,157)(51,132)])
  }
  Add(Hub,15620860,112,679)
  {
   OutCount=3
   link(onEvent1,12601638:doString,[])
   link(onEvent3,9082554:doEvent2,[(138,699)(138,414)(41,414)(41,139)])
  }
  Add(Hub,9082554,63,126)
  {
   InCount=2
   OutCount=1
   link(onEvent1,1296654:doClose,[(89,132)(89,100)(61,100)(61,55)])
  }
  Add(FormatStr,12601638,217,679)
  {
   DataCount=22
   Mask="INSERT INTO note (id, jk1, jk2, jk3, jk4, jk5, jk6, jk7, gf1, gf2, gf3, gf4, gf5, gf6, gf7, gf8, gf9, gf10, gf11, gf12, gf13, gf14) \r\nvalues('%1', '%2', '%3', '%4', '%5', '%6', '%7','%8', '%9', '%10', '%11', '%12', '%13', '%14', '%15', '%16', '%17', '%18', '%19', '%20', '%21', '%22')"
   link(onFString,9263467:doExec,[])
   link(Str1,4264071:Var,[])
   link(Str2,13566843:Var,[])
   link(Str3,869563:Var,[])
   link(Str4,1810414:Var,[])
   link(Str5,7374709:Var,[])
   link(Str6,8055288:Var,[])
   link(Str7,13536687:Var,[])
   link(Str8,12442124:Var,[])
   link(Str9,89577:Var,[])
   link(Str10,7240649:Var,[])
   link(Str11,4668845:Var,[])
   link(Str12,5134758:Var,[])
   link(Str13,13707229:Var,[])
   link(Str14,3434509:Var,[])
   link(Str15,13533104:Var,[])
   link(Str16,10242388:Var,[])
   link(Str17,1361805:Var,[])
   link(Str18,3384513:Var,[])
   link(Str19,143628:Var,[])
   link(Str20,13044511:Var,[])
   link(Str21,7380508:Var,[])
   link(Str22,420986:Var,[])
  }
  Add(SQLite_Exec,9263467,455,679)
  {
   link(dbHandle,5872760:Var,[])
  }
  Add(MultiElement,1984441,168,154)
  {
   link(onEvent1,13987827:doText,[])
  }
  BEGIN_SDK
    Add(EditMulti,7877627,21,21)
    {
     EventCount=1
     WorkCount=1
     VarCount=1
     link(doWork1,8442209:doQuery,[(67,27)(67,90)])
     link(Var1,9043543:Value,[(27,175)(230,175)])
    }
    Add(SQLite_Query,8442209,98,84)
    {
     SQL="SELECT id FROM note"
     link(onQuery,9864389:doCalc,[])
     link(dbHandle,70194:Var,[])
    }
    Add(MathParse,9864389,168,84)
    {
     DataCount=1
     MathStr="%1 + 1"
     ResultType=0
     Default=1
     link(onResult,9043543:doValue,[])
    }
    Add(GlobalVar,70194,98,49)
    {
     Name="dbHandle"
    }
    Add(Memory,9043543,224,84)
    {
     link(onData,7877627:onEvent1,[(299,90)(299,27)])
    }
  END_SDK
  Add(Hub,4595043,126,63)
  {
   link(onEvent1,14852185:doWork1,[])
   link(onEvent2,1984441:doWork1,[(154,76)(154,160)])
  }
  Add(Label,3676030,839,270)
  {
   @Hint=#4:Дата|
   Left=5
   Top=325
   Width=190
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Номера НД, чертежей, по"
  }
  Add(Label,2643130,840,307)
  {
   @Hint=#4:Дата|
   Left=5
   Top=345
   Width=182
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="которым производилась"
  }
  Add(Label,5119078,858,343)
  {
   @Hint=#4:Дата|
   Left=5
   Top=365
   Width=180
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="проверка качества МТР"
  }
  Add(Label,11183124,812,0)
  {
   Left=540
   Top=10
   Width=13
   Height=21
   Font=[Arial,11,0,0,204]
   Caption="г."
  }
  Add(MultiElement,14852185,168,63)
  {
   link(onEvent1,8150652:doText,[])
  }
  BEGIN_SDK
    Add(EditMulti,436577,21,21)
    {
     EventCount=1
     WorkCount=1
     VarCount=2
     link(doWork1,1987330:doData,[(56,27)(56,97)])
     link(Var1,978500:Value,[(27,172)(139,172)])
     link(Var2,13209970:DateTime,[(34,147)(104,147)])
    }
    Add(Time,13209970,91,42)
    {
     Time_Date=1
     Format="D:M:Y"
     Point(DateTime)
    }
    Add(Memory,978500,133,91)
    {
     link(onData,436577:onEvent1,[(243,97)(243,27)])
    }
    Add(DoData,1987330,91,91)
    {
     link(onEventData,978500:doValue,[])
     link(Data,13209970:FormatTime,[])
    }
  END_SDK
  Add(LineBreak,10569130,168,203)
  {
   Type=1
   link(Data,1984441:Var1,[])
   Primary=[4264071,49,224]
  }
  Add(LineBreak,16337759,168,126)
  {
   Type=1
   link(Data,14852185:Var1,[])
   Primary=[13566843,56,322]
  }
  Add(LineBreak,12020895,175,105)
  {
   Type=1
   link(Data,14852185:Var2,[])
   Primary=[869563,56,364]
  }
  Add(LineBreak,10025570,266,105)
  {
   Type=1
   link(Data,11363950:String,[(272,93)(286,93)])
   Primary=[89577,7,490]
  }
  Add(LineBreak,5723332,322,119)
  {
   Type=1
   link(Data,14918806:Text,[])
   Primary=[7240649,-42,497]
  }
  Add(LineBreak,8410257,266,189)
  {
   Type=1
   link(Data,11007876:Text,[(272,181)(283,181)])
   Primary=[5134758,28,469]
  }
  Add(LineBreak,8720135,308,189)
  {
   Type=1
   link(Data,5832959:Text,[(314,181)(326,181)])
   Primary=[4668845,-21,448]
  }
  Add(Label,8429136,809,137)
  {
   @Hint=#4:Дата|
   Left=5
   Top=120
   Width=182
   Height=22
   Font=[Arial,12,0,0,204]
   Caption="Дата изготовления МТР:"
  }
  Add(DatePicker,6679091,347,29)
  {
   Left=205
   Top=120
   Width=130
   Height=21
   link(onChange,1984676:doValue,[(385,35)(385,34)])
  }
  Add(Memory,1984676,406,28)
  {
  }
  Add(LineBreak,16460954,385,77)
  {
   Type=1
   link(Data,1984676:Value,[(391,69)(412,69)])
   Primary=[1810414,-147,413]
  }
  Add(LineBreak,13184717,385,154)
  {
   Type=1
   link(Data,13701347:Text,[(391,146)(376,146)])
   Primary=[13707229,-84,315]
  }
  Add(LineBreak,13611375,420,119)
  {
   Type=1
   link(Data,11604062:Text,[(426,112)(433,112)])
   Primary=[7374709,-175,392]
  }
  Add(Memory,4182781,280,217)
  {
  }
  Add(LineBreak,12788941,280,266)
  {
   Type=1
   link(Data,4182781:Value,[])
   Primary=[8055288,-28,266]
  }
  Add(LineBreak,16102565,336,259)
  {
   Type=1
   link(Data,2389326:Text,[])
   Primary=[13536687,-77,294]
  }
  Add(LineBreak,466673,245,336)
  {
   Type=1
   link(Data,16213106:String,[])
   Primary=[3434509,63,154]
  }
  Add(Memory,11524898,350,294)
  {
  }
  Add(LineBreak,5999061,329,343)
  {
   Type=1
   link(Data,11524898:Value,[(335,335)(356,335)])
   Primary=[12442124,-63,231]
  }
  Add(LineBreak,2352443,392,238)
  {
   Type=1
   link(Data,7897313:Text,[(398,221)(395,221)])
   Primary=[13533104,-77,273]
  }
  Add(LineBreak,15128317,406,315)
  {
   Type=1
   link(Data,16533434:Text,[(412,305)(404,305)])
   Primary=[10242388,-84,217]
  }
  Add(LineBreak,1600413,441,203)
  {
   Type=1
   link(Data,10883126:Text,[(447,194)(453,194)])
   Primary=[1361805,-112,350]
  }
  Add(LineBreak,16248287,455,308)
  {
   Type=1
   link(Data,8957129:Text,[(461,299)(468,299)])
   Primary=[3384513,-119,266]
  }
  Add(LineBreak,16388319,504,308)
  {
   Type=1
   link(Data,3221637:Text,[(510,300)(517,300)])
   Primary=[143628,-161,287]
  }
  Add(LineBreak,1345120,399,399)
  {
   Type=1
   link(Data,14490142:String,[(405,390)(407,390)])
   Primary=[13044511,-49,217]
  }
  Add(LineBreak,6537852,448,420)
  {
   Type=1
   link(Data,3202060:String,[(454,413)(456,413)])
   Primary=[7380508,-91,217]
  }
  Add(LineBreak,9630186,504,427)
  {
   Type=1
   link(Data,13625332:String,[(510,417)(512,417)])
   Primary=[420986,-140,231]
  }
  Add(GlobalVar,5872760,455,630)
  {
   Name="dbHandle"
  }
  Add(Hub,168940,42,56)
  {
   link(onEvent1,1296654:doVisible,[])
   link(onEvent2,4595043:doEvent1,[])
  }
  Add(Printer,9383360,595,35)
  {
   link(onPrint,7384925:doDraw,[])
  }
  Add(PaintBox,12622633,693,35)
  {
   Left=545
   Top=140
  }
  Add(Img_Bmp,7384925,644,35)
  {
   X=1
   Y=1
   DrawSource=2
   link(Bitmap,9383360:Context,[(650,23)(635,23)(635,78)(601,78)])
  }
END_SDK
Add(MultiElement,7967225,154,49)
{
}
BEGIN_SDK
  Add(EditMulti,10643069,21,21)
  {
   WorkCount=1
   Width=405
   Height=284
   link(doWork1,1471030:doOpen,[(49,27)(49,174)])
  }
  Add(GlobalVar,9712457,140,147)
  {
   Name="dbHandle"
   link(onValue,3791326:doExec,[(218,153)(218,174)])
  }
  Add(GlobalVar,786474,231,140)
  {
   Name="dbHandle"
  }
  Add(SQLite_Exec,3791326,231,168)
  {
   SQL="CREATE TABLE IF NOT EXISTS note \r\n(id int, jk1 int, jk2 int, jk3 int, jk4 int, jk5 int, jk6 int, jk7 int, jk8 int, jk9 int, jk10 int,\r\njk11 int, jk12 int, jk13 int, jk14 int, jk15 int, jk16 int, jk17 int, jk18 int, jk19 int, jk20 int,\r\ngf1 char, gf2 char, gf3 char, gf4 char, gf5 char, gf6 char, gf7 char, gf8 char, gf9 char, gf10 char,\r\ngf11 char, gf12 char, gf13 char, gf14 char, gf15 char, gf16 char, gf17 char, gf18 char, gf19 char, gf20 char)"
   link(onError,15847508:doWork1,[(319,174)])
   link(dbHandle,786474:Var,[])
  }
  Add(SQLite_DB,1471030,77,168)
  {
   FileName="notebook.db"
   link(onOpen,9712457:doValue,[(125,174)(125,153)])
   link(onError,15847508:doWork2,[])
  }
  Add(Message,11171736,371,175)
  {
   Caption="Ошибка база"
  }
  Add(HubEx,15847508,315,175)
  {
   link(onEvent,11171736:doMessage,[])
  }
END_SDK
Add(ButtonRush,7605850,56,133)
{
 Left=10
 Top=40
 Width=110
 Caption="Список Актов"
 Glyphs=[]
 RoundWidth=9
 RoundHeight=9
 link(onClick,12864582:doWork1,[])
}
Add(ChildForm,12864582,154,133)
{
}
BEGIN_SDK
  Add(EditMulti,15526647,21,21)
  {
   WorkCount=1
   Width=524
   link(doWork1,11124328:doEvent1,[(39,27)(39,62)])
  }
  Add(MainForm,5416702,98,28)
  {
   Left=35
   Top=105
   Width=391
   Height=507
   Visible=1
   Point(doVisible)
  }
  Add(SQLite_Query,14414945,252,105)
  {
   SQL="SELECT \r\nid AS "№ Акта",\r\njk1 AS "Дата Акта",\r\ngf2 AS "Наименование МТР"\r\nFROM note"
   link(onQuery,7513537:doStr,[])
   link(onColumns,6720827:doEnum,[(303,118)(303,160)])
   link(dbHandle,16631684:Var,[])
  }
  Add(StringTableMT,6283539,399,70)
  {
   Left=5
   Top=70
   Width=365
   Height=395
   Font=[Arial Narrow,10,1,0,204]
   StrDelimiter="\9"
   ColumnWidth=120
   ClearAll=0
   TabGrid=0
   TabGridFrame=0
   Grid=0
   TextAlign=2
   IconsCheck=[]
   MiscIcons=[]
   Icons=[]
   Point(doAddColumn)
  }
  Add(MT_String,7513537,322,105)
  {
   Delimeter="\9"
   link(onResult,6283539:doAdd,[(376,111)(376,76)])
  }
  Add(Hub,14957776,105,77)
  {
   link(onEvent1,6283539:doClear,[])
   link(onEvent2,14414945:doQuery,[(185,90)(185,111)])
  }
  Add(Hub,11124328,49,56)
  {
   link(onEvent1,5416702:doVisible,[])
   link(onEvent2,14957776:doEvent1,[(84,69)(84,83)])
  }
  Add(GlobalVar,16631684,252,35)
  {
   Name="dbHandle"
  }
  Add(MT_Enum,6720827,322,154)
  {
   link(onItem,6283539:doAddColumn,[(381,160)(381,116)])
  }
END_SDK
карма: 0

0
Ответов: 8930
Рейтинг: 823
#2: 2016-11-19 19:47:29 ЛС | профиль | цитата
Dad2016, ну а здесь: http://forum.hiasm.com/topic/66198
карма: 19

0
Ответов: 184
Рейтинг: 0
#3: 2016-11-20 19:32:09 ЛС | профиль | цитата
Dad2016, можно так
[spoiler=Схема]

Add(MainForm,1386041,308,224)
{
 Width=900
 Height=602
 link(onCreate,2037553:doWork1,[(368,244)])
}
Add(DocumentTemplate,3905573,406,280)
{
 Name="бланк"
 link(onDraw,5594051:doRefresh,[(452,286)(452,264)(394,264)(394,188)])
 link(Bitmap,12280551:Var2,[])
}
BEGIN_SDK
  Add(Print_Shape,11673604,14,14)
  {
   X=17
   Y=17
   Width=491
   Height=473
   FrameSize=10
   FrameColor=65280
  }
  Add(Print_Text,15463037,49,84)
  {
   Name="текст1"
   X=52
   Y=87
   Width=197
   Font=[MS Sans Serif,12,0,0,1]
  }
  Add(Print_Text,13519700,49,161)
  {
   Name="текст2"
   X=52
   Y=164
   Width=197
   Font=[MS Sans Serif,12,0,0,1]
  }
  Add(Print_Text,11087249,105,42)
  {
   X=108
   Y=45
   Width=239
   Text="Разовый пропуск"
   Font=[MS Sans Serif,12,1,0,1]
  }
  Add(Print_Shape,3632392,49,105)
  {
   X=52
   Y=108
   Width=197
   Height=11
   Type=4
  }
  Add(Print_Text,16361376,105,112)
  {
   X=108
   Y=115
   Height=25
   Text="(Фамилия)"
  }
  Add(Print_Shape,6475500,49,168)
  {
   X=52
   Y=171
   Width=197
   Type=4
  }
  Add(Print_Text,5893899,91,189)
  {
   X=94
   Y=192
   Text="(Имя)"
  }
  Add(Print_Image,10464731,84,364)
  {
   Name="Картинка1"
   X=87
   Y=367
   Width=134
   Height=102
  }
END_SDK
Add(PaintBox,5594051,406,182)
{
 Left=305
 Top=15
 Width=565
 Height=535
 Color=16777215
}
Add(PC_Text,14606510,308,280)
{
 ItemName="текст1"
 Document="бланк"
 link(onText,2037553:doWork2,[])
}
Add(PC_Text,14700230,308,329)
{
 ItemName="текст2"
 Document="бланк"
 link(onText,2037553:doWork3,[(368,335)])
}
Add(Edit,5417778,245,280)
{
 Left=15
 Top=15
 Width=270
 link(onChange,14606510:doText,[])
}
Add(Edit,1595150,245,329)
{
 Left=15
 Top=45
 Width=270
 link(onChange,14700230:doText,[])
}
Add(HubEx,2037553,364,280)
{
 link(onEvent,3905573:doDraw,[])
}
Add(Button,5229203,259,483)
{
 Left=55
 Top=131
 Width=162
 Height=30
 Font=[MS Sans Serif,8,1,0,1]
 Caption="Printer setting"
 link(onClick,14309344:doSettings,[(307,489)(307,454)])
}
Add(Button,15415409,259,441)
{
 Left=55
 Top=161
 Width=162
 Height=30
 Font=[MS Sans Serif,10,1,0,1]
 Caption="Print"
 link(onClick,14309344:doPrint,[])
}
Add(Printer,14309344,322,441)
{
 Point(doSettings)
 Point(CurDPIY)
 link(onPrint,4383238:doDraw,[])
}
Add(Img_Bmp,4383238,385,441)
{
 X=172
 Y=10
 DrawSource=2
 Point(doDrawSource)
 link(Bitmap,14309344:Context,[(391,429)(364,429)(364,484)(328,484)])
 link(SourceBitmap,12280551:Var1,[(398,271)])
}
Add(GetDataEx,12280551,406,266)
{
 link(Data,5594051:Bitmap,[])
}

[/spoiler]
карма: 0

0
Ответов: 323
Рейтинг: 8
#4: 2016-11-21 19:00:58 ЛС | профиль | цитата
Спасибо.
карма: 0

0
Ответов: 323
Рейтинг: 8
#5: 2016-11-24 13:26:00 ЛС | профиль | цитата
Выбрал вариант вывода на печать, но не могу добавить пробелы, и ещё сделать надпись с правой стороны листа. Не могу найти подходящие функции к этому варианту. 

Add(Button,5902944,406,413)
{
 Left=20
 Top=305
 Caption="Печать"
 link(onClick,11234646:doPreview,[])
}
Add(Button,6853432,189,399)
{
 Left=10
 Top=335
 Width=70
 Caption="Просмотр"
 Data=String(куда          там)
 link(onClick,8924692:doString,[])
}
Add(WebBrowser,11234646,490,371)
{
 Left=100
 Width=500
 Height=360
 Font=[Times New Roman,14,0,0,204]
 Point(doFromText)
 Point(doPrint)
 Point(doPreview)
}
Add(FormatStr,8924692,294,399)
{
 DataCount=10
 Mask="<CENTER> <b> Акт входного контроля № %2 </b> </CENTER>\r\n<center> %5 г. </center>\r\n%6 \r\n<CENTER> %1 </CENTER>\r\nДата: %3                          Количество: %4\r\n<CENTER> %1 </CENTER>\r\nДа уж %7"
 link(onFString,11234646:doFromText,[])
 link(Str1,11070125:Value,[])
 link(Str2,1741553:Text,[])
 link(Str3,5054133:Text,[])
 link(Str4,6518288:Text,[])
 link(Str5,3537156:Text,[])
 link(Str6,15823142:Value,[])
}
Add(Edit,1741553,301,133)
{
 Left=5
 Top=40
 Width=90
 Text=""
}
Add(Edit,5054133,308,168)
{
 Left=5
 Top=65
 Width=90
 Text=""
}
Add(Edit,6518288,315,203)
{
 Left=5
 Top=90
 Width=90
 Text=""
}
Add(Edit,3537156,322,245)
{
 Left=5
 Top=15
 Width=90
 Font=[Arial,12,0,0,204]
 Text=""
}
Add(Memory,15823142,329,287)
{
 Default=String(.)
}
Add(Memory,11070125,294,98)
{
 Default=String(.)
}
Заранее все спасибо.
карма: 0

0
Ответов: 824
Рейтинг: 138
#6: 2016-11-24 16:02:41 ЛС | профиль | цитата
Dad2016, Дророгой друг, будь так добр, прочитай вот эту ветку форума и опробуй предложенные там варианты...
карма: 1

0
Ответов: 323
Рейтинг: 8
#7: 2016-11-24 16:16:19 ЛС | профиль | цитата
сразу оговорюсь, пишу программы в свободное время и не каждый день. Основное время занимает работа. Поэтому если не успеваю что то найти, пишу на форуме.
Прошу прощения за возможно нелепые вопросы.
Огромное спасибо за подсказки.
карма: 0

0
Ответов: 824
Рейтинг: 138
#8: 2016-11-24 16:19:02 ЛС | профиль | цитата
Dad2016 писал(а):
пишу программы в свободное время и не каждый день.

А мы, так и рисуем программы, в свободное от работы времмя...
карма: 1

0
Ответов: 323
Рейтинг: 8
#9: 2016-11-24 16:54:06 ЛС | профиль | цитата
На сколько я понял это одна строка где %1 это вводимые данные.

<p class=MsoNormal style='margin-bottom:0cm;margin-bottom:.0001pt;line-height:
normal'><span lang=RU style='mso-ansi-language:RU'>Дата: </span><u><span
lang=EN-US style='mso-ansi-language:EN-US'>%1</span></u><u><span lang=RU
style='mso-ansi-language:RU'> г.</span></u><span lang=RU style='mso-ansi-language:
RU'><o:p></o:p></span></p>

--- Добавлено в 2016-11-24 16:54:52

Буду пробовать разбираться.

Редактировалось 1 раз(а), последний 2016-11-24 16:54:52
карма: 0

0
Ответов: 824
Рейтинг: 138
#10: 2016-11-24 18:27:27 ЛС | профиль | цитата
В прищепке - пример
карма: 1

1
файлы: 1Propusk.zip [98.8KB] [389]
Голосовали:Dad2016
Ответов: 323
Рейтинг: 8
#11: 2016-11-25 15:24:49 ЛС | профиль | цитата
мне объяснили как через word сделать то-же самое, спасибо за подсказку.
карма: 0

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