[Error]

Здравствуйте, скажите как сравнить две строки с разным регистром?
Пример:

Код:

var a, b : string;
begin
a := '6CD9A30B354B99B9ED219A51773A0AACF';
Label1.Caption := a;
b := Edit1.Text;
if a=b then
begin
label3.Caption:='Pass';

К примеру, если значение Edit'a на конце равняется не AACF а - aACf, то это нормально.