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

DelphiÖÐÊý¾Ý¿â²éѯµÄÒÉ»ó

×òÍíÔÚDelphiÊý¾Ý¿â²éѯÖÐÓöµ½ÁËÒ»¸öÒɻ󡣴úÂëÈçÏ£º

procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
  XY : string;
begin
  XY := comboboxxy.Items[comboboxxy.Itemindex];
  if not adoconnection1.Connected then
  try
  adoconnection1.Open;
  except
  end;
  adoquery1.Close;
  adoquery1.SQL.Clear;
  adoquery1.SQL.Add('select רҵÃû³Æ from Speciality where ѧԺ =: XY');
  try
  adoquery1.Open;
  except
  end;
  ComboBoxZy.Items.Clear;
  while (not adoquery1.Eof) do
  begin
  ComboBoxzy.Items.Add(adoquery1.FieldValues['רҵÃû³Æ']);
  adoquery1.Next;
  end;

end;

 ÔËÐеõ½µÄ½á¹ûÊÇ£º

ÓôÃÆ°¡~ÎҲ鿴ÁË£¬Êý¾Ý¿âµÄ¾ÍÊÇÄÇÁ½¸öÁбíÃû°¡£¡Ôõ»ØÊ°¡£¿ÓÐË­ÄܸæËßÎÒ£¿
½â¾öÁË~~£¡ÎÒÌ«²»ÊìϤÁË~£¡£¡
adoquery1.SQL.Add('select רҵÃû³Æ from Speciality where ѧԺ ='''+XY+'''');
ÔÎ~~

procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
  XY : string;
begin
  XY := comboboxxy.Items[comboboxxy.Itemindex];
  if not adoconnection1.Connected then
  try
  adoconnection1.Open;
  except
  end;
&nb


Ïà¹ØÎÊ´ð£º

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

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

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

delphiÈçºÎÏòAccessÊý¾Ý±íÖÐ×Ô¶¨Òå×Ö¶Î

delphiÈçºÎÏòAccessÊý¾Ý±íÖÐ×Ô¶¨Òå×Ö¶Î?È»ºóÏÔʾµ½DBGridÖÐ
ÔõôûÈËÀíÎÒѽ

·Ö·Ö߯ÉÙßÖ£¬Ò»°ãÈ˶¼ÀÁµÃ½øÀ´¡­¡­*^_^*

SQL
creat table TableName(ID Counter Primary Key,FieldName varchar(20))

ADOQue ......

Delphi ÏñÍö¹úµÄÄÏËΣ¬ÊÔÎÊÕâÓïÑÔ»¹ÓÐǰ;Âð£¿

Delphi ÏñÍö¹úµÄÄÏËΣ¬ÊÔÎÊÕâÓïÑÔ»¹ÓÐǰ;Âð£¿
Win32¿ª·¢²»ÈçC#£»
ÃæÏñ¶ÔÏñ¿ª·¢²»ÈçJAVA£»
ϵͳ¿ª·¢²»ÈçVC++6.0£»
ÄÜÓÃÐÔ²»ÈçVB6.0£»
²»Ö§³ÖWeb¿ª·¢¡£¡£¡£
³ö¸öDelphi 2010Ãâ·ÑÒ»Äê»áÓÐÈËÓÃÂ𣿠......

ÕâÓïÑÔºÃÄÑ°¡ ѧdelphi¼òµ¥ ¿Þ

ÕâÓïÑÔºÃÄÑ°¡  ѧdelphi¼òµ¥ ¿Þ
Ò»¸ödll ºÍÒ»¸ö Ö¸Õ뺯Êýµ÷Óà ¸ãÁËÎÒ2Àñ°Ý »¹ÊÇÔÚÎÒÓÐdelphi»ù´¡µÄÇé¿öÏ ¿Þ
ÄÑ¶È ±È delphi ¸ßºÜ¶à¡£¼ÌÐøŬÁ¦Ñ§°¡¡£
ºÃÏñÒ²²¢²»±ÈdelphiÄѶàÉÙ°É

Ö÷Òª´úÂë ²»Ö±¹ÛÁË¡ ......

Delphi 3Äê ÔÚÉϺ£Ò»¸öÔÂÄÜÄöàÉÙ

Delphi 3Äê ÔÚÉϺ£Ò»¸öÔÂÄÜÄöàÉÙ
£¨½Ó´¥¹ýµÄ¶¼ÊÇСÏîÄ¿ ´óÏîĿûÔõô×ö¹ý£©

»¹ÊÇ¿´¹«Ë¾°É¡£¡£

mark

ͬÑùÒ»Ì×·¿×Ó£¬ÎÒͬÊÂ̸14K/㎡£¬ÎÒ̸ÁË15K/㎡¡£
    ½á¹û²îÁË10W£¬ÎÒ¶à»ñÀûÁ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