(ÕÐÆ¸£©Delphi³ÌÐòÔ±ËÄÃû
ÕÐÆ¸ÈËÊý£º 4ÈË
ѧÀúÒªÇó£º ²»ÏÞ
¹¤×÷ÄêÏÞ£º ²»ÏÞ
н×Ê·¶Î§£º ÃæÒé
¹¤×÷µØµã£º ±±¾©Í¨ÖݾſÃÊ÷
Delphi³ÌÐòÔ±ËÄÃûְλҪÇó
񻂗:
1. ÊìÁ·Ê¹ÓÃDELPHI(C,C++, C#µÈ)½øÐпª·¢£»
2. ¾ßÓÐÁ¼ºÃµÄ³ÌÐò±àдϰ¹ß£»
3. ÔúʵµÄ»ù±¾¹¦£¬½á¹¹ÇåÎú¡¢ºÏÀí£»
4. Á¼ºÃµÄÖ´ÐÐÄÜÁ¦£¬½ÏºÃµÄÍê³ÉÔ¤¶¨ÈÎÎñ£»
5. ÉϽøÐÄÇ¿£¬ÄܳԿàÄÍÀÍ£¬ÓÐÍŶӺÏ×÷¾«Éñ£»
6. ÓÐÁ¼ºÃµÄ¸öÈËÖ°ÒµÉúÑĹ滮£»
7. ÊìϤWindowsÓ¦ÓóÌÐò¿ª·¢,ÓÐϵͳ°²È«¿ª·¢¾Ñé»òÓÐÇý¶¯¿ª·¢»ù´¡Õ߸ü¼Ñ¡£
Çë·¢ËÍÏêϸ¼òÀúÖÁ£º
Chen@Weskysoft.com
±±¾©Î¬Ë¹ÌìÓîÈí¼þ¿ª·¢·þÎñÖÐÐļò½é
¹«Ë¾¹æÄ££º1-49ÈË¡¡¡¡¹«Ë¾ÐÔÖÊ£ºË½Óª¡¡¡¡ËùÊôÐÐÒµ£º¼ÆËã»úÈí¼þ
±±¾©Î¬Ë¹ÌìÓîÈí¼þ¿ª·¢·þÎñÖÐÐÄ£¨Weskysoft Inc.£©ÊÇÒ»¼ÒרÃÅ´ÓÊÂÅ·ÃÀÊг¡µÄÈí¼þ¿ª·¢¼°ÏúÊÛµÄÈí¼þ/µç×ÓÉÌÎñ¹«Ë¾£¬²úÆ·Ö÷ÒªÃæ¶Ôº£ÍâÊг¡¡£¹«Ë¾¿ª·¢µÄ²úÆ·Óжà¿î´¦ÓÚÐÐÄÚÁìÏȵØÎ»£¬»ñµÃº£Íâ¿Í»§µÄ¹ã·ºÈϿɡ£ÎÒÃÇÒ»Ö±±ü³Ð¼¼Êõ´´Ð¼°Î¨²ÅÊÇÓõľӪÀíÄ¼«Æä×¢ÖØÈ˲ŵÄÖØÒªÐÔ¡£ÎÒÃÇÓµÓÐÈËÐÔ»¯µÄ¹«Ë¾Öƶȣ¬Óä¿ìµÄ¹¤×÷·ÕΧÒÔ¼°½ÏΪÍêÉÆµÄн×ʸ£Àû´ýÓö¡£Ô±¹¤ÍŶÓ×é³ÉÊ®·ÖÄêÇᣬÏ൱²¿·Ö¹Ç¸ÉΪ80Äê´úºóÓÅÐãµÄ±¾¿Æ¡¢Ë¶Ê¿±ÏÒµÉú£¬¹²Í¬ÎªÊµÏÖÃÎÏë¶ø×ßµ½Ò»Æð¡£Ä¿Ç°¹«Ë¾´¦ÓÚ¸ßËٳɳ¤ÆÚ£¬·¢Õ¹¿Õ¼ä¹ãÀ«£¬»¶ÓÓм¤Çé¡¢ÓÐÄÜÁ¦¡¢ÓÐÃÎÏëµÄÅóÓѼÓÈ룡
Ïà¹ØÎĵµ£º
¶¨Ò壺
CbName: TComboBox;
width: Integer; //ʵ¼ÊËùÐèµÄ¿í¶È
ÔÚÖ´ÐдúÂëÖа´ÈçÏ·½·¨Ð´£º
width := CbName.Canvas.TextWidth(CbName.Items[I]); //¿ÉÓô˷½·¨Í¨¹ý±éÀú»ñµÃijѡÏîµÄ×î´ó¿í¶È£¬Ò²¿ÉÒÔ°´×Ô¼ºµÄÐ ......
ÈçºÎÔÚDelphiÀïÃæÀûÓÃWordµÄVBA´úÂë½øÐÐһЩ×ܽᡣ
1¡¢ Éú³ÉVBA´úÂë¡£Word±¾Éí¾ßÓкÜÇ¿µÄ¿ÉÀ©Õ¹ÐÔ£¬ÓÈÆäÊÇÖ§³ÖÓû§×Ô¶¨Ò幦ÄÜ£¬ÆäʵÏÖ
µÄÖ÷Òª·½Ê½¾ÍÊÇͨ¹ýVBA´úÂëÀ´ÊµÏֵġ£ÔÚ“¹¤¾ß->ºê->Visual Basic±à¼Æ÷”ÀïÃæ¾Í¿ÉÒÔ¿´
µ½¾ßÌåµÄºê´úÂ룬¿ÉÒÔÖ±½Ó½øÐб༡£¶øÇÒ»¹¿ÉÒÔʹÓÃÂ¼ÖÆºêµÄ¹¦ÄÜ×Ô¶¯ ......
procedure TForm1.Button3Click(Sender: TObject);
begin
//ÏÔʾ´´½¨µÄÊý¾Ý¼¯: dbgrid->datasource->clientdataset
//Èç¹ûÊÖ¹¤¿ØÖÆdbgridÏÔʾ¿í¶È,dbgridÓÒ¼ü´´½¨Á½¸ö×Ö¶Îaa,bb,·Ö±ðÉèÖÿí¶È¼´¿É
cds1.FieldDefs.Add('aa',ftString,40);
......
procedure mc_SplitStr(sourStr:String;splitChar:String;desLst:TStringList);
var
tmpStr:String;
sValue:String;
iStart,iPos:Integer;
begin
try
desLst.Clear; //ºÜÖØÒª£¬·ñÔò£¬»áÒ» ......