What about using an image?
Then you don't have to rely on the font being there.
Stacey
> -----Original Message-----
> From: Robert Martin [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, 26 September 2001 2:25 p.m.
> To: Multiple recipients of list delphi
> Subject: Re: [DUG]: Unicode
>
>
> Thanks for your help. I decided that if I needed to modify my label
> component just for one character I would be better looking at
> alternatives.
> I found the same symbol in standard wingdings3 so Ive used
> that in another
> label beside the existing one. Not elegant but much less
> effort / time
> reqd.
>
> Robert Martin
> Software Engineer
> Wild Software Ltd
> ----- Original Message -----
> From: "Allan Vergara" <[EMAIL PROTECTED]>
> To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
> Sent: Wednesday, September 26, 2001 1:38 PM
> Subject: Re: [DUG]: Unicode
>
>
> > Standard Delphi 4 (i think 5 as well) don't support
> unicodes. If you want
> > to dispaly unicode you have to create ur own TLabel component by
> overriding:
> >
> > procedure DoDrawText(var Rect: TRect; Flags: Longint); override;
> >
> > Then on the implementation you should do the following:
> >
> > procedure ...DoDrawText(var Rect: TRect; Flags: Longint);
> > begin
> > ...
> > ExtTextOutW(Canvas.Handle, 1,1, ETO_CLIPPED, @Rect,
> > pWideChar(#9660), Length(#9660), nil);
> > ...
> > end;
> >
> > Hope this help.
> >
> >
> >
> > ----- Original Message -----
> > From: "Robert Martin" <[EMAIL PROTECTED]>
> > To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
> > Sent: Wednesday, September 26, 2001 1:30 PM
> > Subject: Re: [DUG]: Unicode
> >
> >
> > > It is supposed to be a solid downwards pointing arrow
> (as in the ones
> > used
> > > in outlook express). The font may need to be set to
> arial to get the
> > > correct result. Although after testing your code on my
> machine I get a
> ?
> > > mas well. The character map shows the character as U+25BC which I
> assume
> > > means 25BC Hex and converts to 9660 decimal.
> > >
> > >
> > > Robert Martin
> > > Software Engineer
> > > Wild Software Ltd
> > > ----- Original Message -----
> > > From: "Nello Sestini" <[EMAIL PROTECTED]>
> > > To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
> > > Sent: Wednesday, September 26, 2001 1:07 PM
> > > Subject: Re: [DUG]: Unicode
> > >
> > >
> > > > > I would like to display a unicode character in a
> TLabel. I tried
> > > > > Label.Caption := WideStrToString(#9660) but I get a
> '?' instead of
> > > > > the character I am after. Ideas?
> > > >
> > > > procedure TForm1.Button3Click(Sender: TObject);
> > > > const w:widestring = #9660;
> > > > begin
> > > > label1.caption:='abc'+w+'def';
> > > > end;
> > > >
> > > > When I do this and display the caption using MSSansSerif
> > > > I get a heavy dot below the baseline. What is #9660 supposed
> > > > to convert to?
> > > >
> > > > (If I try this with #9662 or #9663 i get "?"s - i.e. they don't
> > > > have single byte equivalents)
> > > >
> > > > -ns
> > > >
> > > >
> > > >
> > > >
> > >
> >
> >
> --------------------------------------------------------------
> ------------
> > > -
> > > > New Zealand Delphi Users group - Delphi List -
> [EMAIL PROTECTED]
> > > > Website: http://www.delphi.org.nz
> > > > To UnSub, send email to: [EMAIL PROTECTED]
> > > > with body of "unsubscribe delphi"
> > > > Web Archive at:
http://www.mail-archive.com/delphi%40delphi.org.nz/
> > >
> >
>
> --------------------------------------------------------------------------
> -
> > New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
> > Website: http://www.delphi.org.nz
> > To UnSub, send email to: [EMAIL PROTECTED]
> > with body of "unsubscribe delphi"
> > Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
> >
> >
>
>
> --------------------------------------------------------------------------
-
> New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
> Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
> Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
>
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
