[Bargest]

что скорость сравнения символа с символом проходит гораздо дольше сравнения числа с числом.

Гм.

Код:

var ac, bc: AnsiChar;
    ai, bi: byte;
    fc, fi: boolean;
begin
asm nop;nop;nop;nop;end;
    fc := ac = bc;
    fi := ai = bi;
end.

Компилируем.

Код:

nop
nop
nop
nop
// первая строка
mov     al, ds:byte_421ED8
cmp     al, ds:byte_421ED9
setz    ds:byte_421EDC
// вторая строка
mov     al, ds:byte_421EDA
cmp     al, ds:byte_421EDB
setz    ds:byte_421EDD

Найди 5 отличий.