Вверх ↑
Этот топик читают: Гость
Ответов: 839
Рейтинг: 17
#1: 2019-06-30 08:06:24 ЛС | профиль | цитата
Добрый день ,возник вопрос как вывести текст по верх предложения или на нём. Так скажем по верх него.
карма: 0

0
vip
#1.1контекстная реклама от партнеров
Ответов: 5227
Рейтинг: 586
#2: 2019-06-30 09:20:36 ЛС | профиль | цитата
Добрый день, а схема попыток где
GAv, Не в обиду скажу, про рыбалку есть другие форумы.
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 8887
Рейтинг: 823
#3: 2019-06-30 13:02:25 ЛС | профиль | цитата
GAv писал(а):
Так скажем по верх него
Картинку с прозрачностью наложить и на ней рисовать текст.
У нашей камеры нет выхода синхронизации, при перерисовке дрыгается. Стационарный текст нормально отображается.


Add(MainForm,2953706,266,140)
{
Name="MyForm"
Caption="ukForm"
Point(onClose)
Point(Handle)
Point(onKeyDown)
link(onCreate,2994941:doConnect,[])
link(onClose,2994941:doDisConnect,[])
link(onKeyDown,7279582:doWork1,[(305,174)(305,216)])
}
Add(WebCam,2994941,329,154)
{
RefreshRate=16
link(WinHandle,2953706:Handle,[(349,145)(321,145)(321,187)(272,187)])
}
Add(ChildForm,12275472,385,154)
{
}
BEGIN_SDK
Add(EditMulti,7142546,21,21)
{
WorkCount=1
VarCount=1
link(Var1,9819909:Var1,[(27,96)])
link(doWork1,2285761:doRedraw,[(32,27)(32,160)])
}
Add(MainForm,4614985,91,56)
{
Top=35
Width=380
Height=30
Color=0
WinStyle=1
Caption=""
BorderStyle=0
TransparentColor=0
ShiftLeft=10
ShiftTop=40
TransparentManager="MyMtn"
FormFastening="parent.MyForm"
Point(Handle)
}
Add(TransparentManager,11744501,140,56)
{
Name="MyMtn"
FormTranspColor=0
}
Add(WinTools,2285761,91,126)
{
Point(doRedraw)
link(Handle,9819909:Var2,[])
}
Add(GetDataEx,9819909,91,91)
{
link(Data,4614985:Handle,[])
}
END_SDK
Add(Img_Text,6685059,385,217)
{
X=10
Y=5
DrawSource=1
Font=[MS Sans Serif,14,1,255,1]
link(Bitmap,12275472:Var1,[])
}
Add(MultiElement,7279582,329,210)
{
link(onEvent1,12275472:doWork1,[(376,216)(376,160)])
link(onEvent2,6685059:doDraw,[])
}
BEGIN_SDK
Add(EditMulti,16547101,21,21)
{
EventCount=3
WorkCount=1
Width=629
Height=137
link(doWork1,12076380:doNext,[(32,27)(32,97)])
}
Add(Timer,14014294,161,91)
{
Interval=500
link(onTimer,13357400:doEvent1,[])
}
Add(Random,6918450,287,98)
{
Min=226
Max=255
link(onRandom,2739474:doConvert,[])
}
Add(Convertor,2739474,336,98)
{
Mode=4
link(onResult,9653590:doString,[])
}
Add(FormatStr,9653590,392,98)
{
Mask="%1%2"
Point(FString)
link(onFString,11768409:doEvent1,[])
link(Str1,5107142:Value,[])
}
Add(Length,13764385,483,49)
{
}
Add(Hub,11768409,441,98)
{
OutCount=3
link(onEvent1,13898201:doWork3,[(466,104)(466,90)(382,90)])
link(onEvent2,13764385:doLength,[(473,111)(473,55)])
link(onEvent3,2504587:doCompare,[])
}
Add(Memory,5107142,392,49)
{
}
Add(If_else,2504587,483,112)
{
Type=3
Op2=Integer(20)
link(onTrue,14701925:doWork2,[])
link(onFalse,16432025:doDelete,[])
link(Op1,13764385:Result,[])
}
Add(Delete,16432025,532,119)
{
Count=1
link(onDelete,11501538:doEvent1,[])
}
Add(Hub,11501538,574,119)
{
link(onEvent1,13898201:doWork1,[(599,125)(599,34)(382,34)])
link(onEvent2,14701925:doWork3,[(613,132)])
}
Add(HubEx,14701925,609,112)
{
link(onEvent,16547101:onEvent2,[(620,118)(620,34)])
}
Add(Hub,13357400,203,91)
{
link(onEvent1,16547101:onEvent1,[(228,97)(228,27)])
link(onEvent2,13459210:doTimer,[])
}
Add(Timer,13459210,238,98)
{
Interval=10
Enable=1
AutoStop=1
link(onTimer,6918450:doRandom,[])
}
Add(IndexToChanel,16751946,119,91)
{
link(onEvent1,14014294:doTimer,[])
link(onEvent2,14014294:doStop,[])
}
Add(Counter,12076380,42,91)
{
Max=1
link(onNext,2372865:doEvent1,[])
}
Add(HubEx,13898201,378,49)
{
link(onEvent,5107142:doValue,[])
}
Add(Hub,2372865,84,91)
{
link(onEvent1,16751946:doEvent,[])
link(onEvent2,16547101:onEvent3,[(109,104)(109,41)])
}
END_SDK

