当前位置:首页 » 软件开发
开发技术指南» 文章正文
    引言: Internet/Intranet在九十年代可能是最流行的计算机术语了,不管是计算机行业内的人士还是计算机外的人士,都会使用Internet/Intranet,有的查资料,有的是宣传自己和公司,甚至有许多以前从没有想到用Internet的东西现在也在用Internet来解决,比如有的程控数字计算...
 

 

    摘要:随着internet/intranet的飞速发展和普遍应用,对在internet/intranet上的应用程序的需求越来越多,于是java和activex form应运而生,但是,现在internet的带宽还非常低下的情况下,这种基于client端的应用是非常困难的,下载一个非常小、功能非常简单的java applet就需要非常长的时间,而且还存在着用户使用浏览器不支持这种新技术的可能。在这种情况......
 ·取当前所有的拨号连接的程式    »显示摘要«
    摘要:{+++++++++++++++++++++++ 取当前所有的拨号连接的程式; 参数为传入的列表,过程成功为参数付值且返回值为真 否则为假; 调用方法类似 if getentries(memo1.lines) then begin end else begin end; date:2001/03/07 12:30-----13:32 remark: +......


Delphi开发Web Server程序如何返回图像
上一页   ...在本文中主要讨论一般web server程序的开发,希望给您一个抛砖引玉的作用.

【程序编程相关:[函数]procedure SortDB

【推荐阅读:Fastreport3.14的中文PDF

  【扩展信息:安装程序打包interbase的方法

一般web server返回的信息有基于html的文字流与图像流,如jpeg与gif等.返回文字流的方法是使用twebresponse.content,在delphi 3的demos中有这样的例程,但如何返回图像呢?

 

返回图像的方法是用twebresponse.contentstream与tjpegimage类.具体实现如下,例如您有三张图片,希望在别人访问您的主页时能随机的显示一张,在您的主页中有如下的html语句:,那么在您的web server的缺省的twebactiveitem中如下处理:

 

var

jpg: tjpegimage;

s: tmemorystream;

i: integer;

begin

randomize;

i:= random(3);

jpg := tjpegimage.create;


...   下一页
 ·读取ie收藏夹内网址的信息    »显示摘要«
    摘要:procedure tform1.toolbutton1click(sender: tobject); label write; var favorites:string; search:tsearchrec; begin favorites:=getfavoritespath; if favorites= then begin messagebox(handle,访问收藏夹主......
» 本期热门文章:

©2000-2007 All Rights Reserved. 最佳浏览:1024X768 MSIE