#9'});'
'});'
'')
- Left = 104
+ Left = 184
Top = 272
end
object title: TPageProducer
' <ui class="pagination justify-content-center pagination-sm">'
' <#link>'
' </ui>'
- '</nav> <#recent>')
+ '</nav>')
OnHTMLTag = footerHTMLTag
Left = 112
Top = 192
Exit;
end;
if CellRow mod 2 = 0 then
- BgColor:='Maroon';
+ BgColor:='snow';
case CellColumn of
0:
CellData := Format('<input name=check%d type=checkbox>', [CellRow]);
else
t:=data[1].VString^;
if Data[2].VBoolean = true then
- begin
- s := ' active';
- t := '<span class=page-link>' + t +
- '<span class=sr-only>(current)</span></span>';
- end
+ s := ' active'
else
s := '';
result := Format