карма: 19

0
Ответов: 839
Рейтинг: 17
#4: 2019-06-30 13:25:48 ЛС | профиль | цитата
Нашол в примерах но у меня почему то вообще не чего не происходит. Виндовс 10

Add(MainForm,2953706,777,721)
{
TaskBar=1
Point(onClose)
Point(Close)
}
Add(WinEnum,16070666,539,588)
{
link(onFindWindow,5366351:doWinInfo,[])
}
Add(WinInfo,5366351,595,588)
{
Point(ProcessID)
Point(Context)
Point(Width)
link(onWinInfo,7453905:doCompare,[])
link(Handle,4811835:Var3,[(601,576)(576,576)(576,632)])
}
Add(EnumProcess,12326089,483,581)
{
Name="notepad.exe"
Point(doFindName)
Point(onFind)
link(onFind,16070666:doEnum,[])
}
Add(If_else,7453905,679,588)
{
link(onTrue,14266306:doSplit,[])
link(Op1,5366351:ProcessID,[(685,576)(667,576)(667,632)(615,632)])
link(Op2,12326089:CurrentID,[(692,571)(583,571)(583,638)(489,638)])
}
Add(MultiStrData,14266306,728,588)
{
Char=" "
link(Str,5366351:Caption,[(734,576)(717,576)(717,638)(608,638)])
link(onPart1,5033018:doCompare,[])
}
Add(If_else,5033018,777,588)
{
Op2=String(Конструктор)
link(onTrue,9566465:doCalc,[])
}
Add(DocumentTemplate,3227997,938,588)
{
DrawSource=2
Name="dtmp"
link(onDraw,206563:doRedraw,[])
link(Bitmap,5366351:Context,[(944,571)(766,571)(766,644)(622,644)])
}
BEGIN_SDK
Add(Print_Text,11987365,-3,-3)
{
Name="txt"
Width=246
Height=24
Text="Отрисовка на чужом контексте"
Font=[MS Sans Serif,10,1,65535,1]
Vertical=1
Top=0
}
END_SDK
Add(WinTools,206563,987,560)
{
Point(doRedraw)
link(Handle,4811835:Var1,[(993,519)(528,519)(528,632)])
}
Add(GetDataEx,4811835,539,627)
{
link(Data,16070666:Handle,[])
}
Add(Timer,15003433,427,602)
{
Interval=50
link(onTimer,12326089:doFindName,[])
}
Add(Timer,1285238,434,658)
{
link(onTimer,5331966:doNext,[])
}
Add(PC_Text,13187686,777,665)
{
ItemName="txt"
Document="dtmp"
link(onText,2530833:doWork3,[(921,671)])
}
Add(HubEx,2530833,917,588)
{
link(onEvent,3227997:doDraw,[])
}
Add(Counter,5331966,539,658)
{
link(onNext,1942604:doCase,[])
}
Add(Case,1942604,679,658)
{
Value=Integer(2)
DataOnTrue=String(HiAsm рулит!)
link(onNextCase,7985061:doCase,[(723,664)(723,682)(667,682)(667,699)])
link(onTrue,1500043:doWork2,[])
}
Add(Case,7985061,679,693)
{
Value=Integer(4)
DataOnTrue=String(Good Bye!)
link(onNextCase,13769095:doCase,[(723,699)(723,717)(667,717)(667,734)])
link(onTrue,8481579:doWork2,[])
}
Add(Case,13769095,679,728)
{
Value=Integer(5)
DataOnTrue=String()
link(onTrue,13289398:doEvent1,[])
}
Add(Hub,13289398,728,735)
{
link(onEvent1,8481579:doWork3,[(760,741)])
link(onEvent2,2953706:doClose,[])
}
Add(HubEx,1500043,756,665)
{
link(onEvent,13187686:doText,[])
}
Add(HubEx,8481579,756,700)
{
Angle=3
link(onEvent,1500043:doWork3,[])
}
Add(PC_Position,12963329,875,588)
{
ItemName="txt"
Document="dtmp"
link(onPosition,2530833:doWork2,[])
link(Y,9239445:Value,[])
}
Add(MathParse,9566465,826,588)
{
MathStr="(%2 - %1) - 100"
link(onResult,12963329:doPosition,[])
link(X1,6030157:CurrentWidth,[])
link(X2,5366351:Width,[(839,577)(816,577)(816,650)(629,650)])
}
Add(PC_Size,6030157,826,525)
{
ItemName="txt"
Document="dtmp"
}
Add(Memory,9239445,882,525)
{
Default=Integer(6)
}


--- Добавлено в 2019-06-30 13:29:56

Я так понимаю что в теории должен появиться текст счёта. в текстовом документе

--- Добавлено в 2019-06-30 13:42:39

У меня не отрисовывает на блокноте не чего. может что то не так сделал

