IGAME 2007-23-1 引用 Tup_loadcs类

来源:互联网 发布:林俊杰smg淘宝官网 编辑:程序博客网 时间:2024/05/16 18:50

var up1:Tup_loadcs;
str:string;
begin
  up1:=Tup_loadcs.Create;
  str:=up1.up(File1);
  TextBox_title.Text:='UpLoad/'+str;

end;

原创粉丝点击