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

£Û¼±£¬ÔÚÏߵȣÝ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:


Ïà¹ØÎÊ´ð£º

oracle sql developer ²éѯÏÔʾÖÐÎÄÂÒÂë

»·¾³£º1.win2003server+oracle9i
2.oracle9i×Ö·û¼¯ÎªAMERICAN_AMERICA.WE8ISO8859P1
3.oracle sql developer°æ±¾ 1.5.5
ÏÖÏóÃèÊö: 1.ÔÚsql developer ÖвéѯoracleÖеÄij¸ö±í£¬ÖÐÎÄÈ«²¿ÏÔʾΪÂÒÂë¡£ ......

ÇóÒ»SQL - MS-SQL Server / »ù´¡Àà

±íÈçÏÂ
½ÌÊÒID ×ùλÊý ¿ªÊ¼Ê±¼ä ½áÊøÊ±¼ä 2009Äê1ÔÂ1ÈÕ 2009Äê1ÔÂ2ÈÕ 2009Äê1ÔÂ3ÈÕ
  101 50 08£º00 08£º30 30 40 50  
  101 50 09£º00 ......

delphi Ctrl+×ó¼ü ÎÞ·¨²é¿´ windows.pas Ôõô°ì

ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£ 
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£

µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË

ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......

delphi編寫×Ô動¸üгÌÐò

ÓÉÓÚ¿Í戶¶ËÓеÄÎļþ經³£¸üУ¨遠³ÌµÄ£¬²»ÊǾÖÓò網£©£¬
ËùÒÔÏë寫個×Ô動¸üÐ嵀 ³ÌÐò¡£
¿´網É쵀 ·½·¨資ÁÏ£¬ÖªµÀЩ·½·¨£¬µ«²»ÖªµÀ¾ß體Ôõô寫¡£
......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