Add(MainForm,15801081,504,259)
{
Name="MyForm"
Caption="ukForm"
Point(onClose)
Point(Handle)
Point(onKeyDown)
}
Add(ChildForm,12275472,749,252)
{
link(Data1,12326089:CurrentID,[])
}
BEGIN_SDK
Add(EditMulti,7142546,21,21)
{
WorkCount=1
DataCount=1
VarCount=1
link(doWork1,2285761:doRedraw,[(32,27)(32,160)])
link(Var1,9819909:Var1,[(27,96)])
}
Add(MainForm,4614985,231,35)
{
Top=35
Width=380
Height=30
Color=0
WinStyle=1
Caption=""
BorderStyle=0
TransparentColor=0
ShiftLeft=10
ShiftTop=40
TransparentManager="MyMtn"
FormFastening="parent.MyForm"
Point(Handle)
}
Add(TransparentManager,11744501,140,56)
{
Name="MyMtn"
FormTranspColor=0
}
Add(WinTools,2285761,91,126)
{
Point(doRedraw)
link(Handle,9819909:Var2,[])
}
Add(GetDataEx,9819909,91,91)
{
link(Data,7142546ata1,[(97,56)(27,56)])
}
END_SDK
Add(Img_Text,6685059,749,315)
{
X=10
Y=5
DrawSource=1
Font=[MS Sans Serif,14,1,255,1]
link(Bitmap,12275472:Var1,[])
}
Add(EnumProcess,12326089,749,175)
{
Name="notepad.exe"
Point(doFindName)
Point(onFind)
link(onFind,12275472:doWork1,[(793,188)(793,223)(737,223)(737,258)])
}
Add(Button,7998640,504,196)
{
Left=20
Top=30
link(onClick,11542154:doEvent1,[])
}
Add(Hub,11542154,560,196)
{
OutCount=3
link(onEvent1,12326089:doFindName,[])
link(onEvent3,16002990:doData,[(602,216)(602,321)])
}
Add(DoData,16002990,609,315)
{
Data=String(тест)
link(onEventData,6685059:doDraw,[])
}

Редактировалось 2 раз(а), последний 2019-06-30 13:42:39
карма: 0

0
Ответов: 5227
Рейтинг: 586
#5: 2019-06-30 15:18:02 ЛС | профиль | цитата
Дядя Лёня всегда придёт на помощь
Леонид, ты чувак, и ЧЕЛОВЕК с БОЛЬШОЙ БУКВЫ.
Всех благ тебе, здоровья и счастья
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 8887
Рейтинг: 823
#6: 2019-06-30 18:30:14 ЛС | профиль | цитата
GAv, так текст поверх текста что-ли? Тоже можно на картинке, сначала один, потом другой разными цветами.
Два текста


