En tu código eso es algo normal
No es un bug, mas bien no estas haciendo las cosas correctamente
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.SelectAll;
Edit1.CopyToClipboard;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Edit2.Clear;
Edit2.PasteFromClipboard;
end;
Salud OS