DrawCell vom Drawgrid belegt ganzes Programm

[BeBored]

Spitze!
Ich habe nun alle Vorschläge umgesetzt und es schnurrt wie ein Kätzchen
Ich danke euch recht herzlich.

[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;