Code: Select all
StrCmp(Str1, Op, Str2, CS:=1) { ; requires AutoHotkey v1.1.31+
Local R, SCS := A_StringCaseSense
StringCaseSense, % (CS := !!CS)
Switch Op {
Case ">" : R := (Str1 > Str2)
Case ">=" : R := (Str1 >= Str2)
Case "<" : R := (Str1 < Str2)
Case "<=" : R := (Str1 <= Str2)
Case "==" : R := (Str1 == Str2)
Case "!=","<>" : R := (Str1 != Str2)
default : R := (CS ? (Str1 == Str2) : (Str1 = Str2))
}
StringCaseSense, %SCS%
Return R
}
#NoEnv
#Warn
#SingleInstance, Force
MsgBox % ("skan" != "SKAN") ; False
MsgBox % StrCmp("skan","!=","SKAN") ; True