Thema: Delphi Buchstaben zählen

Einzelnen Beitrag anzeigen

Medium

Registriert seit: 23. Jan 2008
3.686 Beiträge
 
Delphi 2007 Enterprise
 
#2

Re: Buchstaben zählen

  Alt 23. Sep 2009, 18:02
Im Grunde kannst du dafür eine Art Histogramm erstellen. Wichtig ist dabei nur, dass du weisst was eine Bei Google suchenASCII Tabelle ist, also dass Zeichen letztlich auch nur Zahlen sind - nur anders dargestellt.

Delphi-Quellcode:
var
  s: String;
  i: Integer;
  hist: array[byte] of Integer;
begin
  s := 'Der Hund jagt die Katze';
  for i := 1 to Length(s) do
    inc(hist[Ord(s[i])]);
end;
In hist[65] (bzw. hist[Ord('A')], da Ord('A') = 65) steht hiernach z.B. wie viele große 'A' im String sind.
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)
  Mit Zitat antworten Zitat