£Û¼±£¬ÔÚÏߵȣÝdelphi sql2000 ͼƬ
1¡¢Â·¾¶ imgPath:string;//±ÈÈçÒѾµÃµ½ÁËͼƬ·¾¶
2¡¢SQL2000 Êý¾Ý¿â ±íÃû ttbtestimg ×Ö¶ÎÃû img ×Ö¶ÎÀàÐÍimage
3¡¢Çë¸øÒ»¸öÍêÕû´úÂ룬½«´Ë·¾¶ÏµÄͼƬ£¬´æÈëÊý¾Ý¿â£¬ÏàÓ¦±íµÄÏàÓ¦×Ö¶ÎÖÐ
4¡¢Çë¸ø³öÒ»¶ÎÍêÕû´úÂ룬½«´Ë±íÖеÄͼƬÏÔʾÔÚͼƬ¿Ø¼þÉÏ
4¡¢Çë¸ø³ö×¢ÊÍ
5¡¢³ÌÐòһͨ£¬Á¢¼´¸ø·Ö
Õâ¸öÓкܶàÈËÎʹý,¸øÄãÒ»¸ö²Î¿¼°É
http://topic.csdn.net/t/20051215/18/4461795.html
.....³ÌÐò»¹ÊÇÒª×Ô¼ºÐ´µÄ......
procedure TForm1.Button1Click(Sender: TObject);
var
picstream:tadoblobstream;
bmppic:tbitmap;
jpgpic:tjpegimage;
bmpstream:TMemoryStream;
OpenPicDialog:TOpenPictureDialog;
begin
try
OpenPicDialog:=TOpenPictureDialog.Create(nil);
OpenPicDialog.Filter:='All *.jpg;|*.jpg;)';
with AdoQuery1 do
begin
close;
sql.text := 'Insert into ttbtestimg(id) values(1)';
ExecSql;
SQL.Text := 'select id,img from ttbtestimg with(nolock) where id=1';
Open;
Edit;
if OpenPicDialog.Execute then
begin
jpgpic:=tjpegimage.Create;
bmppic:
Ïà¹ØÎÊ´ð£º
ÎÒÓжà¸ö±íA B C ½á¹¹ÊÇÒ»ÑùµÄ£¬¶¼ÓÐ2¸ö×Ö¶ÎnameºÍcontent,ÎÒÒªËÑË÷ËùÒÔ±íËùÓÐ×Ö¶ÎÖаüº¬¡°Öйú¡±µÄÄÚÈÝ Õâ¸öSQLÓï¾äÔõôд
ÈçºÎ½«¶à¸ö±íµÄ²éѯ½á¹ûÁ¬³ÉÒ»¸ö±í Õâ¸öSQLÓï¾äÔõôд ±íµÄ½á¹¹ÊÇÒ»ÑùµÄ
ÀýÈç£ ......
СµÜÕý×¼±¸×Ô¼ºÌáǰѧϰÊý¾Ý¿â£¬µ«ÊÇÏÖÔÚÓиöÎÊÌ⣬²»ÖªµÀ¸ÃÑ¡Ôñʲô°æ±¾µÄSQL
ѧУÒÔºóµÄÊéºÃÏñ½²SQLÓõÄÊÇSQL 2000£¬µ«ÊÇÎÒµÄϵͳÊÇWindows 7£¬Ã²ËƲ»ÄÜ×°£¬Ò²²»Ïë»»»ØXP£¨07Äê¾Í²»ÓÃXPÀ²£©£¬ËùÒÔÔÚÏ룬ÄÜ· ......
ÎÒÔÚÄ£¿éÀï×Ô¶¨ÒåÁËÒ»¸öº¯Êý:stradd()
¿ÉÊÇÔÚadoquery1.sql.add('select stradd(author) from book');
ʱÌáʾstradd䶨Òå...
Õâ¸öÎÊÌâÓÐʲô°ì·¨¿ÉÒÔ½â¾öµÄÂð? ·Ç³£¸Ð¼¤!
(ÔÚA ......
ÎÒдÁ˸öС³ÌÐò£¬ÉÏÃæÌí¼ÓÁËÒ»¸öshockwaveflash¿Ø¼þ£¬È»ºóÔÚmovieÀïдÈëswfÎļþµÄ·¾¶£¬È»ºóÖ´ÐÐûÓÐÎÊÌâ¡£
µ±ÎÒ°ÑÕâ¸ö³ÌÐò×ªÒÆµ½Áíһ̨µçÄÔÖ´ÐÐʱ£¬ shockwaveflash ¿Ø¼þÏÔʾ¿Õ°×¡£Ò²¾ÍÊÇûÓмÓÔØÄǸöswfÎļþ¡£ ......
½ÓÊÕµ½µÄÎı¾ÄÚÈÝÊÇucs2±àÂë¸ñʽ£¬ÇëÎÊÔõÑùת»»³ÉÖÐÎÄ
°´ÎÒµÄÀí½â£¬UCS-2ÊÇ×Ö·û¼¯£¬¾ßÌåµÄ±àÂëÓÐUTF-8£¬UTF-16 (LE/BE)µÈ¡£
Èç¹ûÄãÓÃDelphi 2009¼°ÒÔÉϰ汾£¬¿ÉÒÔ¿´¿´TEncodingÀà¡£
btw. Äã˵µÄת»»³ÉÖÐÎÄÊÇɶÒâË ......