Re: SetSelection with scrolling

From: Douglas G. Danforth <"Douglas>
Date: Tue, 30 Mar 2004 10:10:31 -0500

----boundary-LibPST-iamunique-870045469_-_-
Content-type: text/plain

Thomas,
Yes, that works very well!
Thank you very much.
-Doug

Tech-Support (BlackBox) wrote:

>Doug,
>
>if I get you right, the following might help:
>TextViews.ShowRange(c.text, pos, pos, TextViews.focusOnly)
>
>Regards,
>
>Thomas,
>Oberon microsystems, Inc.
>
>-----Original Message-----
>From: Douglas G. Danforth [mailto:danforth{([at]})nowhere.xy
>Sent: Montag, 29. Marz 2004 19:39
>To: blackbox{([at]})nowhere.xy
>Subject: SetSelection with scrolling
>
>
>
>Folks,
>Under program control, I would like to have the screen scroll to the
>position at which I have set a 'selection'. I am able to accomplish this
>for text that is visible on the screen but setting the selection before
>or after the visible text does not cause automatically scrolling to that
>location. I set up the situation by:
>
> c := TextControllers.Focus();
> IF c # NIL THEN
> rd := c.text.NewReader(NIL);
> c.SetCaret(TextControllers.none);
> c.SetSelection(none, none);
> rd.SetPos(0);
> END
>
>and then I create a new selection by:
>
> (* highlight current word found *)
> pos := rd.Pos();
> beg := pos-LEN(name$);
> c.SetCaret(beg);
> c.SetSelection (beg, pos);
>
>but no scrolling occurs. It would be nice to see how the CP compiler
>does its scrolling when it finds an error or how Find does its
>scrolling. I don't want to get down to 'message passing' and 'frame'
>handling. Surely there is a level just above this that does the
>scrolling automatically? I do not know how to see or quarentee that the
>Focus does not have the "noAutoScroll" bits set (whatever that actually
>means).
>
>Any help would be appreciated.
>
>-Doug
>
>--------------------------------------------
>
>To unsubscribe from this mailing list, send a message containing the word
>"unsubscribe" to:
> blackbox-request{([at]})nowhere.xy
>
>To get a list of valid e-mail commands and instructions on their usage, send
>a message containing the word "help" to the above address.
>
>Send any problem reports or questions related to this email list to the list
>owner at
> owner-blackbox{([at]})nowhere.xy
>
>Current posting policy:
>
>a) To post you should use the same address by which you are subscribed to
>the mailing list. That way, the list server will recognize you as subscriber
>and forward your posting immediately, without creating any overhead.
>
>b) If, for some reason, you cannot post from the address, by which you are
>subscribed, your message will be moderated to avoid spam. Please understand
>that moderation will often cause some delay, in particular over weekends or
>holydays.
>
>
>
>


--------------------------------------------

To unsubscribe from this mailing list, send a message containing the word "unsubscribe" to:
   blackbox-request{([at]})nowhere.xy

To get a list of valid e-mail commands and instructions on their usage, send a message containing the word "help" to the above address.

Send any problem reports or questions related to this email list to the list owner at
   owner-blackbox{([at]})nowhere.xy

Current posting policy:

a) To post you should use the same address by which you are subscribed to the mailing list. That way, the list server will recognize you as subscriber and forward your posting immediately, without creating any overhead.

b) If, for some reason, you cannot post from the address, by which you are subscribed, your message will be moderated to avoid spam. Please understand that moderation will often cause some delay, in particular over weekends or holydays.



----boundary-LibPST-iamunique-870045469_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"

