Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
see this example:
after [file] put {{comment| {{count|ext.%item-ext%}} }}
Then, after the list you can put something like I saw {{count|ext.mp3}} mp3 files
Or you can store the value using {{set}}, as you wish.
procedure applySequential();main.pas line 8188
const
PATTERN = '%sequential%';
NBPATTERN= '%number-sequential%"
var
idx, p: integer;
idxS: string;
begin
idx:=0;
repeat
p:=pos(PATTERN, result);
if p = 0 then exit;
inc(idx);
idxS:=intToStr(idx);
delete(result, p, length(PATTERN)-length(idxS));
move(idxS[1], result[p], length(idxS));
until false;
repeat //replace all %number-sequential% by last value of %sequential%
p:=pos(NBPATTERN, result);
if p = 0 then exit;
delete(result, p, length(NBPATTERN)-length(idxS));
move(idxS[1], result[p], length(idxS));
until false;
end; // applySequential
if FA_VIS_ONLY_ANON in f.flags then
loadingVFS.visOnlyAnon:=TRUE;
if f.isVirtualFolder() then f.mtime:=f.atime;
if f.isLink() then f.mtime:=f.atime; // because [link]:%item-modified% give the instant server date-time when list created and can't be sort by time correctly
if assigned(f.uploadAccounts) and (f.resource > '') then
addString(f.resource, uploadPaths);
f.setupImage();
if after.resetLetBrowse then
f.recursiveApply(setBrowsable, integer(FA_BROWSABLE in f.flags));
end; // setVFS
object NoSort1: TMenuItemmain.pas line 612
Caption = 'No Sort'
GroupIndex = 1
RadioItem = True
OnClick = NoSort1Click
end
NoSort1: TMenuItem;
procedure NoSort1Click(Sender: TObject);main.pas line 7832
procedure TmainFrm.NoSort1Click(Sender: TObject);main.pas line 10284
begin defSorting:='nosort' end;
NoSort1.Checked:= defSorting='nosort';main.pas line 1166
if linksBefore and (f1.isLink() <> f2.isLink()) then
begin
if f1.isLink() then result:=-1
else result:=+1;
exit;
end;
if foldersBefore and (f1.isFolder() <> f2.isFolder()) then
begin
if f1.isFolder() then result:=-1
else result:=+1;
exit;
end;
result=0;
if defSorting = 'nosort' then exit;
case sortby of
SB_SIZE: result:=compare_(f1.size, f2.size);
SB_TIME: result:=-compare_(f1.mtime, f2.mtime);
SB_DL: result:=-compare_(f1.DLcount, f2.DLcount);
SB_EXT: result:=compareExt(f1.name, f2.name);
else result:=0;
end;
possible d'ajouter deux raccoucis clavier?pour la pcochaine version?
CTRL+F as ALT+F
and
F3 as click on GO button
comment:=foldergetDynamicComment();
addArray(result, [
'%folder-item-comment%', optUTF8(tpl, comment)
]);
if comment > '' then comment:=xtpl(tpl['folder-comment'], [
'%item-comment%', comment
]);
{{if| %folder-item-comment% | <div id=foldercomment>%folder-item-comment%</div> }}
{{if| %folder-item-comment% | %folder-comment% /if}}
[folder-comment]
<div id=foldercomment>%item-comment%</div>
Merci mars ! je vais essayer de transposer ton code dans une autre template, mais le process est bon : faire une recherche initiale puis un affichage du résultat en mode page/page ... excellent ! Million Thanks Mars !
You might want to make the following change to keep the text file out of the viewable file listing...Corrected, but error is in default template build 165
