String Einfärben - Mehrer Ereignisse...

[Namenloser]

Habe ich es richtig verstanden, dass es darum geht, die Ereignisse zu erkennen? Oder geht es darum, sie darzustellen.
Also das Erkennen würde ich so machen:

Delphi-Quellcode:

// cellstring ist der Inhalt der Zelle

if pos('+',cellstring) > 0 then // Überstunden
begin
  {...}
end;
if pos('-',cellstring) > 0 then // Minusstunden
begin
  {...}
end;
if pos('F',cellstring) > 0 then // Feiertag
begin
  {...}
end;

// und so weiter...