Memo-Feld - Trojaner (Kaspersky)

[Peter_Panther]

Also, zum Abschluss:

Wollte dieses Problem heute nochmal einen Freund vorfuehren und siehe da - es klappte!
Vielleicht sollte ich bei Borland nun oefter auf den "Vorfuehreffekt" setzen ?

Kann mir immer noch nicht so ganz erklaeren wo nun das Problem lag.

Mir ist aber noch etwas eingefallen.
Bevor diese ganzen Trojanererrors kamen, hatte ich folgenden Quellcode (mit Memo)
fehlerfrei ausfuehren koennen.

Delphi-Quellcode:

procedure Tform1.Laden1.Click(Sender:TObject);
begin
 if OpenDialog1.Execute then begin
  Memo1.Lines.LoadFromFile(OpenDialog1.FileName);
end;
end;

Danach, allerdings bei einem neuen Projekt, kam dann der Fehler.