Add(MainForm,2953706,238,182)
{
Width=407
Caption="Оверлей"
link(onCreate,3345020:doCreate,[])
}
Add(ChildPanel,533421,238,133)
{
link(onEvent1,7819677:doAdd,[(277,139)(277,118)])
link(onEvent2,7819677:doClear,[(284,146)(284,125)])
link(onEvent3,7819677:doLoad,[(291,153)(291,146)])
link(onEvent4,3345020:doDraw,[(291,160)(291,209)])
link(onEvent5,6708372:doWork2,[(354,167)(354,209)])
}
BEGIN_SDK
Add(EditMulti,9383237,21,21)
{
EventCount=5
VarCount=1
Height=270
link(Var1,11039057:Value,[(27,173)(223,173)])
}
Add(Panel,11244107,126,35)
{
Width=391
Align=2
}
Add(Hub,8586217,175,91)
{
OutCount=3
link(onEvent1,9383237:onEvent2,[(242,97)(242,34)])
link(onEvent2,11854780:doWork1,[])
link(onEvent3,11854780:doWork2,[])
}
Add(MultiElement,11854780,203,98)
{
link(onEvent1,9383237:onEvent1,[(249,104)(249,27)])
link(Data1,15639115:Text,[])
}
BEGIN_SDK
Add(EditMulti,5133224,28,21)
{
EventCount=2
WorkCount=2
DataCount=1
Width=440
Height=158
VOffset=7
HOffset=28
link(doWork1,6617902:doEvent1,[])
link(doWork2,5996483:doFor,[(39,41)(39,55)])
}
Add(For,5996483,49,49)
{
@Hint=#18:Количество абзацев|
IncludeEnd=1
link(onEvent,13236521:doRandom,[])
link(onStop,5133224:onEvent2,[(88,62)(88,140)(455,140)(455,41)])
link(End,5133224:Data1,[])
}
Add(For,16173739,154,49)
{
@Hint=#29:Количество слов в предложении|
link(onEvent,5851490:doText,[])
link(onStop,1010503:doEvent1,[(193,62)(193,97)])
link(End,13236521:Random,[(167,40)(146,40)(146,89)(111,89)])
}
Add(Random,13236521,105,49)
{
Min=7
Max=15
link(onRandom,16173739:doFor,[])
}
Add(InlineCode,5851490,203,42)
{
WorkPoints=#7:doStart|6:doText|
EventPoints=#5:onRes|
VarPoints=#
DataPoints=#
Code=#15:unit HiAsmUnit;|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10: private|0:|9: public|23: onRes : THI_Event;|5: |52: procedure doStart(var _Data:TData; Index:Word); |50: procedure doText(var _Data:TData; Index:Word);|5: end;|0:|14:implementation|0:|30:procedure THiAsmClass.doStart;|6: begin|12: Randomize;|5: end;|0:|29:procedure THiAsmClass.doText;|15:var sss:string;|16: i,j:integer;|16: _Rnd:double;|5:BEGIN|11: sss:=' ';|24: j:=round(Random*12)+2;|19: for i:=0 to j do|9: begin|18: _Rnd:=Random;|42: if _Rnd<0.0003 then sss:=sss+'ё' else|42: if _Rnd<0.0007 then sss:=sss+'ъ' else|42: if _Rnd<0.0033 then sss:=sss+'ф' else|42: if _Rnd<0.0065 then sss:=sss+'э' else|42: if _Rnd<0.0101 then sss:=sss+'щ' else|42: if _Rnd<0.0149 then sss:=sss+'ц' else|42: if _Rnd<0.0213 then sss:=sss+'ю' else|42: if _Rnd<0.0286 then sss:=sss+'ш' else|41: if _Rnd<0.038 then sss:=sss+'ж' else|42: if _Rnd<0.0477 then sss:=sss+'х' else|42: if _Rnd<0.0598 then sss:=sss+'й' else|42: if _Rnd<0.0742 then sss:=sss+'ч' else|42: if _Rnd<0.0901 then sss:=sss+'б' else|42: if _Rnd<0.1066 then sss:=sss+'з' else|42: if _Rnd<0.1236 then sss:=sss+'г' else|41: if _Rnd<0.141 then sss:=sss+'ь' else|40: if _Rnd<0.16 then sss:=sss+'ы' else|42: if _Rnd<0.1801 then sss:=sss+'я' else|42: if _Rnd<0.2063 then sss:=sss+'у' else|42: if _Rnd<0.2344 then sss:=sss+'п' else|42: if _Rnd<0.2642 then sss:=sss+'д' else|42: if _Rnd<0.2963 then sss:=sss+'м' else|42: if _Rnd<0.3312 then sss:=sss+'к' else|42: if _Rnd<0.3752 then sss:=sss+'л' else|42: if _Rnd<0.4206 then sss:=sss+'в' else|42: if _Rnd<0.4679 then sss:=sss+'р' else|42: if _Rnd<0.5226 then sss:=sss+'с' else|42: if _Rnd<0.5852 then sss:=sss+'т' else|42: if _Rnd<0.6522 then sss:=sss+'н' else|42: if _Rnd<0.7257 then sss:=sss+'и' else|42: if _Rnd<0.8058 then sss:=sss+'а' else|42: if _Rnd<0.8903 then sss:=sss+'е' else|34: if _Rnd<1 then sss:=sss+'о'; |9: end;|25: _hi_onEvent(onRes,sss);|4:END;|0:|0:|4:end.|
link(onRes,5810396:doWork2,[])
}
Add(StrCat,15987027,308,42)
{
Point(doClear)
link(Str1,11786390:Var3,[(314,33)(328,33)(328,82)])
}
Add(Hub,6617902,70,28)
{
link(onEvent1,5851490:doStart,[(193,34)(193,48)])
link(onEvent2,13236521:doRandomize,[(95,41)(95,62)])
}
Add(DoData,15697706,308,98)
{
link(onEventData,12993418:doTrim,[])
link(Data,11786390:Var2,[])
}
Add(GetDataEx,11786390,308,77)
{
link(Data,15987027:Result,[])
}
Add(Hub,1010503,203,91)
{
OutCount=3
link(onEvent1,13599394:doData,[(242,97)(242,62)])
link(onEvent2,15697706:doData,[])
link(onEvent3,15987027:doClear,[(298,111)(298,55)])
}
Add(DoData,13599394,252,56)
{
Data=String(. )
link(onEventData,5810396:doWork3,[(291,62)])
}
Add(HubEx,5810396,287,42)
{
link(onEvent,15987027:doStrCat,[])
}
Add(StrCase,1158976,406,98)
{
Type=3
link(onModify,5133224:onEvent1,[(445,104)(445,34)])
}
Add(Trim,12993418,357,98)
{
Char=" "
Mode=4
link(onTrim,1158976:doModify,[])
}
END_SDK
Add(Button,6143650,126,91)
{
Left=5
Top=10
Width=105
Caption="New TEST строк:"
link(onClick,8586217:doEvent1,[])
}
Add(Edit,15639115,203,49)
{
Left=110
Top=10
Text="15"
DataType=2
}
Add(Button,14560658,126,133)
{
Left=20
Top=30
Width=60
Caption="Open *,txt"
link(onClick,11236804:doExecute,[])
}
Add(Button,15170141,126,231)
{
Left=250
Top=10
Width=85
Caption="Save for print"
link(onClick,9383237:onEvent5,[(270,237)(270,55)])
}
Add(Button,683221,126,182)
{
Left=185
Top=10
Caption="View"
link(onClick,9383237:onEvent4,[(263,188)(263,48)])
}
Add(ODialog,11236804,175,133)
{
Filter="Trxt|*.txt"
link(onExecute,11039057:doValue,[])
}
Add(Memory,11039057,217,133)
{
link(onData,9383237:onEvent3,[(256,139)(256,41)])
}
END_SDK
Add(Memo,7819677,301,112)
{
Top=50
Width=391
Height=212
Align=5
Point(onMouseDown)
link(FileName,533421:Var1,[(314,103)(230,103)(230,180)(244,180)])
}
Add(StrList,9723881,343,112)
{
Strings=#7: ООО|7: РОГА|6: И|8: КОПЫТА|
}
Add(ChildForm,6708372,378,196)
{
link(Data1,3345020:Bitmap,[(384,187)(370,187)(370,236)(321,236)])
}
BEGIN_SDK
Add(EditMulti,5755953,21,21)
{
WorkCount=2
DataCount=1
link(doWork1,2423198:doEvent1,[(44,27)(44,69)])
link(doWork2,14525094:doExecute,[(32,34)(32,160)])
}
Add(MainForm,10244017,147,70)
{
Left=35
Top=105
Width=600
Height=600
Visible=1
Position=1
Point(doVisible)
}
Add(Image,16408053,217,63)
{
Left=1
Top=1
Width=400
Height=300
Align=5
link(Bitmap,5755953:Data1,[(223,33)(27,33)])
}
Add(Hub,2423198,56,63)
{
link(onEvent1,16408053:doLoad,[])
link(onEvent2,3144641:doData,[])
}
Add(DoData,3144641,91,70)
{
Data=Integer(1)
link(onEventData,10244017:doVisible,[(137,76)(137,104)])
}
Add(PictureStream,12869330,140,154)
{
link(Bitmap,16408053:ImageBitmap,[(153,117)(223,117)])
}
Add(SDialog,14525094,84,154)
{
Filter="Picture|*.jpg"
link(onExecute,12869330:doSave,[(130,160)(130,167)])
}
END_SDK
Add(MultiElementEx,3345020,315,196)
{
link(ArrText,7819677:Array,[])
link(ArrHeadLine,9723881:Array,[(328,187)(363,187)])
link(onDraw,6708372:doWork1,[])
}
BEGIN_SDK
Add(EditMultiEx,3756140,21,21)
{
WorkCount=#8:doCreate|6:doDraw|
EventCount=#6:onDraw|
VarCount=#6:Bitmap|
DataCount=#7:ArrText|11:ArrHeadLine|
Width=545
Height=403
link(doCreate,9068902:doWork1,[(298,27)])
link(Bitmap,9354808:Var1,[(27,313)])
link(doDraw,14188112:doEvent1,[(39,34)(39,125)])
}
Add(Img_Text,13575827,315,182)
{
Font=[MS Sans Serif,12,0,0,1]
link(onDraw,302144:doData,[(354,188)(354,223)(256,223)(256,251)])
link(Bitmap,5089546:Var2,[])
link(Text,8495500:Item,[(328,173)(349,173)])
}
Add(Bitmap,12758975,315,42)
{
HWidth=400
HHeight=300
FillColor=16777215
Point(doCreate)
Point(HWidth)
Point(HHeight)
link(HWidth,5019582:Result,[(321,26)(461,26)(461,313)(475,313)])
link(HHeight,6539392:Result,[(328,33)(454,33)(454,313)(412,313)])
}
Add(ArrayEnum,8495500,343,126)
{
link(onItem,13575827:doDraw,[(386,132)(386,167)(298,167)(298,188)])
link(onEndEnum,6539392:doCalc,[(389,139)(389,279)])
link(Array,6953790:Var2,[])
}
Add(Hub,14188112,294,119)
{
link(onEvent1,2658552:doClear,[(333,125)(333,118)])
link(onEvent2,8495500:doEnum,[])
}
Add(Memory,2658552,413,105)
{
Default=Integer(0)
}
Add(If_else,14879846,343,245)
{
Type=2
link(onTrue,2658552:doValue,[(396,251)(396,111)])
link(Op2,11730184:Var1,[(356,236)])
}
Add(DoData,302144,266,245)
{
link(onEventData,14879846:doCompare,[])
link(Data,13575827:TextWidth,[(272,229)(321,229)])
}
Add(GetDataEx,11730184,413,231)
{
link(Data,2658552:Value,[])
}
Add(MathParse,6539392,406,273)
{
MathStr="%1*%2+20"
ResultType=0
Default=300
link(onResult,5019582:doCalc,[])
link(X1,13972970:Var3,[(412,229)])
link(X2,8495500:Index,[(419,264)(384,264)(384,180)(356,180)])
}
Add(MathParse,5019582,469,273)
{
MathStr="%1 + 20"
ResultType=0
Default=400
link(onResult,8901878:doEvent1,[])
link(X1,11730184:Var2,[(475,257)(419,257)])
}
Add(HubEx,9068902,294,56)
{
link(onEvent,12758975:doCreate,[])
}
Add(Hub,8901878,511,273)
{
link(onEvent1,9068902:doWork3,[(533,279)(533,151)(298,151)])
link(onEvent2,16444718:doEnum,[(536,286)(536,321)(46,321)(46,363)])
}
Add(ArrayEnum,3454743,231,350)
{
link(onItem,12766806:doCalc,[])
link(onEndEnum,3756140:onDraw,[(543,363)(543,27)])
link(Array,6953790:Var1,[(237,110)])
}
Add(Img_Text,8426338,329,350)
{
X=10
Font=[MS Sans Serif,12,0,0,1]
Point(Y)
link(Bitmap,2111843:Var2,[])
link(Text,3454743:Item,[(342,341)(320,341)(320,408)(237,408)])
link(Y,12766806:Result,[(349,341)(370,341)(370,390)(286,390)])
}
Add(GetDataEx,5089546,315,154)
{
link(Data,12758975:Bitmap,[])
}
Add(MathParse,12766806,280,350)
{
MathStr="%1*%2 + 10"
ResultType=0
link(onResult,8426338:doDraw,[])
link(X1,13972970:Var2,[(286,285)(328,285)])
link(X2,3454743:Index,[(293,341)(272,341)(272,390)(244,390)])
}
Add(GetDataEx,13972970,322,224)
{
link(Data,13575827:TextHeight,[])
}
Add(ArrayEnum,16444718,56,357)
{
link(onItem,7635877:doCalc,[])
link(onEndEnum,3454743:doEnum,[(95,370)(95,342)(220,342)(220,356)])
link(Array,3756140:ArrHeadLine,[(62,348)(34,348)])
}
Add(Img_Text,4163702,168,357)
{
X=50
Font=[MS Sans Serif,72,1,12632256,1]
Point(Y)
link(Bitmap,9354808:Var2,[])
link(Text,16444718:Item,[(181,348)(159,348)(159,415)(62,415)])
link(Y,7635877:Result,[(188,348)(209,348)(209,397)(125,397)])
}
Add(MathParse,7635877,119,357)
{
MathStr="100*%2 + 30"
ResultType=0
link(onResult,4163702:doDraw,[])
link(X2,16444718:Index,[(132,348)(111,348)(111,397)(69,397)])
}
Add(GetDataEx,2111843,329,308)
{
link(Data,5089546:Var1,[(335,159)])
}
Add(GetDataEx,6953790,343,105)
{
link(Data,3756140:ArrText,[(349,96)(27,96)])
}
Add(GetDataEx,9354808,168,308)
{
Angle=1
link(Data,2111843:Var1,[])
}
END_SDK

