自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(3)
  • 收藏
  • 关注

原创 delphi webbrowser 模拟表单提交

procedure TForm9.PINGLUN(Title,Content,YD:string);var    frw:IHTMLDocument2;    TT1,TT2,TT3:IHTMLInputElement;    LIst:IHTMLElementCollection;    ListTexty:IHTMLOptionButtonElement;    K:I

2013-04-01 09:32:24 1032

原创 delphi Webbrowser 获取网页源代码

uses MSHtmlfunct Get_html(WEB:TWebbrowser):string;var  IHTML:IHTMLElement;begin   if Assigned(WEB.Document) then   begin    IHTML := (WEB.Document AS IHTMLDocument2).body;      whi

2013-04-01 09:24:10 1279

转载 stringgrid 显示imagelist里面的图片

以前是用Dev的cxgrid可以很方便地根据数据库里某个字段值显示ImgList里的图片,但现在由于要做三层,三层里的主从表不太好控制,所以改由非感知表格控件。把imagelist里面的图片通过getbitmap,保存到一个TBItMap变量中,然后利用stringgrid的canvas属性,draw到相应的cell当中。当然,代码要在stringgrid的onDrawCell事件中处理。代码

2013-01-30 10:26:54 1795

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除