suncrafted的专栏

如何判断Edit控件中输入的字符为数字！在只要求输入数字的Edit中，避免字符的输入！！！ procedure TForm1.CustNoEditKeyDown(Sender: TObject; var Key: Word;  Shift: TShiftState);begin  if ( chr(ord(key)) 9 ) then    begin      messagedlg

 BLOG导航    文章多了，也该锄锄草，剪剪枝了。    加多一个BLOG导航，方便自己找文章，也方便大家浏览。     ORACLE          Informatica        SQL SERVER       DataWarehouse          Delphi            杂谈 ========================    华