карма: 19

0
Ответов: 839
Рейтинг: 17
#7: 2019-06-30 18:43:56 ЛС | профиль | цитата
Да нет.
Есть программа Допустим "игра".
Моя задача по верх игры написать нужную информацию или же на ней.

Пример Оверлей от дискорда ,в верхнем левом углу он отображает людей с которыми ты разгавариваешь и Аватарку

карма: 0

0
Ответов: 8887
Рейтинг: 823
#8: 2019-06-30 18:46:15 ЛС | профиль | цитата
andrestudio, спасибо! Для благ -- потребности пенсионера с 15-летним стажем соответствуют доходам, а вот здоровье не соответствует, мелкие деталюшки не вижу, сейчас перешёл на радиолампы, светятся, заглянешь внутрь, а там электроны летают, красота!
карма: 19

0
Ответов: 2059
Рейтинг: 131
#9: 2019-07-01 21:31:27 ЛС | профиль | цитата
Почему тема называется "Оверлей"?
Само значение слова понятно?
Да нет.
Есть программа Допустим "игра".

А как ты, Допустим, в "игру" собираешься влезть Hiasm-ом? Нужно описать свою задачу. Где и для чего конкретно?
Тебе GUI для графики нужно? Это? http://forum.hiasm.com/getfile/38667 ( на случай, если чего-то не установлено http://forum.hiasm.com/getfile/38666 http://forum.hiasm.com/getfile/38665 я же писал и выкладывал) - не читаем?
Вот другие похожие темы. Второй пост сверху http://forum.hiasm.com/topic/52531/18 и вот http://forum.hiasm.com/topic/67365 , или не читаешь, или не понятно что написано?
Чем рисуется, тем и пишется.
В некоторых играх предусмотрен такой инструмент.
Чаше всего интерфейс сделан на LUA или подобных скриптах.
Если нет, то тебе сюда: https://perfect-soft.net/threads/3241/?d=1
Moon ImGui можно прикрутить в чужие игры при определённой сноровке.

