Changeset 738 for cprs/branches/tmg-cprs/CPRS-Chart/fImages.pas
- Timestamp:
- Apr 19, 2010, 5:24:20 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
cprs/branches/tmg-cprs/CPRS-Chart/fImages.pas
r735 r738 99 99 CurImageToLoad : integer; 100 100 InTimerFn : Boolean; 101 DropBoxDir : string;102 UseDropBox : boolean;103 101 procedure EnsureImageListLoaded(); 104 102 procedure ClearImageList(); … … 112 110 public 113 111 CacheDir : AnsiString; 112 UseDropBox : boolean; 113 DropBoxDir : string; 114 114 NullImageName : AnsiString; 115 115 function Decode(input: AnsiString) : AnsiString; … … 214 214 if not DirectoryExists(CacheDir) then ForceDirectories(CacheDir); 215 215 216 UseDropBox := uTMGOptions.ReadBool('Use dropbox directory for transfers',false); 216 //UseDropBox := uTMGOptions.ReadBool('Use dropbox directory for transfers',false); 217 if uTMGOptions.ReadInteger('ImageTransferMethod',0) = 0 then begin 218 UseDropBox := True; 219 end else begin 220 UseDropBox := False; 221 end; 217 222 DropBoxDir := uTMGOptions.ReadString('Dropbox directory','??'); 218 223 if DropBoxDir='??' then begin //just on first run.
Note:
See TracChangeset
for help on using the changeset viewer.