怎么判断TEdit中输入的内容是大写和小写的混合

如何判断TEdit中输入的内容是大写和小写的混合?
1.如何判断TEdit中输入的内容是大写和小写的混合

2.如何判断TEdit中输入的内容是数字和字符的混合

------解决方案--------------------
1
procedure TForm1.Edit3KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['a'..'z','A'..'Z'] )THEN
KEY:=#0;
end;