DrawCell vom Drawgrid belegt ganzes Programm

[David Martens]

Nur so ein Vorschlag, damit wird dein Programm nicht schneller aber, ich finde, es wird übersichtlicher:

Delphi-Quellcode:

case StrUtils.AnsiIndexStr(sourcestring, ['foo','bar']) of
  0:;
  1:;
end;