delphi ½Å±¾ÒýÇæ±È½Ï
TMS Scripter£ºÖ§³ÖPascalºÍVBScriptÁ½ÖÖÓï·¨¡£ÓŵãÊÇÎĵµÆëÈ«¡¢Àý×ÓÆëÈ«£¬½Å±¾¿ÉÖ±½ÓÖ§³ÖDLL£¬¹Ù·½»¹ÌṩÁ˷ḻµÄIDE Debug¹¤¾ß¡¢µ¥Ôªµ¼³öº¯Êý¹¤¾ßµÈ£¬È±µãÊDZàÒëÔËÐнÏÂý¡£for ¿ÕÑ»·1000Íò´Î£¬ÐèÒª10ÃëÖÓÒÔÉÏ¡£TMS ScripterÊÇÉÌÒµ¹²ÏíÈí¼þ¡£
FastScript£ºÓùýFastReport±¨±íµÄͬѧ¶¼ÖªµÀFastReportËٶȷdz£¿ì¡£for ¿ÕÑ»·1000Íò´Î£¬Ö»ºÄ·Ñ4ÖÁ5Ãë×óÓÒ¡£ÆäÖÐFastScriptÔÚ±¨±í¿É×ö°æ±¾ÅÅ°æ΢µ÷´¦Àí¡¢º¯Êý¼ÆËãµÈ¡£ÆäÓŵãÊÇËٶȺܿ졢ºÜÈÝÒ×д³ö½Å±¾µ¥ÔªµÄRTTI×é¼þ¡¢Ö§³Öpascal¡¢VBScript¡¢JS¡¢C ËÄÖÖÓï·¨£¬È±µãÊÇÎĵµºÍÀý×ӱȽÏÉÙ£¬Ä¬ÈϵĽű¾²»ÄÜÖ±½ÓÖ§³ÖDLL¡£FSÒ²ÊÇÉÌÒµ¹²ÏíÈí¼þ¡£
Remobjects PascalScript£¬¹ËÃû˼Ò壬ֻ֧³ÖpascalÓï·¨£¬Remobjects ³õÖÔÊÇÔÚDAÀïÌṩ×Ô¶¨ÒåµÄ½Å±¾´¦Àí¡£ÓŵãÊÇÃâ·ÑÈí¼þ£¬½Å±¾Ö±½ÓÖ§³ÖDLL ¡£È±µãÊÇÎĵµ²»¶à¡£ËٶȱÈTMS Scripter ÉÔ¿ì¡£
PaxScripterÊÇ×ÛºÏÐÔÄÜ×îºÃµÄ½Å±¾½âÊÍÆ÷¡£ÆäÓŵãÊÇËÙ¶È×î¿ì£¬for ¿ÕÑ»·1000Íò´Î£¬Ö»ºÄ·Ñ1ÖÁ2Ãë×óÓÒ¡£ÎĵµºÍÀý×ӱȽÏÆëÈ«£¬Óе¼³öº¯Êý¹¤¾ß¡£½Å±¾ÀïÖ±½ÓÖ§³ÖDLL¡£Ö§³Öpascal¡¢VBScript¡¢JS¡¢C ËÄÖÖÓï·¨¡£È±µãÊÇ£¬×÷Õß05ÄêÖÁ½ñÉÐδ¸üа汾¡£×÷ÕßÐËȤÒѾ²»Ôڽű¾½âÊÍÆ÷£¬×¨ÃÅÑо¿.NetºÍpascal±àÒëÆ÷¡£Òò´Ë£¬PaxScripterÖÁ½ñÉв»ÄÜÖ§³ÖD2009¡£PaxScripterÊÇÉÌÒµÈí¼þ¡£Èç¹ûÖ»ÏëÖ§³ÖpascalÓï·¨¼´¿É£¬¿ÉÓÃ×÷ÕßµÄpascal±àÒëÆ÷´úÌæPaxScripter£¬ËٶȸüÊDZÈPaxScripter»¹Òª¿ì¡£
Ïà¹ØÎĵµ£º
procedure TForm1.Button2Click(Sender: TObject);
var
name:String ;
begin
name := edit2.Text ;
name := '%' + name ;
query1.Close ;
query1.SQL.Clear ;
query1.SQL.Add('select * from gjh_t where name like '''+name+'''') ;
&nb ......
Delphi ÖÐ FindWindow ºÍ FindWindowEx µÄÓï·¨ºÍÓ÷¨
FindWindow(
lpClassName, {´°¿ÚµÄÀàÃû}
lpWindowName: PChar {´°¿ÚµÄ±êÌâ}
): HWND; {·µ»Ø´°¿ÚµÄ¾ä±ú; ʧ°Ü·µ»Ø 0}
//FindWin ......
µÚÒ»ÖÖ·½·¨£º
µÚÒ»²½£º ÐÞ¸ÄÊôÐÔ
1¡¢kind -> dtktime Ò²¿ÉÒÔÊÇdtkdate µ«ÊÇÔÚÓÃdtkdateµÄʱºòÐèÒª½«datemodeÊôÐÔÐ޸ijÉdmUpDown
2¡¢parseinput -> true
µÚ¶þ²½£ºÔÚonUserInputʼþÖÐдһ¾ä´úÂë
DateTimePicker1.DateTime:=DateAndTime;
×¢£ºÒÔÉÏ·½·¨ËäÈ»¿ÉÒԴﵽĿµÄ£¬µ ......
Windows ÏÂÒ»¸öµäÐ͵ÄÌØÕ÷¾ÍÊǶàÈÎÎñ£¬ÎÒÃÇ¿ÉÒÔͬʱ´ò¿ª¶à¸ö´°¿Ú½øÐвÙ×÷£¬Ò²¿ÉÒÔͬʱÔËÐгÌÐòµÄ¶à¸öʵÀý£¬±ÈÈç¿ÉÒÔ´ò¿ªÐí¶à¸ö×ÊÔ´¹ÜÀíÆ÷½øÐÐÎļþµÄÒƶ¯¸´ÖƲÙ×÷¡£µ«ÓÐʱ³öÓÚijÖÖ¿¼ÂÇ£¨±ÈÈ簲ȫÐÔ£©£¬ÎÒÃÇÒª×ö³öһЩÏÞÖÆ£¬ÈóÌÐòÖ»Äܹ»ÔËÐÐÒ»¸öʵÀý¡£ÔÚDelphi±à³ÌÖУ¬±ÊÕß×ܽá³öÁËÒÔϼ¸ÖÖ·½·¨£º
¡¡¡¡Ò»¡¢ ²éÕÒ´°¿Ú·¨
¡¡¡ ......