Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/Option.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 635 |
//スタイルシートファイル名一覧 |
//スタイルシートファイル名一覧 |
| 636 |
FileList := TStringList.Create; |
FileList := TStringList.Create; |
| 637 |
try |
try |
| 638 |
|
FileList.BeginUpdate; |
| 639 |
GikoSys.GetFileList(GikoSys.GetStyleSheetDir, '*.css', FileList, True, True); |
GikoSys.GetFileList(GikoSys.GetStyleSheetDir, '*.css', FileList, True, True); |
| 640 |
|
FileList.EndUpdate; |
| 641 |
Idx := Length(GikoSys.GetStyleSheetDir); |
Idx := Length(GikoSys.GetStyleSheetDir); |
| 642 |
for i := 0 to FileList.Count - 1 do |
for i := 0 to FileList.Count - 1 do |
| 643 |
FileList[i] := Copy(FileList[i], Idx + 1, Length(FileList[i])); |
FileList[i] := Copy(FileList[i], Idx + 1, Length(FileList[i])); |
|
|
Legend:
| Removed from v.1.71 |
|
| changed lines |
| |
Added in v.1.72 |
|
|
| |