Delphi将图片保存至Sql Server中的小问题？
怎么限制保存图片的大小呢？比如说超过500K的图片就不允许提交。否则数据库太大了，读取也慢。保存图片代码如下，怎么改一下？：
//保存图片
procedure TForm1.btn1Click(Sender: TObject);
begin
if dlgOpen1.Execute then
img1.Picture.LoadfromFile(dlgOpen1.FileName);
qry1.Append;
qry1.Post;
end;
//提前之前将图片转换为数据流
procedure TForm1.qry1BeforePost(DataSet: TDataSet);
var
ms: TMemoryStream;
jpg: TJpegImage;
begin
ms := TMemoryStream.Create;
jpg := TJpegImage.Create;
try
if img1.Picture.Graphic <>nil then
begin
try
img1.Picture.Graphic.SaveToStream(ms);
finally
TBlobField(qry1.FieldByName('pic')).LoadfromStream(ms);
end;
end;
finally
jpg.Free;
ms.Free;
end;
end;
if ms.Size > 500k then
弹一个提示框
简单点改
Delphi(Pascal) code:
procedure TForm1.qry1BeforePost(DataSet: TDataSet);
var
ms: TMe
相关问答：
请教各路高手。武林前辈。我将B.EXE做成资源文件，然后加到123.dll中。用A.EXE来调用123.dll中的B.EXE
请各位前辈帮忙指教下。A.exe如何来调用dll中的exe？代码又该如何写？
无人回答？
做成资源� ......
今天做了一个存储过程 环境是SQL2000数据库
大致如下
建立临时表
定义员工游标
循环员工（属于1个公司)
......
现在有两张表：文章主表A(articleId,articleTitle)，文章评论表B(commentId,articleId,commentTitle)
现在我想实现这样的功能：列出文章列表，其中每篇文章标题下面列出此文章的前2个文章评论，请问sql语句怎么写啊 ......
如何在SQL2005中设定定时作业，比如说定时清理某些表的数据，
或者是定时的将某些表的数据导出excel！
在线等待，急急急，最好是详细步骤！
之前我做的作业有点问题！
帮UP
参考:http://hi.baidu.com/toiota ......
刚刚接触MySQL,不知道该如何去查看数据，插入数据，创建数据库、表，用哪为前辈能指教一二？
MySQL 5.1参考手册
引用
兄弟你会结贴吗？
mysql 参考手册
baidu
MySQL官方文档 http://dev.mysql.com/doc ......
