novaBBS - comp.sys.acorn.programmer - Re: dragging a text icon by its outline

dragging a text icon by its outline

<5a124fe1d2cself@btinternet.com>

https://www.novabbs.com/devel/article-flat.php?id=177&group=comp.sys.acorn.programmer#177

copy link Newsgroups: comp.sys.acorn.programmer

Path: i2pn2.org!i2pn.org!aioe.org!qjt8OK8UAkoL5j+neYIRqA.user.46.165.242.75.POSTED!not-for-mail
From: cse...@btinternet.com (Christopher Self)
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>
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

by: Christopher Self - Wed, 3 Aug 2022 19:13 UTC

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

Re: dragging a text icon by its outline

<5a1466ed4ecself@btinternet.com>

copy mid

https://www.novabbs.com/devel/article-flat.php?id=183&group=comp.sys.acorn.programmer#183

copy link Newsgroups: comp.sys.acorn.programmer

Path: i2pn2.org!i2pn.org!aioe.org!7CNMhlow8d6xK5zE96cxRg.user.46.165.242.75.POSTED!not-for-mail
From: cse...@btinternet.com (Christopher Self)
Newsgroups: comp.sys.acorn.programmer
Subject: Re: dragging a text icon by its outline
Date: Sun, 07 Aug 2022 21:37:43 +0100
Organization: None
Message-ID: <5a1466ed4ecself@btinternet.com>
References: <5a124fe1d2cself@btinternet.com>
Injection-Info: gioia.aioe.org; logging-data="28134"; posting-host="7CNMhlow8d6xK5zE96cxRg.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

by: Christopher Self - Sun, 7 Aug 2022 20:37 UTC

This is now almost working:

block!8 = minx% - (scrollx% - icminx%)
block!12 = maxy% - (scrolly% - icminy%)
block!16 = minx% - (scrollx% - icmaxx%)
block!20 = maxy% - (scrolly% - icmaxy%)

But it doesn't cope with an undersize window, and I still don't understand
it.

--
Christopher Self

Re: dragging a text icon by its outline

<5a17f1b251cself@btinternet.com>

copy mid

https://www.novabbs.com/devel/article-flat.php?id=188&group=comp.sys.acorn.programmer#188

copy link Newsgroups: comp.sys.acorn.programmer

Path: i2pn2.org!i2pn.org!aioe.org!y8bOfQlh/9MWd5a0rrcYUg.user.46.165.242.75.POSTED!not-for-mail
From: cse...@btinternet.com (Christopher Self)
Newsgroups: comp.sys.acorn.programmer
Subject: Re: dragging a text icon by its outline
Date: Sun, 14 Aug 2022 18:42:04 +0100
Organization: None
Message-ID: <5a17f1b251cself@btinternet.com>
References: <5a124fe1d2cself@btinternet.com>
Injection-Info: gioia.aioe.org; logging-data="62404"; posting-host="y8bOfQlh/9MWd5a0rrcYUg.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

by: Christopher Self - Sun, 14 Aug 2022 17:42 UTC

I've even managed to clip it correctly now:

block!8 = minx% - (scrollx% - icminx%)
IF scrollx% > icminx% THEN block!8 = minx%+4
block!12 = maxy% - (scrolly% - icminy%)
block!16 = minx% - (scrollx% - icmaxx%)
IF maxx% + (scrollx% - minx%) < icmaxx% THEN block!16 = maxx%-4
block!20 = maxy% - (scrolly% - icmaxy%)

But I still don't understand it...

--
Christopher Self

Science is to computer science as hydrodynamics is to plumbing.

devel / comp.sys.acorn.programmer / Re: dragging a text icon by its outline

Subject	Author
dragging a text icon by its outline	Christopher Self
Re: dragging a text icon by its outline	Christopher Self
Re: dragging a text icon by its outline	Christopher Self