Oberon/F:Embedding Rulers.

Article View: comp.lang.oberon

Article #719

#719

From: JENKINS BART MBA
Date: Wed, 20 Dec 1995 23:36

24 lines
1159 bytes

I have a TextView.View that displays a list of 5 columns of data.  I would
like to insert a TextRulers.Ruler before my data so I can format and align
my columns.  Below is a snippet of code that I tried, and, although compiled,
it did not do anything.  Could someone help?  My gut tells me I'm way off 
here.  Thanks.
---------------------------------------------------------

VAR res: LONGINT; v: TextViews.View; term : LONGINT;
    t: TextModels.Model; tf: TextMappers.Formatter; 
    r: TextRulers.Ruler; a: TextModels.Attributes;
    p : TextRulers.Prop;
.......
    	v := TextViews.dir.New(t);	
	NEW(p);
	p^.tabs.tab[0].val := 180;
	v^.PollDefaults(r,a);
	r := TextRulers.dir.NewFromProp(p);
	v^.SetDefaults(r,a);



--
Bart W. Jenkins
MBA program, Solvay Business School

Technical Details

Message-ID: <4ba6mr$45h@rc1.vub.ac.be>

Path: arc1-ca.pugleaf.net!news.vub.ac.be!is2e!bjenkin

Show Full Headers

Complete Article Headers

Path: arc1-ca.pugleaf.net!news.vub.ac.be!is2e!bjenkin
From: bjenkin@vub.ac.be (JENKINS BART MBA)
Newsgroups: comp.lang.oberon
Subject: Oberon/F:Embedding Rulers.
Date: 20 Dec 1995 23:36:59 GMT
Organization: Brussels Free Universities (VUB/ULB), Belgium
Message-ID: <4ba6mr$45h@rc1.vub.ac.be>
NNTP-Posting-Host: is2e.bfu.vub.ac.be.
X-Newsreader: TIN [version 1.2 PL2]