C
chy.com
Unregistered / Unconfirmed
GUEST, unregistred user!
如何将一个.jpg文件复制到另外的目录
//将选定的图片拷贝到目的目录，更名存放;
procedure CopyPicture();
var
temp:string;
temp1:string;
pstr1
char;
pstr2char;
begin
temp:=ExtractFileName(Form1.Edit2.Text);
temp2:='htm/'+temp;
CopyFile(Form1.Edit2.Text,temp2,True);
end;
老告诉我类型不匹配，当然里面还有错，请高手执教。
//将选定的图片拷贝到目的目录，更名存放;
procedure CopyPicture();
var
temp:string;
temp1:string;
pstr1
char;pstr2
char;begin
temp:=ExtractFileName(Form1.Edit2.Text);
temp2:='htm/'+temp;
CopyFile(Form1.Edit2.Text,temp2,True);
end;
老告诉我类型不匹配，当然里面还有错，请高手执教。