Если сам чего-то делаешь, что не факт, то надо самому сделать GUI.
Все движки имеют такой интерфейс, свой, или сторонний.

Редактировалось 12 раз(а), последний 2019-07-01 21:53:10
карма: 6

0
Ответов: 839
Рейтинг: 17
#10: 2019-07-02 13:39:50 ЛС | профиль | цитата
Вот что то подобное нужно. форма прозрачная но текст должен быть Видин и не прозрачен. не понимаю как сделать если относительно формы будет всё прозрачно
Add(MainForm,2953706,266,175)
{
AlphaBlendValue=100
BorderStyle=9
TransparentManager="2"
Point(doAlphaBlendValue)
Point(Handle)
Point(doBorderStyle)
link(onCreate,3216107:doPopup,[])
}
Add(Label,2905831,336,231)
{
Left=40
Top=25
HintManager="1"
Transparent=0
ColorHover=255
}
Add(WinTools,3216107,336,182)
{
link(Handle,2953706:Handle,[(342,170)(414,170)(414,255)(272,255)])
}
карма: 0

0
Ответов: 8887
Рейтинг: 823
#11: 2019-07-02 16:16:32 ЛС | профиль | цитата
Так что-ли?


Add(MainForm,13911611,560,77)
{
Left=100
Top=100
AlphaBlendValue=0
BorderStyle=0
DragForm=0
TransparentManager="MyAlf"
Point(doAlphaBlendValue)
Point(Handle)
Point(doBorderStyle)
link(onCreate,3216107:doPopup,[(601,97)(601,146)(550,146)(550,174)])
}
Add(WinTools,3216107,560,161)
{
link(Handle,16526336:Var2,[])
}
Add(TransparentManager,710438,560,42)
{
Name="MyAlf"
TransparentColor=-16777201
FormTranspColor=-16777201
}
Add(BitmapArray,7808196,455,84)
{
Bitmaps=['Bitmap'=[ZIP3609000078DAD594DD4B53611CC73F5DF61F74D9657F8117D1552F905488448CA870359D64D8B6E364A2455357A2A1E6525733B34D5BD97C59CD45DB44D2AC249CAB66B109EBD508BB08C29B6C1DD666BE24227BDAA18B1EF870E079F87C399CF37BBE3B0FE46C6671E5A4D89662CB129BD8FAFB60E9FCCF954C26FF7BAA8C462E9FB7D052538DB5B6066BEAD958554985FEB462773218642C10203E1D213A1522E41B22E072E1B55AE9B4D4D2555FBF61B688FB7C648497E3E3C453E71F666284FAFB196E6B65B8B9097F7B3B83576D1BE68BBAE1FB3E5EDCEA6466C04EA8C9C298A99CBE32695D9EB1E20C659566CE565B56F644DCB0DBC95B9796F99B3B98EB3A44B4B99461A316537121DA222D6AB59ADDC575ECD135B1FD9C97FDA50D68341A8AB545381A6A377497F35FBBAF31FFE004B27F173F83FB4804F3F8EA29C0DFA84332E831490654E64E34DE59D4EE3879864B944B122A952AA39BCE8FF5D958787412F9C951E46785C813C7498C1EE1618B1E835E87ABBB1BE3ED718EF93E5170EF1DA5F6217A9C4E3A52FF31939BCE8FF6B5F37D42429EAE408E552347CD24C2E58C5A250C4BEF90C6E674E1F1B839A83ABCB227E24607AFB01031237FB4217FE946FE7C9D44EC22A3AD46A4D4B759CE72DCE822E071919F9FBF9A2FE0867B1DC4831DCC86EF3017F3F0ED7D2F3FDED8786AAFA2AEEEC29A5928D16A30994CABB321E84EDE1D5864CADB4FC4EFE695BF87C78EB675339A9BBB975325256BEF99A0FB2FFA23134AFA430425FD218A687F282153072841A4039420D2014A10ED8FACF305FB23EBF9F98BFEC8FA9E65D901BF00ADA08E69],'Bitmap'=[ZIP3609000078DA73F235E36400033320D600620928666450804840E591C1FFFFFFC9C6B8002566229B4D8E1C35CCA7D40E62F4A2AB211590E207103870E7005118D94C6A9B8F6E36ADCC87A9470F277C34B1E623ABC5671EBA5F890D7F5CFE4136175B58526A3EBA19D4369F505A20D64C906A1846091F22DCCF80A21B13536A3EA9EE87DB4145F3C9CDE7F8D5FE270A1332BF014823636ABBBF012208C6F4347FA8840FADD20F39F51731F51B3D3000C67C6E2E],'Bitmap'=[ZIP3609000078DADD54CB4E5A5114B5C30E9D3571D261E7267E4013871DF8034EFD037FA0691CB56947D590A2216DA42FAC206A3180E51D82E8BD3E109597C845B83C82CAFBB1BACFD136355C28370C9A74278BC33EEBEC7DCE59EBDEFBF4D9C4C3111E1384278447777830F2F896B8E3FF0CFCE3C8E57210451176BB05CBCBF3585C7CD5138C67EB0441E0758344B95C8624A5A0D3BDC6C98997F20B5C5F9F7781CDC7E3BB585DD5219D4EF3BA41A258CC2218B441AB7D4E35122E2F8F15313A1AE1BCC5A257A58F283A108DEEC264D2F0FA6CF654112E5796F376BB4155FFFD7D1752A91036371751A96448D798229696629CB75A3FA9F251A379419A2E50DD0754AB320A85738E9D9D04D7848DBFE618BFB2F256958FC5620481801136DB326AB5024A2589D649181F8FF1FE6C64399B67BC5EFF92EE71A3CAC783031BD6D6E651AF97684F19737312C6C6E2BFC17236CF78A37101A7A7A22A1F53A943D2E80D1A8D1BE28AD8D8286272B28064F27664399B67BCC7F38DB04EFF6BAA7CB458B468B5AAA4C1754F303E18FCCE7588C78FEFF54FA7A3B4C78F9E3E9ACD5FD16ED7C9BF2A9DADA208C60B828DBCC8C2EFDFBAD7BFD9AC537F273D3F7A451FA7A74DE8745A08879B74CE8622187F78E8802C27E95CB62E0F24E98CEBA3E4E3D4D43AADE86076967E3B6D4530DEE1F888BDBD6DBA7BA6AB7FBD5EA5FEEF147D9C9971D3FED9BEEF623E7F411A6CD35D9A3DD7389D9F157DCCE793383BF3D373B605AFF70B4221376960A6F74247B981FA324F05BA77A1EF1904C1FA571F339908F9F41E47476EB8DD46D2A633F0F72614F20CED63BF08877D43FBD82F62B13DD2303FB48FBD82F9934888A4AD033E9F81DF4714ADDC43353E0E12B29CA06F5580F63BC0D5555E958FFF4BFC04488B5CD9]]
}
Add(Timer,13580402,448,161)
{
AutoStop=1
link(onTimer,11955944:doDraw,[])
}
Add(StrList,13336582,511,77)
{
Strings=#6:Петров|6:Иванов|7:Сидоров|
}
Add(MultiElementEx,11955944,497,161)
{
link(Handle,16526336:Var1,[(503,138)])
link(ArrPict,7808196:Array,[(510,131)(461,131)])
link(ArrName,13336582:Array,[(517,131)(531,131)])
}
BEGIN_SDK
Add(EditMultiEx,7096807,21,21)
{
WorkCount=#6:doDraw|
EventCount=#6:onDraw|
DataCount=#6:Handle|7:ArrPict|7:ArrName|
Width=356
Height=151
VOffset=84
HOffset=50
link(doDraw,7397342:doEnum,[])
}
Add(Img_Bmp,7128576,210,105)
{
DrawSource=1
Point(X)
Point(Y)
link(Bitmap,9204056:Var2,[])
link(SourceBitmap,7397342:Item,[(223,96)(202,96)(202,152)(83,152)])
link(X,15132521:Value,[])
link(Y,3306197:Var2,[])
}
Add(ArrayEnum,7397342,77,105)
{
link(onItem,7333241:doEvent1,[])
link(onEndEnum,7096807:onDraw,[(116,118)(116,160)(347,160)(347,111)])
link(Array,7096807:ArrPict,[])
}
Add(Math,11989290,154,105)
{
OpType=2
Op2=32
ResultType=0
link(onResult,7128576:doDraw,[])
link(Op1,12976557:Var2,[])
}
Add(Memory,15132521,224,28)
{
Default=Integer(0)
}
Add(Hub,7333241,126,105)
{
link(onEvent1,11989290:doOperation,[])
link(onEvent2,14685674:doRead,[(249,118)(249,111)])
}
Add(ArrayRW,14685674,259,105)
{
link(onRead,16497363:doDraw,[])
link(Array,7096807:ArrName,[(265,68)(91,68)])
link(Index,12976557:Var3,[(272,89)])
}
Add(Img_Text,16497363,308,105)
{
DrawSource=1
Font=[MS Sans Serif,12,1,255,1]
Point(X)
Point(Y)
link(Bitmap,9204056:Var3,[(314,75)])
link(X,13606501:Value,[])
link(Y,3306197:Var3,[(335,82)])
}
Add(GetDataEx,3306197,231,77)
{
Angle=3
link(Data,11989290:Result,[(193,82)(193,145)(160,145)])
}
Add(Memory,13606501,322,28)
{
Default=Integer(32)
}
Add(GetDataEx,12976557,154,84)
{
Angle=3
link(Data,7397342:Index,[(146,89)(146,145)(90,145)])
}
Add(GetDataEx,9204056,210,70)
{
Angle=3
link(Data,7096807:Handle,[(77,75)])
}
END_SDK
Add(GetDataEx,16526336,560,133)
{
link(Data,13911611:Handle,[])
}

