⑴ DELPHI 复制 黏贴 循环
下面这程序能把memo1里知晌伏面的拷到memo2里面搭携，点击一次复制一行，谨冲2次就复2行，你修改成你要的吧...
procere TForm1.Button1Click(Sender: TObject);
var
n:integer;
m:string;
begin
memo2.Clear;
i := i+1;
Button1.Caption := inttostr(i);
for n:=0 to i do
begin
m := memo1.Lines[n-1];
memo2.Lines.Insert(n-1,m);
end;
memo2.SelectAll;
memo2.CopyToClipboard;
end;
⑵ Delphi实现复制粘贴功能
procere TForm1.Button1Click(Sender: TObject);
begin
Memo1.SelectAll;
Memo1.CopyToClipboard;
Memo1.SetFocus;
end;
procere TForm1.Button2Click(Sender: TObject);
begin
Memo1.SelectAll;
Memo1.PasteFromClipboard;
Memo1.SetFocus;
end;
⑶ delphi中，把某一目录下所有的JPG文件移动到另一个目录下，怎么做实现呢，求大神指教
可以这么考虑!用FindFirst和FindNext可以遍历文件夹，将所有文件都列出来，然后通过ExtractFileExt这个函数判断文山尺件手旁类型，再然后用CopyFile函数复制就可以了
CopyFile函数F1里的函数原型
.
BOOLCopyFile(
LPCTSTRlpExistingFileName,//pointertonameofanexistingfile
LPCTSTRlpNewFileName,//pointertofilenametoto
BOOLbFailIfExists//flagforoperationiffileexists
);
参数定义1.源文件2.要复制毕唯橡到的目录+文件名3.是否覆盖
这里列到的函数在delphi自带的帮助文档里都有很详细的介绍和使用说明(快捷键F1)
⑷ Delphi 怎么制作复制文件夹程序
如问题所描述的，将C:abc 做成变量，迅蠢代码可以如下编写：
procereTForm1.btn1Click(Sender:TObject);
varsSource,sTarget:string;
begin
sSource:='c:abc';
sTarget:='d:abc';
WinExec('x'+sSource+''+sTarget+迹稿'姿昌孝/s/e',SW_HIDE);
end;
⑸ delphi如何复制文件夹
可以分步做嘛，先建立文件夹，再把文件复制到新的文件夹下，不是也能实现你的功能吗？
⑹ 用delphi复制文件夹
procere findAll(tmp:string;ss:TStrings);
var
sc:TSearchRec;
begin
if FindFirst(tmp+'\*.*',faAnyFile,sc)=0 then
begin
repeat
if (sc.Attr and faDirectory)=sc.Attr then
if sc.Name[1]<>'.' then
findAll(tmp+'\'+sc.Name+'\*.*',ss)
else
else
ss.Append(tmp+'凯铅\'+ sc.Name);
until FindNext(sc)<>0;
end;
FindClose(sc)
end;
这个函数是找tmp目录下面的所有文件，然后生成一个文件路径列激烂表。
有了路径列表
for i:=0 to sl.count-1 do
begin
file(sl[i],目盯铅好标路径+extractfilename(sl[i]));
end;
好了 have fun
⑺ 如何在delphi中快速复制文件
pascal式文件复制：
var
f,ff:file;
NumRead,NumWritten:Word;
buf:array[1..8192]ofbyte;
begin
assign(f,'a.jpg');
Reset(F,1);
assign(ff,'b.jpg');
Rewrite(ff,1);
repeat
BlockRead(F,buf,SizeOf(buf),NumRead);
blockWrite(ff,buf,NumRead,NumWritten);
until(NumRead=0)or(NumWritten<>NumRead);
CLOSE(FF);
Close(F);
end.
⑻ 怎么用delphi拷贝excel的时候，把格式也复制
1.如图，将单元格区域复制，并粘贴到另外的区域，很明显，粘贴后并没有所有的格式复制过来。特别是行高列宽。要重稿拍新调整很麻烦。
2.其在粘贴选项里选择保持“保留源列宽”就可以了。
3.第二种方法是选择性粘贴的方法键清羡，
正镇点鼠标右键→“选择性粘贴”命令，在对话框中选择“列宽”。
4.复制单元格保留单元格行高和列宽方法：
整行复制可以保留行高，整列复制可以保留列宽，都要保留就只有整表复制。
所以大家如何要同时保持行高和宽的话，要同是选择区域所在的行和列
⑼ delphi中如何实现文件的复制
用
CopyFile（'c:\123.txt','d:\123-备份.txt',False);
最后那个false，如果设置成true就是如果d盘存在123-备份.txt则不替换源文件，设置成false则替换
⑽ delphi6dataset复制
delphi6dataset复制方法如下。
1、要对Delphi6dataset进行复制，可以使用Delphi6自带的数据复誉谨制功能。
2、也可以使用第三方的数据复制工具来完成。
3、Delphi6dataset是一个由Delphi公司制作的数据集，它包含多个数据文件芹哪，其中包括历史交易庆首基数据、客户信息、市场资产等。