Хотите раскрутить свой сайт в Яндекс и Google?
Недорогое и качественное продвижение сайта от 50$

Поддержка Cut Copy Paste II

Свойство формы ActiveControl позволяет вам получить ссылку на активный в данный момент элемент управления. Но не все элементы управления могут работать с буфером обмена. Если вы хотите работать только с компонентами Edit и Memo, то вот самый простой метод:

ActiveControl.Perform( WM_COPY, 0, 0 );

для CopyToClipboard и:

ActiveControl.Perform( WM_PASTE, 0, 0 );

для PasteFromClipboard.

Если элемент управления "не понимает" посланных сообщений, то это никак не скажется на его работе, он просто проигнорирует их.

Другим способом является проверка типа во время выполнения приложения:

If ActiveControl Is TCustomEdit Then

TCustomEdit(ActiveControl).CopyToClipboard;

- Peter Below [000851]

Материалы, которые находятся на этой страничке, любезно предоставлены Игорем Ивановым

РЕКЛАМНЫЙ БЛОК