Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

delphiÓëSQL2000µÄͼƬ¶ÁÈ¡

ÔÚÒ»ÕÅgoods±íÖÐÓвúÆ·Ãû³Æ,¹æ¸ñ,ͼƬ·¾¶µÈ×Ö¶Î,ÒѾ­°ÑͼƬµÄ·¾¶±£´æµ½goods±íÖÐ,ÇëÎÊÔõôÑù²ÅÄܲéѯgoods±íʱ,²é³öµÄ¼Ç¼˫»÷»òÊÇÔõôÑù¿ÉÒÔÖ±½Ó´ò¿ªÍ¼Æ¬Â·¾¶Õâ¸ö×Ö¶ÎÏà¶ÔÓ¦µÄͼƬ,лл
²»ÖªÊÇʲô¸ñʽµÄͼƬ
bmp, jpeg¸ñʽµÄÓÃTImageÕâ¸ö¿Ø¼þ¼ÓÔØ¾Í¿ÉÒÔÁË¡£

ÎÒ·¢¶Î´úÂë¸øÄã.ÕâÊDz»¹Üʲô¸ñʽµÄÖ»ÒªÄã Uses ÉÏͼƬµ¥Ôª.Èç uses jpeg
if Not OpenpictureDialog1.Execute then Exit;
ADotable1.Edit;
DBImage1.Picture.LoadfromFile(OpenPictureDialog1.FileName);
DBImage1.CopyToClipboard;
DBIMage1.PastefromClipboard;
Adotable1.Post;



ÓÃÊý¾ÝÁ÷°ÑͼƬ´æ´¢µ½Êý¾Ý¿âÖУ¬ÕâÑù¶ÁÈ¡±È½Ï·½±ã¡£

´úÂ빩Äã²Î¿¼£º
´æ´¢Í¼Æ¬
Delphi(Pascal) code:

procedure TForm1.Button1Click(Sender: TObject);
var
ms: TMemoryStream;
jpg: TJpegImage;
begin
ms := TMemoryStream.Create;
jpg := TJpegImage.Create;
if dlgOpen1.Execute then
img1.Picture.LoadfromFile(dlgOpen1.FileName);
try
if img1.Picture.Graphic<>nil then
begin
//try
img1.Picture.Graphic.SaveToStream(ms);
//ÅжÏͼƬ´óС£¬Èç¹ûͼƬ̫´óÔò²»ÔÊÐí
if ms.Size >1024*500 then
showmessage('ͼƬ̫´ó²»ÔÊÐí')
else
//ÌύͼƬ
begin
qry1.Append;
TBlobField(qry1.FieldByName('pic')).LoadfromStream(ms);
qry1.Post;
end;


Ïà¹ØÎÊ´ð£º

DELPHIÕâÖÖÇé¿öÔõô°ì£¿ - Delphi / Windows SDK/API

¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......

Çë½ÌÏ£¬ÓÃDELPHI×öSOHUµÄ - Delphi / ·Ç¼¼ÊõÇø

Ò»°ã¶¼ÊÇÔõô½Ó»îµÄ£¿
ÊÕÈëÔõôÑù
sohu£¿soho£¿

sohu ¿ÉÄÜÊÇsmall office house unit
С°ì¹«ÊÒ£¬°Ñ¼Ò±ä³Éµ¥Î»¡£

È¥Íþ¿ÍÍø°¡,ºÜ¶à¸öÄØ,»¹ÓÐÍâ°üµÄÍøÕ¾

ѧϰѧϰ¡£

ÏÖÔÚDelphi×ö¶«Î÷²»ÐÐÁË,´¦ÓÚÌÔÌ­×´ ......

SQLÈçºÎÓÅ»¯ÎÊÌâ - MS-SQL Server / ÒÉÄÑÎÊÌâ

½ñÌì×öÁËÒ»¸ö´æ´¢¹ý³Ì   »·¾³ÊÇSQL2000Êý¾Ý¿â  
´óÖÂÈçÏÂ
½¨Á¢ÁÙʱ±í
¶¨ÒåÔ±¹¤Óαê
        Ñ­»·Ô±¹¤£¨ÊôÓÚ1¸ö¹«Ë¾)  
        ......

ÇóÒ»sqlÓï¾ä - MS-SQL Server / ÒÉÄÑÎÊÌâ

ÏÖÔÚÓÐÁ½ÕÅ±í£ºÎÄÕÂÖ÷±íA(articleId,articleTitle)£¬ÎÄÕÂÆÀÂÛ±íB(commentId,articleId,commentTitle)
ÏÖÔÚÎÒÏëʵÏÖÕâÑùµÄ¹¦ÄÜ£ºÁгöÎÄÕÂÁÐ±í£¬ÆäÖÐÿƪÎÄÕ±êÌâÏÂÃæÁгö´ËÎÄÕµÄǰ2¸öÎÄÕÂÆÀÂÛ£¬ÇëÎÊsqlÓï¾äÔõôд°¡ ......

sqlÓÅ»¯ - Oracle / »ù´¡ºÍ¹ÜÀí

select count(1) from FX_RETURNBOOKCHECKLIST fxreturnbo0_ where fxreturnbo0_.BOOKID='164 ' AND fxreturnbo0_.RETURNID='00025.S0000001' 
ÉÏÃæÒ»¸ö¼òµ¥µÄSQL,Ö´ÐÐʱ¼ä2.6à ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