Groups > comp.sys.acorn.programmer > #6405

dragging a text icon by its outline

Path	csiph.com!aioe.org!qjt8OK8UAkoL5j+neYIRqA.user.46.165.242.75.POSTED!not-for-mail
From	Christopher Self <cself@btinternet.com>
Newsgroups	comp.sys.acorn.programmer
Subject	dragging a text icon by its outline
Date	Wed, 03 Aug 2022 20:13:36 +0100
Organization	None
Message-ID	<5a124fe1d2cself@btinternet.com> (permalink)
Injection-Info	gioia.aioe.org; logging-data="14918"; posting-host="qjt8OK8UAkoL5j+neYIRqA.user.gioia.aioe.org"; mail-complaints-to="abuse@aioe.org";
User-Agent	Pluto/3.18 (RISC OS/5.29) NewsHound/v1.52-32
X-Notice	Filtered by postfilter v. 0.9.2
Xref	csiph.com comp.sys.acorn.programmer:6405

Show key headers only | View raw

I'm trying to drag an icon around a window using the icon's outline, but
it keeps boxing my compass.

What's wrong with this, please?:

 PROCget_window_state (play_agenda_win%, minx%, miny%, maxx%, maxy%,
scrollx%, scrolly%, behind%)
 PROCget_icon_outline (play_agenda_win%, icon%, icminx%, icminy%, icmaxx%,
icmaxy%)
 REM draw dragbox for current icon
 block!4  = 5
 block!8  = icminx% + (scrollx% - minx%)
 block!12 = icminy% + (scrolly% - maxy%)
 block!16 = icmaxx% + (scrollx% - minx%)
 block!20 = icmaxy% + (scrolly% - maxy%)
 block!24 = minx%
 block!28 = miny%
 block!32 = maxx%
 block!36 = maxy%
 SYS "Wimp_DragBox",,block


I've bodged it so far with:

 block!8  = minx% + 8
 block!12 = maxy% - (scrolly% - icminy%)
 block!16 = maxx% - 8
 block!20 = maxy% - (scrolly% - icmaxy%)

But I don't understand why that works.

-- 
Christopher Self

Back to comp.sys.acorn.programmer | Previous | Next — Next in thread | Find similar | Unroll thread

Thread

dragging a text icon by its outline Christopher Self <cself@btinternet.com> - 2022-08-03 20:13 +0100
  Re: dragging a text icon by its outline Christopher Self <cself@btinternet.com> - 2022-08-07 21:37 +0100
  Re: dragging a text icon by its outline Christopher Self <cself@btinternet.com> - 2022-08-14 18:42 +0100

csiph-web