Code: Alles auswählen
#HH_DISPLAY_TEXT_POPUP = $e
Structure HH_POPUP
cbStruct.l
hinst.l
idString.l
pszText.s
ppoint.point
clrForeground.l
clrBackground.l
rcMargins.rect
pszFont.s
EndStructure
pp.HH_POPUP
pp\cbStruct = SizeOf(pp)
pp\pszText = "1 2 3 4 5 6 7 8 9 0 test"
pp\ppoint\x = 300
pp\ppoint\y = 300
pp\clrForeground = RGB(255, 0, 0)
pp\clrBackground = RGB(0, 0, 255)
pp\rcMargins\left = -1
pp\rcMargins\top = -1
pp\rcMargins\right = -1
pp\rcMargins\bottom = -1
pp\pszFont= "Arial, 40, , BOLD"
OpenLibrary(1,"hhctrl.ocx")
F1 = IsFunction(1, "HtmlHelpA")
popuphandle = CallFunctionFast(F1,0,0,#HH_DISPLAY_TEXT_POPUP,@pp)
;...
Delay(6000)
;...
CloseLibrary(1)
