Звучит как "посолить соль".
Что служит источником данных для копирования в буфер, - откуда вы заполняете его, не с потолка же?
Буфер можно сохранить в файл, предварительно проверив формат хранящихся в нем данных, - if ClipBoard.HasFormat(CF_TEXT) then ....
можно скинуть в TStringList или TMemo и сохранить встроенными функциями, - SaveToFile(...).
Для сохранения на рабочий стол необходимо применить функцию определения пути к специальным папкам
Код:
uses ShlObj;
....
function GetSpecialPath(CSIDL: word): string;
var s: string;
begin
SetLength(s, MAX_PATH);
if not SHGetSpecialFolderPath(0, PChar(s), CSIDL, true)
then s := '';
result := PChar(s);
end;
....
var
PathDesktop: string;
PathDesktop := GetSpecialPath(CSIDL_DESKTOP);
Больше вопросов, чем ответов!
