分享
 
 
 

ASPImage组件的实现过程

王朝vc·作者佚名  2006-01-08
窄屏简体版  字體: |||超大  

下载本文示例源代码

在阅读这篇文章之前,最好能够接触过以下几项

GDI+

利用ATL生成组件

STL

asp使用组件

aspImage是ServerObjects站点上非常好的一个组件,它可以使我们利用Asp实现很多对于图形的处理功能,他的功能强大,如果你需要了解更详细的信息你可以访问它的官方网站,在这里就不讲如何使用这个组件了,我们在这里要讲的是如何实现这类组件,当然下面的例子中使用GDI+并不是实现组件图形处理的唯一方法,大家也可以自己试试其他的方法.

以下是实现过程

一、首先使用Visual C++的向导建立ATL项目

二、接下来添加一个ATL Active Server Page 组件接口类

三、生成名称为AspPicCom的类并且选择ASP内部对象Response

四、在IAspPicCom接口上添加属性和方法,如下表

名称

类别

含义

调用方法

FontName

属性

字体名称

字符串类型

使用方法

.FontName="宋体"

FontSize

属性

字体大小

整型

使用方法

.FontSize=40

FontStyle

属性

字体类型

整形

Regular = 0,

Bold = 1,

Italic = 2,

BoldItalic = 3,

Underline = 4,

Strikeout = 8

使用方法

.FontStyle=8

ImgFormat

属性

图形格式

字符串类型

image/gif

image/jpeg

image/bmp

......

使用方法

.ImgFormat="image/gif"

SetFontColor

方法

设置字体颜色

使用方法

.SetFontColor 255,3,242,4

上面的数字分别代表Alpha,Red,Green,Blue

SetBackColor

方法

设置字体背景颜色

使用方法

.SetBackColor 255,3,242,4

上面的数字分别代表Alpha,Red,Green,Blue

ShowPic

方法

将图片发送到客户端

使用方法

.ShowPic

五、 要在ASP组件中使用GDI+,需要加入一些代码

1、你需要在Stdafx.h文件中加入下面两行:

#include <Gdiplus.h>

using namespace Gdiplus;

而且需要连接GDIPlus.lib库

#PRagma comment(lib,"gdiplus.lib")

2、声明ULONG_PTR gdiplusToken;为一个全局或者类的内部成员变量。

3、在实现类的FinalConstruct函数中加入:

GdiplusStartupInput gdiplusStartupInput;

//初始化 GDI+

GdiplusStartup(&gdiplusToken, &gdiplusStartupInput, NULL);

4、在FinalRelease函数中加入:

GdiplusShutdown(gdiplusToken);

这样你就可以使用GDI+提供的图形处理函数了。

注:关于GDI+的使用你可以在以下网址找到参考

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/gdicpp/gdi+/gdi+.asp

http://www.codeproject.com/vcpp/gdiplus/

六 接下来就是实现在四中列出的这些属性和方法,下面列出ShowPic方法的一段代码,其他代码请查看源代码

Bitmap bitmap(1,1,PixelFormat48bppRGB);

Graphics graphics(&bitmap);

USES_CONVERSION;

Font font( OLE2CW(m_bstrFontName),(float)m_fFontSize,m_nFontStyle,

UnitPoint,NULL);

PointF origin(0, 0);

StringFormat format;

format.SetAlignment(StringAlignmentCenter);

RectF boundRect;

graphics.MeasureString(OLE2CW(m_bstrText),m_bstrText.Length (),

&font, origin, &format, &boundRect);

int nWidth = (int)boundRect.Width;

int nHeight = (int)boundRect.Height;

Bitmap bm(nWidth,nHeight,PixelFormat48bppRGB);

Graphics* g=Graphics::FromImage (&bm);

boundRect.Width=boundRect.Width*2;

SolidBrush solidbrush(m_cBackground);

g->FillRectangle(&solidbrush,boundRect);

SolidBrush SolidFont(m_cFontColor);

PointF fPoint(0,0);

g->DrawString(OLE2CW(m_bstrText),m_bstrText.Length (),

&font,fPoint,&SolidFont);

int result;

CLSID pngClsid;

result = GetCodecClsid(OLE2W(m_btrImgFormat ), &pngClsid);

HRESULT hr;

HGLOBAL hGlobal = GlobalAlloc(GMEM_MOVEABLE, 0);

CComPtr<IStream> pStm;

if (FAILED(hr = CreateStreamOnHGlobal(hGlobal, TRUE, &pStm) )) return hr;

bm.Save(pStm,&pngClsid,NULL);

ULONG cElements = (ULONG)GlobalSize(hGlobal);

LPBYTE lpData = (LPBYTE)GlobalLock(hGlobal);

SAFEARRAY* pArray = SafeArrayCreateVector(VT_UI1, 0, cElements);

for (UINT iElement = 0; iElement < cElements; iElement++)

{

long idx = iElement;

SafeArrayPutElement(pArray, &idx, ((LPBYTE)lpData) + iElement);

}

GlobalUnlock(hGlobal);

CComVariant vBytes;

vBytes.vt = VT_ARRAY | VT_UI1;

vBytes.parray = pArray;

m_piResponse->Clear ();

m_piResponse->put_ContentType (m_btrImgFormat);

m_piResponse->BinaryWrite(vBytes);

m_piResponse->End ();

七、现在组件的实现部分就大功告成了,我们写一段ASP来测试以下这个组件

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<html>

<body>

<%

set Picture=Server.CreateObject("AspPic.AspPicCom")

picture.Text ="你能看见我吗?我来自www.goodassister.com!"

picture.FontName="黑体"

picture.FontSize= 40

picture.ImgFormat = "image/jpeg"

picture.FontStyle= 1

Picture.SetFontColor 255,3,242,4 ''代表Alpha ,Red,Green,Blue

Picture.SetBackColor 10,243,42,54 ''代表Alpha ,Red,Green,Blue

Picture.ShowPic

set Picture=nothing

%>

</body>

</html>

注:在使用前先注册组件 regsvr32 AspPic.dll

打开这个ASP网页,你将会看到如下的图片

现在实现aspImage的具体思路就讲完了,现在如果需要更多的效果,你可以自己丰富这个组件

题外话:这类组件的用途很广,如yahoo.com注册会员时会显示图形单词以防止计算机自动注册,因为计算机要识别图片上的文字是低效而且很不容易的事情,这类组件更多的是应用到图表的生成,如柱状图、馅饼图、波形图等等。

这篇文章就写到这里了,如果你觉得有什么意见或者我讲错了的地方,请你告诉我

Email:sillyboy@china.com

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有