Código Delphi [-]if Edit1.Sellength>0 then edit1.cuttoclipboard;
if Edit1.Sellength>0 then edit1.cuttoclipboard;