вопрос | ответ |
---|---|
из программы в буфер обмена ВАРИАНТ 2 | Clipboard.AsText := Memo2.Text; Memo2.Text := Clipboard.AsText; |
из программы в буфер обмена | var h:THandle; begin Clipboard.Open; Clipboard.AsText := Memo1.Text; h := Clipboard.GetAsHandle(CF_TEXT); SetClipboardData |