e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIFRob21hcyxccGFyDQpZZXMsIHRoYXQgd29ya3Mg
dmVyeSB3ZWxsISAgXHBhcg0KVGhhbmsgeW91IHZlcnkgbXVjaC5ccGFyDQotRG91Z1xwYXINClxw
YXINClRlY2gtU3VwcG9ydCAoQmxhY2tCb3gpIHdyb3RlOlxwYXINClxwYXINCj5Eb3VnLFxwYXIN
Cj5ccGFyDQo+aWYgSSBnZXQgeW91IHJpZ2h0LCB0aGUgZm9sbG93aW5nIG1pZ2h0IGhlbHA6XHBh
cg0KPlRleHRWaWV3cy5TaG93UmFuZ2UoYy50ZXh0LCBwb3MsIHBvcywgVGV4dFZpZXdzLmZvY3Vz
T25seSlccGFyDQo+XHBhcg0KPlJlZ2FyZHMsXHBhcg0KPlxwYXINCj5UaG9tYXMsXHBhcg0KPk9i
ZXJvbiBtaWNyb3N5c3RlbXMsIEluYy5ccGFyDQo+XHBhcg0KPi0tLS0tT3JpZ2luYWwgTWVzc2Fn
ZS0tLS0tXHBhcg0KPkZyb206IERvdWdsYXMgRy4gRGFuZm9ydGggW21haWx0bzpkYW5mb3J0aEBn
cmVlbndvb2RmYXJtLmNvbV1ccGFyDQo+U2VudDogTW9udGFnLCAyOS4gTWFyeiAyMDA0IDE5OjM5
XHBhcg0KPlRvOiBibGFja2JveEBvYmVyb24uY2hccGFyDQo+U3ViamVjdDogU2V0U2VsZWN0aW9u
IHdpdGggc2Nyb2xsaW5nXHBhcg0KPlxwYXINCj5ccGFyDQo+XHBhcg0KPkZvbGtzLFxwYXINCj5V
bmRlciBwcm9ncmFtIGNvbnRyb2wsIEkgd291bGQgbGlrZSB0byBoYXZlIHRoZSBzY3JlZW4gc2Ny
b2xsIHRvIHRoZVxwYXINCj5wb3NpdGlvbiBhdCB3aGljaCBJIGhhdmUgc2V0IGEgJ3NlbGVjdGlv
bicuIEkgYW0gYWJsZSB0byBhY2NvbXBsaXNoIHRoaXNccGFyDQo+Zm9yIHRleHQgdGhhdCBpcyB2
aXNpYmxlIG9uIHRoZSBzY3JlZW4gYnV0IHNldHRpbmcgdGhlIHNlbGVjdGlvbiBiZWZvcmVccGFy
DQo+b3IgYWZ0ZXIgdGhlIHZpc2libGUgdGV4dCBkb2VzIG5vdCBjYXVzZSBhdXRvbWF0aWNhbGx5
IHNjcm9sbGluZyB0byB0aGF0XHBhcg0KPmxvY2F0aW9uLiAgSSBzZXQgdXAgdGhlIHNpdHVhdGlv
biBieTpccGFyDQo+XHBhcg0KPiAgIGMgOj0gVGV4dENvbnRyb2xsZXJzLkZvY3VzKCk7XHBhcg0K
PiAgIElGIGMgIyBOSUwgVEhFTlxwYXINCj4gICAgICAgcmQgOj0gYy50ZXh0Lk5ld1JlYWRlcihO
SUwpO1xwYXINCj4gICAgICAgYy5TZXRDYXJldChUZXh0Q29udHJvbGxlcnMubm9uZSk7XHBhcg0K
PiAgICAgICBjLlNldFNlbGVjdGlvbihub25lLCBub25lKTtccGFyDQo+ICAgICAgIHJkLlNldFBv
cygwKTtccGFyDQo+ICAgRU5EXHBhcg0KPlxwYXINCj5hbmQgdGhlbiBJIGNyZWF0ZSBhIG5ldyBz
ZWxlY3Rpb24gYnk6XHBhcg0KPlxwYXINCj4gICAoKiBoaWdobGlnaHQgY3VycmVudCB3b3JkIGZv
dW5kICopXHBhcg0KPiAgIHBvcyA6PSByZC5Qb3MoKTtccGFyDQo+ICAgYmVnIDo9IHBvcy1MRU4o
bmFtZSQpO1xwYXINCj4gICBjLlNldENhcmV0KGJlZyk7XHBhcg0KPiAgIGMuU2V0U2VsZWN0aW9u
IChiZWcsIHBvcyk7XHBhcg0KPlxwYXINCj5idXQgbm8gc2Nyb2xsaW5nIG9jY3Vycy4gIEl0IHdv
dWxkIGJlIG5pY2UgdG8gc2VlIGhvdyB0aGUgQ1AgY29tcGlsZXJccGFyDQo+ZG9lcyBpdHMgc2Ny
b2xsaW5nIHdoZW4gaXQgZmluZHMgYW4gZXJyb3Igb3IgaG93IEZpbmQgZG9lcyBpdHNccGFyDQo+
c2Nyb2xsaW5nLiBJIGRvbid0IHdhbnQgdG8gZ2V0IGRvd24gdG8gJ21lc3NhZ2UgcGFzc2luZycg
YW5kICdmcmFtZSdccGFyDQo+aGFuZGxpbmcuICBTdXJlbHkgdGhlcmUgaXMgYSBsZXZlbCBqdXN0
IGFib3ZlIHRoaXMgdGhhdCBkb2VzIHRoZVxwYXINCj5zY3JvbGxpbmcgYXV0b21hdGljYWxseT8g
IEkgZG8gbm90IGtub3cgaG93IHRvIHNlZSBvciBxdWFyZW50ZWUgdGhhdCB0aGVccGFyDQo+Rm9j
dXMgZG9lcyBub3QgaGF2ZSB0aGUgIm5vQXV0b1Njcm9sbCIgYml0cyBzZXQgKHdoYXRldmVyIHRo
YXQgYWN0dWFsbHlccGFyDQo+bWVhbnMpLlxwYXINCj5ccGFyDQo+QW55IGhlbHAgd291bGQgYmUg
YXBwcmVjaWF0ZWQuXHBhcg0KPlxwYXINCj4tRG91Z1xwYXINCj5ccGFyDQo+LS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS1ccGFyDQo+XHBhcg0KPlRvIHVuc3Vic2Ny
aWJlIGZyb20gdGhpcyBtYWlsaW5nIGxpc3QsIHNlbmQgYSBtZXNzYWdlIGNvbnRhaW5pbmcgdGhl
IHdvcmRccGFyDQo+InVuc3Vic2NyaWJlIiB0bzpccGFyDQo+ICAgYmxhY2tib3gtcmVxdWVzdEBv
YmVyb24uY2hccGFyDQo+XHBhcg0KPlRvIGdldCBhIGxpc3Qgb2YgdmFsaWQgZS1tYWlsIGNvbW1h
bmRzIGFuZCBpbnN0cnVjdGlvbnMgb24gdGhlaXIgdXNhZ2UsIHNlbmRccGFyDQo+YSBtZXNzYWdl
IGNvbnRhaW5pbmcgdGhlIHdvcmQgImhlbHAiIHRvIHRoZSBhYm92ZSBhZGRyZXNzLlxwYXINCj5c
cGFyDQo+U2VuZCBhbnkgcHJvYmxlbSByZXBvcnRzIG9yIHF1ZXN0aW9ucyByZWxhdGVkIHRvIHRo
aXMgZW1haWwgbGlzdCB0byB0aGUgbGlzdFxwYXINCj5vd25lciBhdFxwYXINCj4gICBvd25lci1i
bGFja2JveEBvYmVyb24uY2hccGFyDQo+XHBhcg0KPkN1cnJlbnQgcG9zdGluZyBwb2xpY3k6XHBh
cg0KPlxwYXINCj5hKSBUbyBwb3N0IHlvdSBzaG91bGQgdXNlIHRoZSBzYW1lIGFkZHJlc3MgYnkg
d2hpY2ggeW91IGFyZSBzdWJzY3JpYmVkIHRvXHBhcg0KPnRoZSBtYWlsaW5nIGxpc3QuIFRoYXQg
d2F5LCB0aGUgbGlzdCBzZXJ2ZXIgd2lsbCByZWNvZ25pemUgeW91IGFzIHN1YnNjcmliZXJccGFy
DQo+YW5kIGZvcndhcmQgeW91ciBwb3N0aW5nIGltbWVkaWF0ZWx5LCB3aXRob3V0IGNyZWF0aW5n
IGFueSBvdmVyaGVhZC5ccGFyDQo+XHBhcg0KPmIpIElmLCBmb3Igc29tZSByZWFzb24sIHlvdSBj
YW5ub3QgcG9zdCBmcm9tIHRoZSBhZGRyZXNzLCBieSB3aGljaCB5b3UgYXJlXHBhcg0KPnN1YnNj
cmliZWQsIHlvdXIgbWVzc2FnZSB3aWxsIGJlIG1vZGVyYXRlZCB0byBhdm9pZCBzcGFtLiBQbGVh
c2UgdW5kZXJzdGFuZFxwYXINCj50aGF0IG1vZGVyYXRpb24gd2lsbCBvZnRlbiBjYXVzZSBzb21l
IGRlbGF5LCBpbiBwYXJ0aWN1bGFyIG92ZXIgd2Vla2VuZHMgb3JccGFyDQo+aG9seWRheXMuXHBh
cg0KPlxwYXINCj5ccGFyDQo+ICBccGFyDQo+XHBhcg0KXHBhcg0KXHBhcg0KLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS1ccGFyDQpccGFyDQpUbyB1bnN1YnNjcmli
ZSBmcm9tIHRoaXMgbWFpbGluZyBsaXN0LCBzZW5kIGEgbWVzc2FnZSBjb250YWluaW5nIHRoZSB3
b3JkICJ1bnN1YnNjcmliZSIgdG86XHBhcg0KICAgYmxhY2tib3gtcmVxdWVzdEBvYmVyb24uY2hc
cGFyDQpccGFyDQpUbyBnZXQgYSBsaXN0IG9mIHZhbGlkIGUtbWFpbCBjb21tYW5kcyBhbmQgaW5z
dHJ1Y3Rpb25zIG9uIHRoZWlyIHVzYWdlLCBzZW5kIGEgbWVzc2FnZSBjb250YWluaW5nIHRoZSB3
b3JkICJoZWxwIiB0byB0aGUgYWJvdmUgYWRkcmVzcy5ccGFyDQpccGFyDQpTZW5kIGFueSBwcm9i
bGVtIHJlcG9ydHMgb3IgcXVlc3Rpb25zIHJlbGF0ZWQgdG8gdGhpcyBlbWFpbCBsaXN0IHRvIHRo
ZSBsaXN0IG93bmVyIGF0XHBhcg0KICAgb3duZXItYmxhY2tib3hAb2Jlcm9uLmNoXHBhcg0KXHBh
cg0KQ3VycmVudCBwb3N0aW5nIHBvbGljeTpccGFyDQpccGFyDQphKSBUbyBwb3N0IHlvdSBzaG91
bGQgdXNlIHRoZSBzYW1lIGFkZHJlc3MgYnkgd2hpY2ggeW91IGFyZSBzdWJzY3JpYmVkIHRvIHRo
ZSBtYWlsaW5nIGxpc3QuIFRoYXQgd2F5LCB0aGUgbGlzdCBzZXJ2ZXIgd2lsbCByZWNvZ25pemUg
eW91IGFzIHN1YnNjcmliZXIgYW5kIGZvcndhcmQgeW91ciBwb3N0aW5nIGltbWVkaWF0ZWx5LCB3
aXRob3V0IGNyZWF0aW5nIGFueSBvdmVyaGVhZC5ccGFyDQpccGFyDQpiKSBJZiwgZm9yIHNvbWUg
cmVhc29uLCB5b3UgY2Fubm90IHBvc3QgZnJvbSB0aGUgYWRkcmVzcywgYnkgd2hpY2ggeW91IGFy
ZSBzdWJzY3JpYmVkLCB5b3VyIG1lc3NhZ2Ugd2lsbCBiZSBtb2RlcmF0ZWQgdG8gYXZvaWQgc3Bh
bS4gUGxlYXNlIHVuZGVyc3RhbmQgdGhhdCBtb2RlcmF0aW9uIHdpbGwgb2Z0ZW4gY2F1c2Ugc29t
ZSBkZWxheSwgaW4gcGFydGljdWxhciBvdmVyIHdlZWtlbmRzIG9yIGhvbHlkYXlzLlxwYXINClxw
YXINCn0=


----boundary-LibPST-iamunique-870045469_-_---
Received on Tue Mar 30 2004 - 16:10:31 UTC

This archive was generated by hypermail 2.3.0 : Thu Sep 26 2013 - 06:28:48 UTC