首页 技术教程 实用代码 注册破解 正则表达式 网址导航 电子书籍

DELPHI存取JPEG、BMP图像到数据库完整解决方案

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ExtDlgs, StdCtrls, ADODB, Grids, DBGrids, ExtCtrls,jpeg, DBCtrls; type TForm1 = class(TForm) DBGrid1: TDBGrid; ADOConnection1: TADOConnection; ADOTable1: TADOTable; selectimage: TButton; savetodb: TButton; OpenPictureDialog1: TOpenPictureDialog; DataSource1: TDataSource; DBNavigator1: TDBNavigator; savetofile: TButton; Label1: TLabel; Label2: TLabel; Button1: TButton; Bevel1: TBevel; B...
类别:程序开发 - Delphi    查看:152    更新:2014-05-19

Aspjpeg添加水印完整方法

ASPJPEG是Persits出品的共享软件,试用期为30天,您可以在这里下载:http://www.persits.com/aspjpeg.exe。最新版本号是1.3ASPJPEG是一款功能相当强大的图象处理组件,用它可以轻松地做出图片的缩略图和为图片加上水印功能。下面简单介绍一下使用方法:您先要执行下载得到的exe文件,安装该组件1、为图片制作缩略图<% ' 建立实例Dim Jpeg,PathSet Jpeg = Server.CreateObject("Persits.Jpeg")' 图片所在位置Path = Server.MapPath("images") & "\clock.jpg"' 打开Jpeg.Open Path' 设置缩略图大小(这里比例设定为50%)Jpeg.Width = Jpeg.OriginalWidth / 2Jpeg.Hei...
类别:网页编程 - ASP技术    查看:132    更新:2014-05-04