meine StrCharCount geht nich...

[grenzgaenger]

Zitat von Nuclear-Ping:

Delphi ist "Objekt Pascal" und globale Variablen widersprechen dem Konzept von "objekt orientierter Programmierung". Sie sollten nur verwendet werden, wenn es nicht anders geht.

nicht nur dem objekt der objektorientierten programmierung ... sondern globale variablen sollten normal komplett vermieden werden... und sind nur bei wenigen ausnahmen zulässig... die angesprochene faulheit, ist jedenfalls kein grund dafür ..

hab mal kurz was runtergeschrieben...

Delphi-Quellcode:

function CountWords(Line: pChar; Word: string): integer;
var
 i: integer;
begin
 result := 0;
 for i := 0 to length(line) - length(word) do
 begin
  if pos(word, line) = 1 then
   inc(result);
  inc(line); 
 end;
end;

denke, dafür braucht man keine globalen variablen... zwar nicht besonders performant, aber der kollege braucht ja auch noch was zu tun...