Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для opel431

Ветеран


Contributor


Сообщения: 1803
Благодарности: 714

Профиль | Отправить PM | Цитировать


Цитата turbolover:
Могу скопировать с файла в "Clipboard" а с "Clipboard" в файл неумею »
Вам уже неоднократно ответили, что то, что у вас в буфере, это строка - string!
Цитата turbolover:
ShowMessage(ClipBoard.AsText); »
ClipBoard.AsText, - это и есть string.
Как сохранить в файл? Тоже ответили, смотрите в справке и примените что-то одно:
1. TFile
2. TStringList
3. TFileStream

или, в современных версиях Delphi 2010 и выше TFile.WriteAllText. http://www.proghouse.ru/programming/...s#TFile_Create
Простой пример.
Код: Выделить весь код
uses 
  SysUtils, IOUtils; // добавим необходимые юниты
...

var
  s: string;
begin
  TFile.WriteAllText('C:\Test1\Test.txt', ClipBoard.AsText, TEncoding.ANSI); // пишем в кодировке ANSI
  s := TFile.ReadAllText('C:\Test1\test.txt')); // читаем
  ShowMessage(s): // выводим в сообщение
end;

-------
Хвала тому, кто встав среди камней, уча другого, сам будет умней.


Последний раз редактировалось opel431, 05-02-2019 в 21:04.

Это сообщение посчитали полезным следующие участники:

Отправлено: 20:59, 05-02-2019 | #12