- 博客(10)
- 资源 (3)
- 收藏
- 关注
原创 CSDN问答:Delphi中如何保存Webbrowser中的页面到图片
procedure GenerateJPEGfromBrowser(browser: iWebBrowser2; jpegFQFilename: string; srcHeight: integer; srcWidth: integer;
2005-07-28 08:39:00 4816
原创 Merlion.Common.Base64Decoder
public class Base64Decoder { char[] source; int length, length2, length3; int blockCount; int paddingCount; public Base64Decoder(char[] input) { int temp = 0; source = input; length = inp
2005-07-26 13:31:00 2239
原创 Merlion.Common.Base64Encoder
public class Base64Encoder { byte[] source; int length, length2; int blockCount; int paddingCount; //Encode from string, include charset public Base64Encoder(StringBuilder s, string charset) {
2005-07-26 13:30:00 2107
原创 .NET 2.0中发送邮件的问题
写了一个发送邮件的类: public class SendMail { private static string m_UserName; private static string m_Password; private static string m_HostName; static string returnMSG = ""; public static void NewMailS
2005-07-24 22:36:00 5048 4
原创 2005年7月16日李开复与学生对话的谈话记录
当前聊天室活动 : 论坛管理员 (发贴人):李开复博士拥有卡内基梅隆大学计算机科学博士学位。他曾以最高荣誉毕业于哥伦比亚大学,获计算机学士学位。李开复博士是美国电气和电子工程师协会院士。Kai-Fu (专家):问: 对了,开复先生,您第一天工作的感觉是什么?答: 我第一天在苹果工作的时候,“体验文化“是最重要的。我和每一个同事约了一小时的会议或午餐,以一对一的方式理解:(1)他们的个人背景(不要低
2005-07-16 11:29:00 4079
原创 简单的获得两个字符串相似度的代码
自己瞎想出来的,每个字符都有一个权值,字符串前面1/3的权值是3,中间1/3是2,最后1/3是1。总权值就是所有字符的权值相加。然后两个字符串从开始一个一个字符的对比,相同的就加上这个字符的权值。最后得到的权值乘以100去除总权值,得到的就是一个0-100的基本权值。然后用:(两个字符串长度差 * 40) div 短字符串长度得到一个差值(如果 两个字符串长度差 > 短字符串长度 直接设差值为40
2005-07-15 18:20:00 2218
原创 Delphi POPUP blocker
unit Unit1;{$WARN SYMBOL_PLATFORM OFF}interfaceuses Windows, ActiveX, Classes, ComObj, shdocvw, mshtml;type TpopBlocker = class(TComObject, IDispatch, IObjectWithSite) protected function GetType
2005-07-13 19:57:00 2164
原创 微软专家论坛上的问题(XML)
我有这样一个XML: Rui Chen First Name Last Name Submit1 转换的XSL是这样写的:xmlns:xsl="http://www.w3.org/1999/XSL/Transform"> My Test
2005-07-08 12:10:00 353
原创 CSDN问答:用UrlDownloadToFile下载时得到下载的进度(转载)
frmUpdate = class(TForm,IBindStatusCallback) ImgTop: TImage; LblTop: TLabel; SpdBtnClose: TSpeedButton; Bevel1: TBevel; plStatus: TPanel; plInfo: TPanel; btnCancel: TFlatSpeedButt
2005-07-06 15:35:00 4179 2
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人