今天在论坛上看到有测友提出怎么获取文件大小的问题,在WR TSL ONLINE RERERENCE 上查file相关函数,没找到,就想自己写一个函数.

基本思路:
   对WR比较熟悉的人都会知道它可以调用动态库的功能,因此只要我们自己用其他编程语言写一个动态库(我选择了用delphi),然后WR中调用动态库去获取文件大小

方法一:
编写动态库,以下是我的代码:

library filesize;

rc=getfilesize("D:\\getfilesize\\1.txt");成功地获取了1.txt的文件大小;

方法二:
      我到wr安装目录arch下去找一动态库filecomp.dll,利用dll函数查看器我找到了它有个叫ext_file_size的函数,从字面上理解应该是获取文件大小,于是我用WR调用试试,果然也能解决问题,我把他做成一个函数,供以后使用:

extern int ext_file_size(string);
public function getfilesize(in filename)
{
 auto size;
 load_dll(getenv("M_ROOT") & "\\arch\\filecomp.dll");
 size=ext_file_size(filename);
 return(size);
}

rc=getfilesize("D:\\getfilesize\\1.txt");