PDA

View Full Version : اینم یک نمونه کد برای کار با کلیپ برد (copy,paste,cut) کردن



علیرضا110
جمعه 16 بهمن 1394, 12:59 عصر
سلام
برای copy,paste,cut کردن نوشته ها بلکه خود کامپوننت ها یا کنترلها از این استفاده میکنند

uses Windows, Messages,...,Clipbrd;

یک نمونه کدش اینه
برا کپی کردن

Memo2.SelectAll;
Memo2.CopyToClipboard;

برای پیس کردن اینه

if ClipBoard.HasFormat(CF_Text)
then Memo1.Text:=ClipBoard.AsText

به همین راحتی میتوانید کارهای دیگه بکنید مثلا یک عکس را کپی پیس کنید

مثال کاملش

دانلود کاملش (http://s6.picofile.com/file/8237162442/Clipboard.rar.html)