|
|
|
|
Blog信息
 |
blog名称:四裤全输的小窝～～
日志总数:178
评论数量:699
留言数量:198
访问次数:1151061
建立时间:2005年10月29日 | |
|
|
|
|
 |
|
|
|
|
 [Ides]DELPHI中使用剪切板
原创空间 四裤全输 发表于 2005/11/10 22:01:00
|
USES
StdCtrls,Clipbrd;
......
procedure TForm1.CopyClick(Sender: TObject);
begin
Clipboard.AsText := Memo1.SelText;
end;
procedure TForm1.PastClick(Sender: TObject);
begin
Memo1.Text := Memo1.Text + Clipboard.AsText;
end;
|
| 阅读全文(7256) | 回复(3) | 编辑 | 精华 | 删除 |
|
|
|
|
|
|
|