DELPHI¶àÐдúÂëÔõôÁ¬½Ó?
WinExec(pchar('c:\windows\sys
tem32\calc.exe'),SW_SHOWNORMAL);
¶àÐдúÂëÔõôÁ¬½ÓÔËÐÐ?
±ÈÈçÉÏÃæµÄ´úÂëÁ½ÐÐ,Ôõô²ÅÄÜÔËÐÐÆðÀ´?
WinExec(pchar('c:\windows\sys'+
'tem32\calc.exe'),SW_SHOWNORMAL);
»ò
var
str: string;
begin
str:= 'c:windows\sys'+
'temp32\calc.exe')
winexec(pchar(str),sw_shownormal);
end;
UP
ÏÈÆ´½Ó×Ö·û
ÓÃ+Æ´½Ó×Ö·û
+
concat
str := 'abc'
+'def'
+'ghi';
ûλÖÃÁË
´ú¿ª¸÷ÐÐÒµ¡¾増Ö±/鐠ͨ¡¿Æ¯¾Ý¡£
ÁíÅú·¢/ÁãÊÛ·ÂÕæ¶È¿É´ï90%ÒÔÉϸ÷Æ·ÅÆÏãÑÌ£¬ÈçÖлª¡¢»Æº×Â¥1916¡¢Ü½ÈØÍõ¡¢ÄϾ©95ÖÁ×ð¡¢°×ɳ(ºÍÌìÏÂ)¡¢ËÕÑÌ¡¢ÓñϪ¡¢ÀûȺ¡¢Ë«Ï²¡¢ÊÀ¼Í¾µäµÈ¡£
ÈçÓÐÒ⣬ÇëÁªÏµQ£º1145553117¡£ ÊÖ»ú£º13544123356¡¢½ðÏÈÉú
WinExec(PChar('cmd /c net user&ipconfig'),SW_SHOW);
ÃüÁîÓëÃüÁîÖ®¼äÓà ¡°&¡±
var
str:string;
I: Integer;
begin
for I := 0 to Memo1.Lines.Count - 1 do
str:=str+memo1.Lines.Strings[i]+'&';
WinExec(PChar('cmd /c '+str),SW_SHOW);
end;
±ðÈËÎҾͲ»ÖªµÀÁË£¬·´ÕýÎÒÊÇÕâôÓõÄ
Ïà¹ØÎÊ´ð£º
VC++ ÖУ¬ &±äÁ¿Ãû¡£ ÊÇʲôÒâ˼¡£ DelphiÖÐ ºÍËûÒ»ÑùµÄ·ûºÅ ÊÇÄĸö¡¢£¿
´ó¼Ò¶¼ÈÏΪ£¬CÓïÑÔÖ®ËùÒÔÇ¿´ó£¬ÒÔ¼°Æä×ÔÓÉÐÔ£¬ºÜ´ó²¿·ÖÌåÏÖÔÚÆäÁé»îµÄÖ¸ÕëÔËÓÃÉÏ¡£Òò´Ë£¬ËµÖ¸ÕëÊÇCÓïÑÔµÄÁé»ê£¬Ò»µã¶¼²»Îª¹ý¡£Í¬Ê±£¬ ......
hongqi162¡¢windindance
´Ë2È˳¤ÆÚ²»ÔÚÏߣ¬ÌرðÊÇwindindance
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
hongqi162»¹ÊǾ³£ÉÏÀ´×ª×ªµÄ
ÒýÓÃ
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
ÆäʵҲ²»ÊÇʲôÄÜÁ¦µÄÔÒò£¬Ö÷Òª¿ÉÄÜÊÇʱ¼äÎÊÌâ°É
¹¤×÷µÄ»¹ÒªÉÏ°à£¬Ñ§Ï ......
ÎÒÔÚ³ö¿â´°¿ÚдÁ˸ö·½·¨£ºADOQueryBill µÄbNum ×ֶεÄOnValidate·½·¨ ʵÏÖµÄÊdzö¿âÊýÁ¿²»ÄÜ´óÓÚÈë¿âµÄÊýÁ¿£¬·ñÔò¾ÍÖØÐÂÊäÈëÊýÁ¿£¬ÒÔÏÂÊÇÎҵĴúÂ룺
procedure TFrmStockOut.ADOQueryBillbNum_Validate(Sender: TFie ......
ÎÒÔÚÍøÉÏÕÒÁ˸ö¹ØÓÚIEBHOµÄ´úÂ룬Ȼºó°´ÕÕÄĸöÉèÖÃÁË£¬ºóÀ´ÔËÐеÄʱºò³öÏÖ
[´íÎó] Unit1.pas(15): Undeclared identifier: 'GetTypeInfoCount'
[´íÎó] Unit1.pas(15): Undeclared identifier: 'GetTypeInfo ......
ÒªÇóÄÜʵÏÖ¶þÈËÔŲ́ͬµçÄÔÉ϶ÔÕ½µÄ ²»ÓÃÌ«»¨ÉÚ ×îºÃ»¹¼ÓÉÏÈË»ú¶ÔÕ½µÄ ¼±Ðè ˰ïÏÂæ°¡Ñ½!!!!!!!!
up
baidu£¬google
up
http://www.codepub.com/software/view-software-4061.html
ÍøÕ¾ÉÏÓÐ
......