Einzelne Buchstaben zählen und auflisten...

[bob_aus_der_flasche]

also so sieht mein prog jetz aus:

Delphi-Quellcode:

procedure TForm1.Test;
var
  Table: TCharCounterTable;
  C: Char;
begin
  Table := CountChars(listbox1.items.text);
  for C := #0 to #255 do
    if Table[C] > 0 then
      listbox2.items.add(C , ' = ' {fehler} , Table[C]: {fehler} 4);
end;

aber vor dem 2. Komma kommt ein fehler. "Zu viele Parameter"
und nach dem doppelpunkt vor der 4 kommt auch einer. " ')' erwartet aber ':' gefunden "

was is da falsch