Probleme mit TMemo.Create

[Thorben_Ko]

da TMemo ein komponennte ist, musst du den parent setzen

Delphi-Quellcode:

procedure TextCopy(a, b: String); 
var Memo: TMemo; 
begin 
  if FileExists(a) then 
    begin 
    Memo:=TMemo.Create(self); 
    Memo.Parent := Form1;
    Memo.Lines.LoadFromFile(a); 
    Memo.Lines.SaveToFile(b); 
    Memo.Lines.Clear; 
    Memo.Free; //Freigeben net vergessen
    end; 
end;