将Text转换为Html(下)
2001-01-12 00:00:00·
符东亮·yesky
上一页 1 2 3 4 else
StrLine+=StrJ;
}
StrLine+="$#@60;/p$#@62;";
RichEdit2-$#@62;Lines-$#@62;Add(StrLine);
}
//根据已经缩进数用$#@60;/blockquote$#@62;进行配对
for(int k=CurIndent-IndentCount;k$#@62;0;k--)
{
StrSpaces=AnsiString::StringOfChar(" ", (k+CurIndent-2) * 2);
RichEdit2-$#@62;Lines-$#@62;Add(StrSpaces+"$#@60;/blockquote$#@62;");
}
RichEdit2-$#@62;Lines-$#@62;Add("$#@60;/body$#@62;");
RichEdit2-$#@62;Lines-$#@62;Add("$#@60;/html$#@62;");
if(Application-$#@62;MessageBox("文件已经转换成功！\n是否保存？","转换成功",48+MB_YESNO)==IDYES)
MenuSaveClick(NULL);
}
//--------------------------------------------------------------
//“关于”菜单项的OnClick事件：
void __fastcall TForm1::MenuAboutClick(TObject *Sender)
{
Application-$#@62;MessageBox("作者：符东亮","关于...",64);
}
//--------------------------------------------------------------
以上程序在Win98/Win2000，Borland C++ Builder 5.0 下运行通过。
上一页 1 2 3 4 |
.