Develop and Download Open Source Software

Browse CVS Repository

Diff of /gikonavigoeson/gikonavi/HTMLCreate.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.18 by h677, Sun Dec 11 03:06:48 2005 UTC revision 1.18.2.2 by h677, Sat Jan 7 05:09:33 2006 UTC
# Line 970  const Line 970  const
970          FORMAT_NOMAIL  = '<a name="%s"></a><div class="header"><span class="no"><a href="menu:%s">%s</a></span>'          FORMAT_NOMAIL  = '<a name="%s"></a><div class="header"><span class="no"><a href="menu:%s">%s</a></span>'
971                                          + '<span class="name_label">名前:</span> <span class="name"><b>%s</b></span>'                                          + '<span class="name_label">名前:</span> <span class="name"><b>%s</b></span>'
972                                          + '<span class="date_label">投稿日:</span> <span class="date">%s</span></div>'                                          + '<span class="date_label">投稿日:</span> <span class="date">%s</span></div>'
973                                          + '<div class="mes">%s</div>';                                          + '<div class="mes">%s</div>'#13#10;
974    
975          FORMAT_SHOWMAIL = '<a name="%s"></a><div class="header"><span class="no"><a href="menu:%s">%s</a></span>'          FORMAT_SHOWMAIL = '<a name="%s"></a><div class="header"><span class="no"><a href="menu:%s">%s</a></span>'
976                                          + '<span class="name_label"> 名前: </span><a class="name_mail" href="mailto:%s">'                                          + '<span class="name_label"> 名前: </span><a class="name_mail" href="mailto:%s">'
977                                          + '<b>%s</b></a><span class="mail"> [%s]</span><span class="date_label"> 投稿日:</span>'                                          + '<b>%s</b></a><span class="mail"> [%s]</span><span class="date_label"> 投稿日:</span>'
978                                          + '<span class="date"> %s</span></div><div class="mes">%s </div>';                                          + '<span class="date"> %s</span></div><div class="mes">%s</div>'#13#10;
979    
980          FORMAT_NOSHOW = '<a name="%s"></a><div class="header"><span class="no"><a href="menu:%s">%s</a></span>'          FORMAT_NOSHOW = '<a name="%s"></a><div class="header"><span class="no"><a href="menu:%s">%s</a></span>'
981                                          + '<span class="name_label"> 名前: </span><a class="name_mail" href="mailto:%s">'                                          + '<span class="name_label"> 名前: </span><a class="name_mail" href="mailto:%s">'
982                                          + '<b>%s</b></a><span class="date_label"> 投稿日:</span><span class="date"> %s</span></div>'                                          + '<b>%s</b></a><span class="date_label"> 投稿日:</span><span class="date"> %s</span></div>'
983                                          + '<div class="mes">%s </div>';                                          + '<div class="mes">%s</div>'#13#10;
984    
985  var  var
986          i: integer;          i: integer;
# Line 1045  begin Line 1045  begin
1045                                          else if GikoSys.Setting.ShowMail then                                          else if GikoSys.Setting.ShowMail then
1046                                                  doc.Write(Format(FORMAT_SHOWMAIL, [No, No, No, Res.FMailTo, Res.FName, Res.FMailTo, Res.FDateTime, Res.FBody]))                                                  doc.Write(Format(FORMAT_SHOWMAIL, [No, No, No, Res.FMailTo, Res.FName, Res.FMailTo, Res.FDateTime, Res.FBody]))
1047                                          else                                          else
1048                                                  doc.Write(Format(FORMAT_NOSHOW, [No, No, No, Res.FName, Res.FDateTime, Res.FBody]));                                                  doc.Write(Format(FORMAT_NOSHOW, [No, No, No, Res.FMailTo, Res.FName, Res.FDateTime, Res.FBody]));
1049                                  end;                                  end;
1050    
1051                                  if ThreadItem.Kokomade = (i + 1) then begin                                  if ThreadItem.Kokomade = (i + 1) then begin

Legend:
Removed from v.1.18  
changed lines
  Added in v.1.18.2.2

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26