Rev 8 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 8 | Rev 9 | ||
---|---|---|---|
Line 642... | Line 642... | ||
642 | function FileDoesExist(AFileName: string): boolean; |
642 | function FileDoesExist(AFileName: string): boolean; |
643 | begin |
643 | begin |
644 | {$IFDEF VIATHINKSOFT} |
644 | {$IFDEF VIATHINKSOFT} |
645 | if StartsText('EHDD:\', AFileName) then |
645 | if StartsText('EHDD:\', AFileName) then |
646 | begin |
646 | begin |
647 | // Attention: AllowFileCheck must be called to initialize cacheAconnected and cacheBconnected |
647 | // Attention: AllowFileCheck must be called to initialize cacheAconnected and cacheBconnected and cacheRconnected |
648 | 648 | ||
649 | if cacheAconnected and FileExists(StringReplace(AFileName, 'EHDD:\', |
649 | if cacheAconnected and FileExists(StringReplace(AFileName, 'EHDD:\', |
650 | GUID_EHDD_A, [])) then |
650 | GUID_EHDD_A, [])) then |
651 | exit(true); |
651 | exit(true); |
652 | 652 | ||
653 | if cacheBconnected and FileExists(StringReplace(AFileName, 'EHDD:\', |
653 | if cacheBconnected and FileExists(StringReplace(AFileName, 'EHDD:\', |
654 | GUID_EHDD_B, [])) then |
654 | GUID_EHDD_B, [])) then |
655 | exit(true); |
655 | exit(true); |
656 | 656 | ||
657 | if cacheBconnected and FileExists(StringReplace(AFileName, 'EHDD:\', |
657 | if cacheRconnected and FileExists(StringReplace(AFileName, 'EHDD:\', |
658 | GUID_EHDD_R, [])) then |
658 | GUID_EHDD_R, [])) then |
659 | exit(true); |
659 | exit(true); |
660 | 660 | ||
661 | exit(false); |
661 | exit(false); |
662 | end; |
662 | end; |