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...