карма: 19

0
Ответов: 839
Рейтинг: 17
#12: 2019-07-02 16:20:57 ЛС | профиль | цитата
Да,но у меня отрисовывает рамку её можно убрать?
карма: 0

0
Ответов: 8887
Рейтинг: 823
#13: 2019-07-02 18:48:01 ЛС | профиль | цитата
Свойство формы Ctl3D = True, WinStyle = bsNone
карма: 19

0
Ответов: 2059
Рейтинг: 131
#14: 2019-07-02 21:39:56 ЛС | профиль | цитата
Леонид, не мучайся. В HiAsm этого нет!!!
GAv, не может объяснить и не понял, что я написал.
Если перевести на русский, то он хочет выводить полупрозрачный графический, в смысле специально для графики, интерфейс пользователя с текстом на объект рендеринга. И не важно что это, OpenGL, Direct3D 9, или ещё что.
Отрисовка многострочного текста в компонентах Graphics HiAsm совсем не то! И в компонентах OpenGL HiAsm - тоже нет. Там просто вывод текста на объект рендеринга, а GUI там нет.
Короче говоря, на картинку выводится полупрозрачный спрайт с надписью - ну очень грубо.
А это всё имитация.
Короче говоря, в HiAsm этого нет!!!

Редактировалось 1 раз(а), последний 2019-07-02 21:43:09
карма: 6

0
Ответов: 2059
Рейтинг: 131
#15: 2019-07-02 23:10:32 ЛС | профиль | цитата
Вот что нужно: https://yadi.sk/d/hOVa5J6_3GFJkw

Делал на скорую руку, так что...
карма: 6

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)