请问：如何在不打开一个.txt文件的情况下，将其内容全部复制到剪贴板上。（不限制文本文件大小）

[baby999]

[TechnoFantasy]

不打开怎么获得文本？
www.applevb.com

[sundayboys]

不打开？是指什么不打开？

[baby999]

不打开是指：不用可视控件读取并显示在自己的application里，而是在后台实现该功能

[TechnoFantasy]

读出来再用Clipboard.SetTextBuf发送到剪贴板

[baby999]

我就是想知道用什么方法读txt文件

[SAsura]

var
r:TStrings;
begin
r:=TStringList.Create;
r.LoadFromFile('文件名');
...
r.Destroy;
end;

[Java_SCU]

可以这样：
uses clipbrd;

procedure XXXX
var
t: TStringList;
begin
t:= TStringList.Create;
try
t.LoadFromFile('文件名');
Clipboard.AsText:= t.Text;
finally
t.Destroy;
end;
end;

[bill_lasker]

这问题有点意思！

[baby999]

我还想知道TStrings的内容如何copy到剪贴板中