createfile??

Question

我不太懂英文,谁能给我讲一下CREATEFILE这个函数呀??太谢谢了!!

Answer 1

function createfile(filename:string):integer;
就这么用吧
procedure filelookup(filename:string);
var
tempfile:file;
filehandle:integer;
begin
  if not fileexists(filename) then
    filehandle:=createfile(filename);
 if filehandle<>0 then
  showmessage('file create success')
 else 
  showmessage('Can not Create file');
end;

Answer 2

楼主，不是API里面的createfile函数的参数种类可不是谁都能用到的，讲解不可能面面俱到，咱们搞开发的，有时候还是以应用为主。需要什么就用什么吧。