Stringvergleich nicht wie gewünscht

[ripper8472]

Code:

int stricmp(const char *a, const char *b)
{
    int res;
    while (!(res = tolower(*a) - tolower(*b)) && *a++ && *b++);
    return res;
}

wenn das einer nach delphi uebersetzen kann, viel spass damit. hab ich ausm netz gefischt.
funktioniert eventuell besser als das vorgefertigte etwas aus der borland-trickkiste.