What kind of bug in the control is it?

Here is what I am doing for now to get around the problem,
I am intercepting the KeyPress of the memo, and changing the
keys as they are pushed.


procedure TformCreateMessage.memoMessageKeyPress(Sender: TObject; var Key:
Char);
begin
if (Key in ['a'..'z']) then
Key := char(ord(Key) - 32);
end;


Thanks
Michael L. Horne

> -----Original Message-----
> From:
> sentto-402930-3728-982077149-guardian=pobox.com@...
> [mailto:sentto-402930-3728-982077149-guardian=pobox.com@....
> com]On Behalf Of Jason Wharton
> Sent: Tuesday, February 13, 2001 10:05 AM
> To: IBObjects@yahoogroups.com
> Subject: Re: [IBO] TIB_Memo ignores Case setting in TIB_Query
>
>
> > TIB_Memo seems to ignore the case setting in the TIB_Query,
> > FieldProperties, CharCase. I set it to Upper and I can still
> > type lower in the memo.
> >
> > Looks like a bug to me.
>
> It's a bug in the control itself.
>
> Jason Wharton
> CPS - Mesa AZ
> http://www.ibobjects.com
>
>
>
>
>
>