Interessantes Beispiel was Himitsu da gepostet hat
Delphi-Quellcode:
function Test: string;
begin
Result := Result + 'a';
end;
for i := 1 to 5 do
S := Test;
ShowMessage(S); // 'aaaaa'
nicht nur, das ich ein seltsames Ergebnis bei einer fehlenden Initialisierung bekomme, nein, mein Virenscanner hat auch einen Trojaner gefunden:
Zitat:
Fuery.A!Cl
Kategorie: Trojaner
Beschreibung: Dieses Programm ist gefährlich. Es führt Befehle eines Angreifers aus.
Empfohlene Aktion: Entfernen Sie diese Software unverzüglich.
Elemente:
file:C:\compiler\borland\delphi7\Projects\Project1 .exe
process:pid:1048,ProcessStart:131683403956390456
Gruß
K-H