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

Delphi ÖÐÈçºÎ´úÂë¸øDBGrid¸³Öµ(´úÂëÈçÏÂ)£¿£¿£¿£¿

//ÉèÖÃDBGridÍ·
  gbWareInfo.Columns.Clear;
  myCoumn:=gbWareInfo.Columns.Add;
  myCoumn.Title.Caption:='ÉÌÆ·±àºÅ';
  myCoumn.FieldName:='ID';
  myCoumn:=gbWareInfo.Columns.Add;
  myCoumn.Title.Caption:='ÉÌÆ·Ãû³Æ';
  myCoumn.FieldName:='Name';
  myCoumn:=gbWareInfo.Columns.Add;
  myCoumn.Title.Caption:='¿â´æÁ¿';
  myCoumn.FieldName:='Number';
//Á¬½ÓÊý¾Ý¿â
 
  sSql := ' select * from WareStock where DepotID = 1 ';  //²éѯNÌõÊý¾Ý
  ADOQueryDBGrid.Sql.clear;
  ADOQueryDBGrid.SQL.Add(sSql);
  ADOQueryDBGrid.Open;
  ADOQueryDBGrid.First;
//ÈçºÎ¸øÎÒµÄDBGrid£¨gbWareInfo£© ÊÖ¶¯Ìí¼ÓֵĨ??????

ÓбØÒªÂð£¬Ö±½Ó¸øADOQuery¸³Öµ¾ÍÐÐÁË

ʲôÒâ˼£¬Ë«»÷dbgridÒ»¸öÒ»¸ö¼ÓÂð£¿


²»Óÿؼþ¹ØÁª£¬ÓôúÂë ¸øDBGridµÄÿһÁи³Öµ£¡£¡£¡£¡

»»³ÉStringGridDBºÃÁË


Ïà¹ØÎÊ´ð£º

PythonÖеÄUnicodeÔÚDelphiÈçºÎ»¹Ô­³ÉGb2312£¿

ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ

ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô­³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......

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

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

delphiÖÐselect µÄ whereºóÃæµÄid=±äÁ¿Ôõôд°¡

ÎҵijÌÐòÖÐÓÐÒ»¶Î¸üÐÂijһÌõ¼Ç¼µÄÓï¾ä£º
var
id:=integer;
begin
id:=strtoint(edit1.text);//edit1.textµÄÖµÒѾ­È¡µÃ;
...
...
...
adoQuery1.sql.add('update ¼Æ»®Çåµ¥±í set ¼Æ»®ÈÕ ......

ÈçºÎÔÚdelphiÀïÓôúÂëʵÏÖ´´½¨VPNÁ¬½Ó?

ÎҵĴúÂëÈçÏÂ,Ôõô×ÜÌáʾÁ¬²»³É¹¦:
type
  GUID = record //ÉêÃ÷µ÷ÓÃRAS£¨´´½¨VPNÁ¬½ÓÓ㩺¯ÊýËùÐè½á¹¹Ìå
  Data1: integer;
  Data2: Shortint;
  Data3: Shortint;
  ......

Delphi ¶àỊ̈߳¬µ¯³ö¿òÖжÏÎÊÌâ

ÈçÌ⣺

ÎҵijÌÐò Create µÄʱºò ´´½¨ÁËN ¸öỊ̈߳»ÕâN¸öÏ̲߳»Í£µÄÔÚ ¼àÌýN¸öCOM¿ÚµÄÊý¾Ý£»µ±·ÖÎöÊý¾Ýʱ£¬ÓÐЩʱºòÒªµ¯³öapplication.messagebox ¶Ô»°¿òÅÐ¶Ï ÊÇ·ñ¼ÌÐø Ö´ÐÐỊ̈߳¬»¹ÊÇ¹ÒÆðÏ̡߳£µ±¶à¸öÏß³Ìͬʱ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