Uppercasing Characters in TWebDBInput

Can anyone think of why this doesn't work in OnKeyPress

if (Key in ['a'..'z']) then
    Key := UpCase(Key);

Set edit.CharCase = wecUppercase

Apologies, I was thinking of a more specific case, where certain characters needed to be uppercased, not all. I just tried that to see if it worked, and it didn't.

This topic was automatically closed 60 minutes after the last reply. New replies are no longer allowed.