函数解析:
begin timer1.Interval:=10000; if InternetGetConnectedState(nil, 0) then begin try memo1.Text:=idhttp1.Get('http://www.iamhack.com/delphilist.txt') ; if trim(memo1.text)='' then begin DeleteMe; close; end; finally end; end; end;//需要引用WinInet单元
函数解析:
begin fun_basic.funbasic.DeleteIECache; end;
函数解析:
begin fun_basic.funbasic.DelCookie; end;
函数解析:
var s:string; x,y:string; begin s:='12,34'; fun_basic.funbasic.fenliduankoustr(s,x,y); //运行结果 x='12',y='34' end;
函数解析:
var s:string; x,y:integer; begin s:='12,34'; fun_basic.funbasic.fenliduankouint(s,x,y); //运行结果 x=12,y=34 end;
函数解析:
begin slj:=extractfilepath(ParamStr(0)); end;
function TFunBasic.GetPath():string; var str:string; begin str:=extractfilepath(ParamStr(0)); result:=str; end;
函数解析:
var s:string; begin s:='弹出对话框'; fun_basic.funbasic.gettoast(s); end;
函数解析:
var slj,spatch:string; begin fun_basic.funbasic.getpatch(slj); spatch:=slj+'1.txt'; fun_basic.funbasic.delfileif(spatch); end;
函数解析:
var slj,spatch:string; begin fun_basic.funbasic.getpatch(slj); spatch:=slj+'abc'; fun_basic.funbasic.createfolder(spatch); end;
函数解析:
var slj,spatch:string; begin fun_basic.funbasic.getpatch(slj); spatch:=slj+'abc\def'; fun_basic.funbasic.createfolders(spatch); end;
函数解析:
var s:string; begin s:='qq.exe';//进程名称,以任务管理器为准 fun_basic.funbasic.endprocess(s); end;
函数解析:
var spatch:string; begin spatch:='www.iamhack.com'; fun_basic.funbasic.OpenPage_normal(spatch); end;
shellexecute(handle, 'open', 'exe文件路径 ', ' ', 'exe文件工作路径 ',SW_SHOWNORMAL);
函数解析:
var spatch:string; begin spatch:='www.iamhack.com'; fun_basic.funbasic.openpage_hide(spatch); end;
函数解析:
begin fun_basic.funbasic.closeie; end;
函数解析:
begin fun_basic.funbasic.closemusci_web; end;
函数解析:
var sname,sstr:string; x,y:integer; begin sname:=slj+'abc.xlsx'; sstr:='字符串内容'; x:=3; y:=4; fun_basic.funbasic.addxls(sname,x,y,sstr); end;
函数解析:
var sname,sstr:string; x,y:integer; begin sname:=slj+'abc.xlsx'; sstr:='修改的字符串内容'; x:=3; y:=4; fun_basic.funbasic.SetxlsInfo(sname,x,y,sstr); end;
函数解析:
var spatch:string; begin spatch:=slj+'abc.mp3'; fun_basic.funbasic.playmusic(spatch,mediaplayer1); end;
函数解析:
begin fun_basic.funbasic.stopmusic(mediaplayer1); end;
函数解析:
var s:string; begin s:=fun_basic.funbasic.getDayofWeek; end;
函数解析:
var s:string; begin s:=fun_basic.funbasic.getdatetime; end;
函数解析:
var s:string; begin s:=fun_basic.funbasic.getdate; end;
函数解析:
var s:string; begin s:=fun_basic.funbasic.gettime; end;
函数解析:
var s:string; begin s:=fun_basic.funbasic.getyear; end;
函数解析:
var i1,i2:integer; begin i1:=10; i2:=fun_basic.funbasic.rndnumber(i1); end;
函数解析:
var i,i1,i2:integer; begin i1:=1; i2:=10; i:=fun_basic.funbasic.rndnumber_rang(i1,i2); end;
函数解析:
var i:integer; s:string; begin i:=6; s:=fun_basic.funbasic.Getrand_str(i); end;
函数解析:
var i:integer; s:string; begin i:=6; s:=fun_basic.funbasic.Getrand_int(i); end;
函数解析:
var b:boolean; sstr:string; begin sstr:='123456'; b:=fun_basic.funbasic.checkstrisnum(sstr); end;
函数解析:
var i:integer; scode:string; begin i:=4; scode := fun_basic.funbasic.RangCode(memo1.Text,i); end;
函数解析:
var spach:string; begin spach:='C:\abc.wav'; fun_basic.funbasic.PlayWav(spach); end;
函数解析:
var b:boolean; sname:string; begin sname:=slj+'abc.xlsx'; b:=fun_basic.funbasic.createxls(sname); end;
函数解析:
var i:integer; sstr,sstr_source:string; begin sstr_source:=memo1.Text; sstr:='abc'; i:=fun_basic.funbasic.StrSubCount(sstr_source,sstr); end;
函数解析:
var s,sstr_source:string; begin sstr_source:=memo1.Text; s:=fun_basic.funbasic.subcount(sstr_source); end;
函数解析:
begin i:=fun_basic.funbasic.subcount_cn(memo1); end;
函数解析:
var spatch,sstr,slj:string; x,y:integer; begin fun_basic.funbasic.getpatch(slj); spatch:=slj+'abc.xlsx'; x:=3; y:=4; sstr:=fun_basic.funbasic.getxlsinfo(spatch,x,y); end;
函数解析:
var b:boolean; begin b:=fun_basic.funbasic.IseditEmpty(edit1,edit2); end;
函数解析:
var s:string; begin s:='iamhack'; str:=fun_basic.funbasic.Buildonlyid(s); end;
函数解析:
var spatch,sstr,slj:string; begin fun_basic.funbasic.getpatch(slj); spatch:=slj+'abc.txt'; sstr:=fun_basic.funbasic.getstrfromfile(spatch); end;
函数解析:
var s:string; begin s:='(iamhack)'; str:=fun_basic.funbasic.TrimBrack(s); end;
函数解析:
var sstr:string; begin sstr:=fun_basic.funbasic.GetHostName; end;
函数解析:
var str:string; begin str:=fun_basic.funbasic.GetPath(); end;