From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-0.9 required=5.0 tests=BAYES_00,FORGED_GMAIL_RCVD,
	FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4
X-Google-Thread: a07f3367d7,3c8e96a2037c8989
X-Google-Attributes: gida07f3367d7,public,usenet
X-Google-NewGroupId: yes
X-Google-Language: ENGLISH,UTF8
Path: 
 g2news2.google.com!postnews.google.com!o9g2000prg.googlegroups.com!not-for-mail
From: Kylix <likai3g@gmail.com>
Newsgroups: comp.lang.ada
Subject: Re: Labels rotated 90 degrees in Jewl
Date: Fri, 24 Jul 2009 22:48:14 -0700 (PDT)
Organization: http://groups.google.com
Message-ID: <0be987f7-02f5-4cbf-917d-437ee988be68@o9g2000prg.googlegroups.com>
References: <325e7d4d-4992-4db6-b56b-2817e3c28d34@k1g2000yqf.googlegroups.com>
NNTP-Posting-Host: 113.90.189.228
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: quoted-printable
X-Trace: posting.google.com 1248500894 27778 127.0.0.1 (25 Jul 2009 05:48:14
 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Sat, 25 Jul 2009 05:48:14 +0000 (UTC)
Complaints-To: groups-abuse@google.com
Injection-Info: o9g2000prg.googlegroups.com; posting-host=113.90.189.228;
	posting-account=4uMkDwoAAACMyNluw6CdeU7BMSgYHFMk
User-Agent: G2/1.0
X-HTTP-UserAgent: Mozilla/5.0 (Windows; U; Windows NT 5.2; zh-CN;
 rv:1.9.0.12)
	Gecko/2009070611 Firefox/3.0.12,gzip(gfe),gzip(gfe)
Xref: g2news2.google.com comp.lang.ada:7336
Date: 2009-07-24T22:48:14-07:00
List-Id: <comp.lang.ada>

On 7=E6=9C=8822=E6=97=A5, =E4=B8=8B=E5=8D=888=E6=97=B621=E5=88=86, Pablo <p=
ablit...@gmail.com> wrote:
> Hi friends, I=C2=B4d like to set labels rotated 90 degrees in Jewl. Does
> someone know how to do it?
> Say us, for instance:
> My_Label : Label_Type :=3D Label =C2=A0(My_Frame, (10, 250), 50, 20, "My
> Text");
>
> I want ' "My Text" ' string be disposed in vertical writting.
>
> Regards.
> Pablo.

Adjust the width & height, the label will display the vertical text;

My_Label : Label_Type :=3D Label(My_Frame, (10, 250), 10, 50, "My Text");