Notepad Clone... komm aber nich weiter =(

[Mirilin]

Delphi-Quellcode:

{kopieren}
procedure TMainForm.ButtonCopyClick(Sender: TObject);
begin
  Memo.CopyToClipboard;
end;

{ausschneiden}
procedure TMainForm.ButtonCutClick(Sender: TObject);
begin
  Memo.CutToClipboard;
end;

{einfügen}
procedure TMainForm.ButtonPasteClick(Sender: TObject);
begin
  Memo.PasteFromClipboard;
end;

Gruss Mirilin