1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
| [ ],方法名,所在檔名,行號,引用了什麼相依,方法描述(請手動填寫),原始程式碼片段
| [V],"TOldCaseInfoForm.Down_Img","OldCaseInfo.pas","131","FileExists","","if FileExists(Path+CaseID+'.zip') then"
| [V],"TOldCaseInfoForm.LoadImg","OldCaseInfo.pas","185","FileExists","","if FileExists(ImageSavePath+CaseID+'\'+UseCaseID+'\CaseDocNo.dat') then"
| [V],"TOldCaseInfoForm.LoadImg","OldCaseInfo.pas","186","LoadFromFile","","DocDirList.LoadFromFile(ImageSavePath+CaseID+'\'+UseCaseID+'\CaseDocNo.dat');"
| [V],"TOldCaseInfoForm.DocNo2DocName","OldCaseInfo.pas","233","FileExists","","if FileExists(ImageSavePath+CaseID+'\'+UseCaseID+'\DocNo_Name.dat') then"
| [V],"TOldCaseInfoForm.DocNo2DocName","OldCaseInfo.pas","234","LoadFromFile","","DocNo_DocNameList.LoadFromFile(ImageSavePath+CaseID+'\'+UseCaseID+'\DocNo_Name.dat',TEnCoding.UTF8);"
| [V],"TOldCaseInfoForm.Docdir2Pages","OldCaseInfo.pas","261","FileExists","","if FileExists(ImageSavePath+CaseID+'\'+UseCaseID+'\Context.dat') then"
| [V],"TOldCaseInfoForm.Docdir2Pages","OldCaseInfo.pas","262","LoadFromFile","","FileList.LoadFromFile(ImageSavePath+CaseID+'\'+UseCaseID+'\Context.dat');"
| [V],"TOldCaseInfoForm.ShowImage","OldCaseInfo.pas","317","FileExists","","if FileExists(ImageSavePath+CaseID+'\'+UseCaseID+'\Context.dat') then"
| [V],"TOldCaseInfoForm.ShowImage","OldCaseInfo.pas","318","LoadFromFile","","FileList.LoadFromFile(ImageSavePath+CaseID+'\'+UseCaseID+'\Context.dat');"
| [V],"TOldCaseInfoForm.ErrFormtoCurrentForm","OldCaseInfo.pas","382","LoadFromFile","","DocNoList.LoadFromFile(ImageSavePath+CaseID+'\'+UseCaseID+'\CaseDocNo.dat',Tencoding.UTF8);"
| [V],"TOldCaseInfoForm.ErrFormtoCurrentForm","OldCaseInfo.pas","400","RenameFile","","RenameFile(iPath+OldFile,iPath+NewFile);"
| [V],"TOldCaseInfoForm.ErrFormtoCurrentForm","OldCaseInfo.pas","401","SaveToFile","","FileList.SaveToFile(iPath+'Context.dat',Tencoding.UTF8);"
| [V],"TOldCaseInfoForm.ErrFormtoCurrentForm","OldCaseInfo.pas","412","MoveFile","","//MoveFile(PWideChar(iPath),PWideChar(iiPath));"
| [V],"TOldCaseInfoForm.ISBClick","OldCaseInfo.pas","595","LoadFromFile","","ISB1.LoadFromFile(SelectISB.FileName,1);"
| [V],"TOldCaseInfoForm.LoadBtClick","OldCaseInfo.pas","812","FileExists","","if not FileExists(imageSavePath+CaseID+'\'+UseCaseID+'\Context.dat') then"
| [V],"TOldCaseInfoForm.LoadBtClick","OldCaseInfo.pas","814","DirectoryExists","","if DirectoryExists(ImageSavePath+CaseID+'\'+UseCaseID) then"
| [V],"TOldCaseInfoForm.LoadBtClick","OldCaseInfo.pas","815","_DelTree","","_Deltree(ImageSavePath+CaseID+'\'+UseCaseID);"
|
|
