Запись строки в буфер обмена

@Kealfeyne · Регистрация: 08.02.2018

Author24 — интернет-сервис помощи студентам

Как записать строку в буфер обмена?

@Hitoku · 01.04.2018, 23:05

Pascal

{$apptype windows}
 
uses System.Windows.Forms;
begin
  Clipboard.SetText('Текст');
end.

@Kealfeyne · 01.04.2018, 23:38 **[ТС]**

Выдает ошибку:
Пространство имен 'System.Windows.Forms' не найдено

@volvo · 02.04.2018, 00:02

Это точно про PascalABC.NET? Тут не должно выдавать такой ошибки, если только компилятор не очень старый. Для очень старого - вот так:

Pascal

{$reference 'System.Windows.Forms.dll'}
uses System.Windows.Forms;
begin
  Clipboard.SetText('Текст');
end.

@Kealfeyne · 02.04.2018, 19:56 **[ТС]**

Выдает ошибку.
Unhandled Exception: System.Threading.ThreadStateException: Текущий поток должен быть задан как поток однопоточного контейнера (STA), чтобы вызовы OLE стали возможны. Проверьте, что ваша функция Main помечена атрибутом STAThreadAttribute.
в System.Windows.Forms.Clipboard.SetDataObject(Object data, Boolean copy, Int32 retryTimes, Int32 retryDelay)
в System.Windows.Forms.Clipboard.SetText(String text, TextDataFormat format)
в Program1.Program.$Main() в C:\Users\sanch\Desktop\Program1.pas:строка 7

Pascal

{$reference 'System.Windows.Forms.dll'}
uses 
  System.Windows.Forms;
var
  r:string;
begin
  Clipboard.SetText('Текст');
  readln(r);
end.

Паскаль скачивал месяц назад с оф. сайта.

@Hitoku · 02.04.2018, 20:40

Попробуйте всё вместе

Pascal

1 2	{$apptype windows} {$reference 'System.Windows.Forms.dll'}

@Kealfeyne · 02.04.2018, 21:22 **[ТС]**

Помогло, спасибо большое

@Kealfeyne 0 / 0 / 0 Регистрация: 08.02.2018 Сообщений: 12
		1
	Запись строки в буфер обмена 01.04.2018, 22:40. Показов 2123. Ответов 6 Метки нет (Все метки) Как записать строку в буфер обмена? 0

@Kealfeyne 0 / 0 / 0 Регистрация: 08.02.2018 Сообщений: 12
	01.04.2018, 23:38 [ТС]	3
	Выдает ошибку: Пространство имен 'System.Windows.Forms' не найдено 0

@Kealfeyne 0 / 0 / 0 Регистрация: 08.02.2018 Сообщений: 12
	02.04.2018, 21:22 [ТС]	7
	Помогло, спасибо большое 0

Запись строки в буфер обмена

Решение