\u25c7[DELPHI]\u7f51\u7edc\u90bb\u5c45\u590d\u5236\u6587\u4ef6<\/p>\n
\r\nuses shellapi;\r\ncopyfile(pchar(\u2018newfile.txt\u2019),pchar(\u2018\/\/computername\/direction\/targer.txt\u2019),false);\r\n<\/pre>\n\u25c7[DELPHI]\u4ea7\u751f\u9f20\u6807\u62d6\u52a8\u6548\u679c<\/p>\n
\u901a\u8fc7MouseMove\u4e8b\u4ef6\u3001DragOver\u4e8b\u4ef6\u3001EndDrag\u4e8b\u4ef6\u5b9e\u73b0\uff0c\u4f8b\u5982\u5728PANEL\u4e0a\u7684LABEL\uff1a<\/p>\n
\r\nvar xpanel,ypanel,xlabel,ylabel:integer;\r\nPANEL\u7684MouseMove\u4e8b\u4ef6\uff1axpanel:=x;ypanel:=y;\r\nPANEL\u7684DragOver\u4e8b\u4ef6\uff1axpanel:=x;ypanel:=y;\r\nLABEL\u7684MouseMove\u4e8b\u4ef6\uff1axlabel:=x;ylabel:=y;\r\nLABEL\u7684EndDrag\u4e8b\u4ef6\uff1alabel.left:=xpanel-xlabel;label.top:=ypanel-ylabel;\r\n<\/pre>\n\u25c7[DELPHI]\u53d6\u5f97WINDOWS\u76ee\u5f55<\/p>\n
\r\nuses shellapi;\r\nvar windir:array[0..255] of char;\r\ngetwindowsdirectory(windir,sizeof(windir));\r\n<\/pre>\n\u6216\u8005\u4ece\u6ce8\u518c\u8868\u4e2d\u8bfb\u53d6\uff0c\u4f4d\u7f6e\uff1a
\nHKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion
\nSystemRoot\u952e\uff0c\u53d6\u5f97\u5982\uff1aC:\\WINDOWS<\/p>\n\u25c7[DELPHI]\u5728FORM\u6216\u5176\u4ed6\u5bb9\u5668\u4e0a\u753b\u7ebf<\/p>\n
\r\nvar x,y:array [0..50] of integer;\r\ncanvas.pen.color:=clred;\r\ncanvas.pen.style:=psDash;\r\nform1.canvas.moveto(trunc(x[i]),trunc(y[i]));\r\nform1.canvas.lineto(trunc(x[j]),trunc(y[j]));\r\n<\/pre>\n\u25c7[DELPHI]\u5b57\u7b26\u4e32\u5217\u8868\u4f7f\u7528<\/p>\n
\r\nvar tips:tstringlist;\r\ntips:=tstringlist.create;\r\ntips.loadfromfile(\u2018filename.txt\u2019);\r\nedit1.text:=tips[0];\r\ntips.add(\u2018last line addition string\u2019);\r\ntips.insert(1,\u2019insert string at NO 2 line\u2019);\r\ntips.savetofile(\u2018newfile.txt\u2019);\r\ntips.free;\r\n<\/pre>\n\u25c7[DELPHI]\u7b80\u5355\u7684\u526a\u8d34\u677f\u64cd\u4f5c<\/p>\n
\r\nrichedit1.selectall;\r\nrichedit1.copytoclipboard;\r\nrichedit1.cuttoclipboard;\r\nedit1.pastefromclipboard;\r\n<\/pre>\n\u25c7[DELPHI]\u5173\u4e8e\u6587\u4ef6\u3001\u76ee\u5f55\u64cd\u4f5c<\/p>\n
\r\nChdir(\u2018c:\\abcdir\u2019);\u8f6c\u5230\u76ee\u5f55\r\nMkdir(\u2018dirname\u2019);\u5efa\u7acb\u76ee\u5f55\r\nRmdir(\u2018dirname\u2019);\u5220\u9664\u76ee\u5f55\r\nGetCurrentDir;\/\/\u53d6\u5f53\u524d\u76ee\u5f55\u540d\uff0c\u65e0\u2019\\\u2019\r\nGetdir(0,s);\/\/\u53d6\u5de5\u4f5c\u76ee\u5f55\u540ds:=\u2019c:\\abcdir\u2019;\r\nDeletfile(\u2018abc.txt\u2019);\/\/\u5220\u9664\u6587\u4ef6\r\nRenamefile(\u2018old.txt\u2019,'new.txt\u2019);\/\/\u6587\u4ef6\u66f4\u540d\r\nExtractFilename(filelistbox1.filename);\/\/\u53d6\u6587\u4ef6\u540d\r\nExtractFileExt(filelistbox1.filename);\/\/\u53d6\u6587\u4ef6\u540e\u7f00\r\n<\/pre>\n\u25c7[DELPHI]\u5904\u7406\u6587\u4ef6\u5c5e\u6027<\/p>\n
\r\nattr:=filegetattr(filelistbox1.filename);\r\nif (attr and faReadonly)=faReadonly then \u2026 \/\/\u53ea\u8bfb\r\nif (attr and faSysfile)=faSysfile then \u2026 \/\/\u7cfb\u7edf\r\nif (attr and faArchive)=faArchive then \u2026 \/\/\u5b58\u6863\r\nif (attr and faHidden)=faHidden then \u2026 \/\/\u9690\u85cf\r\n<\/pre>\n\u25c7[DELPHI]\u6267\u884c\u7a0b\u5e8f\u5916\u6587\u4ef6<\/p>\n
\r\nWINEXEC\/\/\u8c03\u7528\u53ef\u6267\u884c\u6587\u4ef6\r\nwinexec(\u2018command.com \/c copy *.* c:\\\u2019,SW_Normal);\r\nwinexec(\u2018start abc.txt\u2019);\r\nShellExecute\u6216ShellExecuteEx\/\/\u542f\u52a8\u6587\u4ef6\u5173\u8054\u7a0b\u5e8f\r\nfunction executefile(const filename,params,defaultDir:string;showCmd:integer):THandle;\r\nExecuteFile(\u2018C:\\abc\\a.txt\u2019,'x.abc\u2019,'c:\\abc\\\u2019,0);\r\nExecuteFile(\u2018http:\/\/tingweb.yeah.net\u2019,\u201d,\u201d,0);\r\nExecuteFile(\u2018mailto:tingweb@wx88.net\u2019,\u201d,\u201d,0);\r\n<\/pre>\n\u25c7[DELPHI]\u53d6\u5f97\u7cfb\u7edf\u8fd0\u884c\u7684\u8fdb\u7a0b\u540d<\/p>\n
\r\nvar hCurrentWindow:HWnd;szText:array[0..254] of char;\r\nbegin\r\nhCurrentWindow:=Getwindow(handle,GW_HWndFrist);\r\nwhile hCurrentWindow <> 0 do\r\nbegin\r\nif Getwindowtext(hcurrnetwindow,@sztext,255)>0 then listbox1.items.add(strpas(@sztext));\r\nhCurrentWindow:=Getwindow(hCurrentwindow,GW_HWndNext);\r\nend;\r\nend;\r\n<\/pre>\n\u25c7[DELPHI]\u5173\u4e8e\u6c47\u7f16\u7684\u5d4c\u5165
\nAsm End;
\n\u53ef\u4ee5\u4efb\u610f\u4fee\u6539EAX\u3001ECX\u3001EDX\uff1b\u4e0d\u80fd\u4fee\u6539ESI\u3001EDI\u3001ESP\u3001EBP\u3001EBX\u3002<\/p>\n\u25c7[DELPHI]\u5173\u4e8e\u7c7b\u578b\u8f6c\u6362\u51fd\u6570<\/p>\n
\r\nFloatToStr\/\/\u6d6e\u70b9\u8f6c\u5b57\u7b26\u4e32\r\nFloatToStrF\/\/\u5e26\u683c\u5f0f\u7684\u6d6e\u70b9\u8f6c\u5b57\u7b26\u4e32\r\nIntToHex\/\/\u6574\u6570\u8f6c16\u8fdb\u5236\r\nTimeToStr\r\nDateToStr\r\nDateTimeToStr\r\nFmtStr\/\/\u6309\u6307\u5b9a\u683c\u5f0f\u8f93\u51fa\u5b57\u7b26\u4e32\r\nFormatDateTime(\u2018YYYY-MM-DD,hh-mm-ss\u2019,DATE);\r\n<\/pre>\n\u25c7[DELPHI]\u5b57\u7b26\u4e32\u7684\u8fc7\u7a0b\u548c\u51fd\u6570<\/p>\n
\r\nInsert(obj,target,pos);\/\/\u5b57\u7b26\u4e32target\u63d2\u5165\u5728pos\u7684\u4f4d\u7f6e\u3002\u5982\u63d2\u5165\u7ed3\u679c\u5927\u4e8etarget\u6700\u5927\u957f\u5ea6\uff0c\u591a\u51fa\u5b57\u7b26\u5c06\u88ab\u622a\u6389\u3002\u5982Pos\u5728255\u4ee5\u5916\uff0c\u4f1a\u4ea7\u751f\u8fd0\u884c\u9519\u3002\u4f8b\u5982\uff0cst:=\u2019Brian\u2019\uff0c\u5219Insert\uff08\u2019OK\u2019,st,2\uff09\u4f1a\u4f7fst\u53d8\u4e3a\u2019BrOKian\u2019\u3002\r\nDelete(st,pos,Num);\/\/\u4ecest\u4e32\u4e2d\u7684pos\uff08\u6574\u578b\uff09\u4f4d\u7f6e\u5f00\u59cb\u5220\u53bb\u4e2a\u6570\u4e3aNum\uff08\u6574\u578b\uff09\u4e2a\u5b57\u7b26\u7684\u5b50\u5b57\u4e32\u3002\u4f8b\u5982\uff0cst:=\u2019Brian\u2019\uff0c\u5219Delete(st,3,2)\u5c06\u53d8\u4e3aBrn\u3002\r\nStr(value,st);\/\/\u5c06\u6570\u503cvalue\uff08\u6574\u578b\u6216\u5b9e\u578b\uff09\u8f6c\u6362\u6210\u5b57\u7b26\u4e32\u653e\u5728st\u4e2d\u3002\u4f8b\u5982\uff0ca=2.5E4\u65f6\uff0c\u5219str(a:10,st)\u5c06\u4f7fst\u7684\u503c\u4e3a\u2019 25000\u2032\u3002\r\nVal(st,var,code);\/\/\u628a\u5b57\u7b26\u4e32\u8868\u8fbe\u5f0fst\u8f6c\u6362\u4e3a\u5bf9\u5e94\u6574\u578b\u6216\u5b9e\u578b\u6570\u503c\uff0c\u5b58\u653e\u5728var\u4e2d\u3002St\u5fc5\u987b\u662f\u4e00\u4e2a\u8868\u793a\u6570\u503c\u7684\u5b57\u7b26\u4e32\uff0c\u5e76\u7b26\u5408\u6570\u503c\u5e38\u6570\u7684\u89c4\u5219\u3002\u5728\u8f6c\u6362\u8fc7\u7a0b\u4e2d\uff0c\u5982\u679c\u6ca1\u6709\u68c0\u6d4b\u51fa\u9519\u8bef\uff0c\u53d8\u91cfcode\u7f6e\u4e3a0\uff0c\u5426\u5219\u7f6e\u4e3a\u7b2c\u4e00\u4e2a\u51fa\u9519\u5b57\u7b26\u7684\u4f4d\u7f6e\u3002\u4f8b\u5982\uff0cst:=25.4E3,x\u662f\u4e00\u4e2a\u5b9e\u578b\u53d8\u91cf\uff0c\u5219val(st,x,code)\u5c06\u4f7fX\u503c\u4e3a25400\uff0ccode\u503c\u4e3a0\u3002\r\nCopy(st.pos.num);\/\/\u8fd4\u56dest\u4e32\u4e2d\u4e00\u4e2a\u4f4d\u7f6epos\uff08\u6574\u578b\uff09\u5904\u5f00\u59cb\u7684\uff0c\u542b\u6709num\uff08\u6574\u578b\uff09\u4e2a\u5b57\u7b26\u7684\u5b50\u4e32\u3002\u5982\u679cpos\u5927\u4e8est\u5b57\u7b26\u4e32\u7684\u957f\u5ea6\uff0c\u90a3\u5c31\u4f1a\u8fd4\u56de\u4e00\u4e2a\u7a7a\u4e32\uff0c\u5982\u679cpos\u5728255\u4ee5\u5916\uff0c\u4f1a\u5f15\u8d77\u8fd0\u884c\u9519\u8bef\u3002\u4f8b\u5982\uff0cst:=\u2019Brian\u2019\uff0c\u5219Copy(st,2,2)\u8fd4\u56de\u2019ri\u2019\u3002\r\nConcat(st1,st2,st3\u2026\u2026,stn);\/\/\u628a\u6240\u6709\u81ea\u53d8\u91cf\u8868\u793a\u51fa\u7684\u5b57\u7b26\u4e32\u6309\u6240\u7ed9\u51fa\u7684\u987a\u5e8f\u8fde\u63a5\u8d77\u6765\uff0c\u5e76\u8fd4\u56de\u8fde\u63a5\u540e\u7684\u503c\u3002\u5982\u679c\u7ed3\u679c\u7684\u957f\u5ea6255\uff0c\u5c06\u4ea7\u751f\u8fd0\u884c\u9519\u8bef\u3002\u4f8b\u5982\uff0cst1:=\u2019Brian\u2019,st2:=\u2019 \u2018,st3:=\u2019Wilfred\u2019\uff0c\u5219Concat(st1,st2,st3)\u8fd4\u56de\u2019Brian Wilfred\u2019\u3002\r\nLength(st);\/\/\u8fd4\u56de\u5b57\u7b26\u4e32\u8868\u8fbe\u5f0fst\u7684\u957f\u5ea6\u3002\u4f8b\u5982\uff0cst:=\u2019Brian\u2019\uff0c\u5219Length(st)\u8fd4\u56de\u503c\u4e3a5\u3002\r\nPos(obj,target);\/\/\u8fd4\u56de\u5b57\u7b26\u4e32obj\u5728\u76ee\u6807\u5b57\u7b26\u4e32target\u7684\u7b2c\u4e00\u6b21\u51fa\u73b0\u7684\u4f4d\u7f6e\uff0c\u5982\u679ctarget\u6ca1\u6709\u5339\u914d\u7684\u4e32\uff0cPos\u51fd\u6570\u7684\u8fd4\u56de\u503c\u4e3a0\u3002\u4f8b\u5982\uff0ctarget:=\u2019Brian Wilfred\u2019\uff0c\u5219Pos(\u2018Wil\u2019,target)\u7684\u8fd4\u56de\u503c\u662f7\uff0cPos(\u2018hurbet\u2019,target)\u7684\u8fd4\u56de\u503c\u662f0\u3002\r\n<\/pre>\n\u25c7[DELPHI]\u5173\u4e8e\u5904\u7406\u6ce8\u518c\u8868<\/p>\n
\r\nuses Registry;\r\nvar reg:Tregistry;\r\nreg:=Tregistry.create;\r\nreg.rootkey:=\u2019HKey_Current_User\u2019;\r\nreg.openkey(\u2018Control Panel\\Desktop\u2019,false);\r\nreg.WriteString(\u2018Title Wallpaper\u2019,\u20190\u2032);\r\nreg.writeString(\u2018Wallpaper\u2019,filelistbox1.filename);\r\nreg.closereg;\r\nreg.free;\r\n<\/pre>\n\u25c7[DELPHI]\u5173\u4e8e\u952e\u76d8\u5e38\u91cf\u540d<\/p>\n
\r\nVK_BACK\/VK_TAB\/VK_RETURN\/VK_SHIFT\/VK_CONTROL\/VK_MENU\/VK_PAUSE\/VK_ESCAPE\r\n\/VK_SPACE\/VK_LEFT\/VK_RIGHT\/VK_UP\/VK_DOWN\r\nF1\u2013F12\uff1a$70(112)\u2013$7B(123)\r\nA-Z\uff1a$41(65)\u2013$5A(90)\r\n0-9\uff1a$30(48)\u2013$39(57)\r\n<\/pre>\n\u25c7[DELPHI]\u521d\u6b65\u5224\u65ad\u7a0b\u5e8f\u6bcd\u8bed
\nDELPHI\u8f6f\u4ef6\u7684DOS\u63d0\u793a\uff1aThis Program Must Be Run Under Win32.
\nVC++\u8f6f\u4ef6\u7684DOS\u63d0\u793a\uff1aThis Program Cannot Be Run In DOS Mode.<\/p>\n\u25c7[DELPHI]\u64cd\u4f5cCookie<\/p>\n
\r\nresponse.cookies("name").domain:=\u2019http:\/\/www.086net.com\u2019;\r\nwith response.cookies.add do\r\nbegin\r\nname:=\u2019username\u2019;\r\nvalue:=\u2019username\u2019;\r\nend\r\n<\/pre>\n\u25c7[DELPHI]\u589e\u52a0\u5230\u6587\u6863\u83dc\u5355\u8fde\u63a5<\/p>\n
\r\nuses shellapi,shlOBJ;\r\nshAddToRecentDocs(shArd_path,pchar(filepath));\/\/\u589e\u52a0\u8fde\u63a5\r\nshAddToRecentDocs(shArd_path,nil);\/\/\u6e05\u7a7a\r\n<\/pre>\n\u25c7[\u6742\u7c7b]\u5907\u4efd\u667a\u80fdABC\u8f93\u5165\u6cd5\u8bcd\u5e93<\/p>\n
windows\\system\\user.rem
\nwindows\\system\\tmmr.rem<\/p>\n\u25c7[DELPHI]\u5224\u65ad\u9f20\u6807\u6309\u952e<\/p>\n
\r\nif GetAsyncKeyState(VK_LButton)<>0 then \u2026 \/\/\u5de6\u952e\r\nif GetAsyncKeyState(VK_MButton)<>0 then \u2026 \/\/\u4e2d\u952e\r\nif GetAsyncKeyState(VK_RButton)<>0 then \u2026 \/\/\u53f3\u952e\r\n<\/pre>\n\u25c7[DELPHI]\u8bbe\u7f6e\u7a97\u4f53\u7684\u6700\u5927\u663e\u793a
\nonFormCreate\u4e8b\u4ef6<\/p>\n\r\nself.width:=screen.width;\r\nself.height:=screen.height;\r\n<\/pre>\n\u25c7[DELPHI]\u6309\u952e\u63a5\u53d7\u6d88\u606f
\nOnCreate\u4e8b\u4ef6\u4e2d\u5904\u7406\uff1aApplication.OnMessage:=MyOnMessage;<\/p>\n\r\nprocedure TForm1.MyOnMessage(var MSG:TMSG;var Handle:Boolean);\r\nbegin\r\nif msg.message=256 then \u2026 \/\/ANY\u952e\r\nif msg.message=112 then \u2026 \/\/F1\r\nif msg.message=113 then \u2026 \/\/F2\r\nend;\r\n<\/pre>\n\u25c7[\u6742\u7c7b]\u9690\u85cf\u5171\u4eab\u6587\u4ef6\u5939
\n\u5171\u4eab\u6548\u679c\uff1a\u53ef\u8bbf\u95ee\uff0c\u4f46\u4e0d\u53ef\u89c1\uff08\u5728\u8d44\u6e90\u7ba1\u7406\u3001\u7f51\u7edc\u90bb\u5c45\u4e2d\uff09
\n\u53d6\u5171\u4eab\u540d\u4e3a\uff1adirection$
\n\u8bbf\u95ee\uff1a\/\/computer\/dirction\/<\/p>\n\u25c7[Java Script]Java Script\u7f51\u9875\u5e38\u7528\u6548\u679c
\n\u7f51\u987560\u79d2\u5b9a\u65f6\u5173\u95ed<\/p>\n\r\n<script language="java script"><!\u2013\r\nsettimeout(\u2018window.close();\u2019,60000)\r\n\u2013><\/script>\r\n\u5173\u95ed\u7a97\u53e3\r\n<a href="\/" onclick="javascript:window.close();return false;">\u5173\u95ed\r\n\u5b9a\u65f6\u8f6cURL\r\n<meta http-equiv="refresh" content="40;url=http:\/\/www.086net.com">\r\n\u8bbe\u4e3a\u9996\u9875\r\n<a onclick="this.style.behavior=\u2019url(#default#homepage)\u2019;this.sethomepage(\u2018http:\/\/086net.com\u2019);"href="#">\u8bbe\u4e3a\u9996\u9875\r\n\u6536\u85cf\u672c\u7ad9\r\n<a href="javascript:window.external.addfavorite(\u2018http:\/\/086net.com\u2019,\u2019[\u672a\u540d\u7801\u5934]\u2018)">\u6536\u85cf\u672c\u7ad9\r\n\u52a0\u5165\u9891\u9053\r\n<a href="javascript:window.external.addchannel(\u2018http:\/\/086net.com\u2019)">\u52a0\u5165\u9891\u9053\r\n<\/pre>\n\u25c7[DELPHI]\u6587\u672c\u7f16\u8f91\u76f8\u5173<\/p>\n
\r\ncheckbox1.checked:=not checkbox1.checked;\r\nif checkbox1.checked then richedit1.font.style:=richedit1.font.style+[fsBold] else richedit1.font.style:=richedit1.font.style-[fsBold]\/\/\u7c97\u4f53\r\nif checkbox1.checked then richedit1.font.style:=richedit1.font.style+[fsItalic] else richedit1.font.style:=richedit1.font.style-[fsItalic]\/\/\u659c\u4f53\r\nif checkbox1.checked then richedit1.font.style:=richedit1.font.style+[fsUnderline] else richedit1.font.style:=richedit1.font.style-[fsUnderline]\/\/\u4e0b\u5212\u7ebf\r\nmemo1.alignment:=taLeftJustify;\/\/\u5c45\u5de6\r\nmemo1.alignment:=taRightJustify;\/\/\u5c45\u53f3\r\nmemo1.alignment:=taCenter;\/\/\u5c45\u4e2d\r\n<\/pre>\n\u25c7[DELPHI]\u968f\u673a\u4ea7\u751f\u6587\u672c\u8272<\/p>\n
\r\nrandomize;\/\/\u968f\u673a\u79cd\u5b50\r\nmemo1.font.color:=rgb(random(255),random(255),random(255));\r\n<\/pre>\n\u25c7[DELPHI]DELPHI5 UPDATE\u5347\u7ea7\u8865\u4e01\u5e8f\u5217\u53f7<\/p>\n
1000003185
\n90X25fx0<\/p>\n\u25c7[DELPHI]\u6587\u4ef6\u540d\u7684\u975e\u6cd5\u5b57\u7b26\u8fc7\u6ee4<\/p>\n
\r\nfor i:=1 to length(s) do\r\nif s[i] in ['\\','\/',':','*','?','<','>','|'] then\r\n<\/pre>\n\u25c7[DELPHI]\u8f6c\u6362\u51fd\u6570\u7684\u5b9a\u4e49\u53ca\u8bf4\u660e<\/p>\n
\r\ndatetimetofiledate (datetime:Tdatetime):longint; \u5c06Tdatetime\u683c\u5f0f\u7684\u65e5\u671f\u65f6\u95f4\u503c\u8f6c\u6362\u6210DOS\u683c\u5f0f\u7684\u65e5\u671f\u65f6\u95f4\u503c\r\ndatetimetostr (datetime:Tdatetime):string; \u5c06Tdatatime\u683c\u5f0f\u53d8\u91cf\u8f6c\u6362\u6210\u5b57\u7b26\u4e32\uff0c\u5982\u679cdatetime\u53c2\u6570\u4e0d\u5305\u542b\u65e5\u671f\u503c\uff0c\u8fd4\u56de\u5b57\u7b26\u4e32\u65e5\u671f\u663e\u793a\u6210\u4e3a00\/00\/00\uff0c\u5982\u679cdatetime\u53c2\u6570\u4e2d\u6ca1\u6709\u65f6\u95f4\u503c\uff0c\u8fd4\u56de\u5b57\u7b26\u4e32\u4e2d\u7684\u65f6\u95f4\u90e8\u5206\u663e\u793a\u6210\u4e3a00\uff1a00\uff1a00 AM\r\ndatetimetostring (var result string;\r\nconst format:string;\r\ndatetime:Tdatetime); \u6839\u636e\u7ed9\u5b9a\u7684\u683c\u5f0f\u5b57\u7b26\u4e32\u8f6c\u6362\u65f6\u95f4\u548c\u65e5\u671f\u503c\uff0cresult\u4e3a\u7ed3\u679c\u5b57\u7b26\u4e32\uff0cformat\u4e3a\u8f6c\u6362\u683c\u5f0f\u5b57\u7b26\u4e32\uff0cdatetime\u4e3a\u65e5\u671f\u65f6\u95f4\u503c\r\ndatetostr (date:Tdatetime) \u4f7f\u7528shortdateformat\u5168\u5c40\u53d8\u91cf\u5b9a\u4e49\u7684\u683c\u5f0f\u5b57\u7b26\u4e32\u5c06date\u53c2\u6570\u8f6c\u6362\u6210\u5bf9\u5e94\u7684\u5b57\u7b26\u4e32\r\nfloattodecimal (var result:Tfloatrec;value:\r\nextended;precision,decimals:\r\ninteger); \u5c06\u6d6e\u70b9\u6570\u8f6c\u6362\u6210\u5341\u8fdb\u5236\u8868\u793a\r\nfloattostr (value:extended):string \u5c06\u6d6e\u70b9\u6570value\u8f6c\u6362\u6210\u5b57\u7b26\u4e32\u683c\u5f0f\uff0c\u8be5\u8f6c\u6362\u4f7f\u7528\u666e\u901a\u6570\u5b57\u683c\u5f0f\uff0c\u8f6c\u6362\u7684\u6709\u6548\u4f4d\u6570\u4e3a15\u4f4d\u3002\r\nfloattotext (buffer:pchar;value:extended;\r\nformat:Tfloatformat;precision,\r\ndigits:integer):integer; \u7528\u7ed9\u5b9a\u7684\u683c\u5f0f\u3001\u7cbe\u5ea6\u548c\u5c0f\u6570\u5c06\u6d6e\u70b9\u503cvalue\u8f6c\u6362\u6210\u5341\u8fdb\u5236\u8868\u793a\u5f62\u5f0f\uff0c\u8f6c\u6362\u7ed3\u679c\u5b58\u653e\u4e8ebuffer\u53c2\u6570\u4e2d\uff0c\u51fd\u6570\u8fd4\u56de\u503c\u4e3a\u5b58\u50a8\u5230buffer\u4e2d\u7684\u5b57\u7b26\u4f4d\u6570\uff0cbuffer\u662f\u975e0\u7ed3\u679c\u7684\u5b57\u7b26\u4e32\u7f13\u51b2\u533a\u3002\r\nfloattotextfmt (buffer:pchar;value:extended;\r\nformat:pchar):integer \u7528\u7ed9\u5b9a\u7684\u683c\u5f0f\u5c06\u6d6e\u70b9\u503cvalue\u8f6c\u6362\u6210\u5341\u8fdb\u5236\u8868\u793a\u5f62\u5f0f\uff0c\u8f6c\u6362\u7ed3\u679c\u5b58\u653e\u4e8ebuffer\u53c2\u6570\u4e2d\uff0c\u51fd\u6570\u8fd4\u56de\u503c\u4e3a\u5b58\u50a8\u5230buffer\u4e2d\u7684\u5b57\u7b26\u4f4d\u6570\u3002\r\ninttohex (value:longint;digits:integer):\r\nstring; \u5c06\u7ed9\u5b9a\u7684\u6570\u503cvalue\u8f6c\u6362\u6210\u5341\u516d\u8fdb\u5236\u7684\u5b57\u7b26\u4e32\u3002\u53c2\u6570digits\u7ed9\u51fa\u8f6c\u6362\u7ed3\u679c\u5b57\u7b26\u4e32\u5305\u542b\u7684\u6570\u5b57\u4f4d\u6570\u3002\r\ninttostr (value:longint):string \u5c06\u6574\u6570\u8f6c\u6362\u6210\u5341\u8fdb\u5236\u5f62\u5f0f\u5b57\u7b26\u4e32\r\nstrtodate (const S:string):Tdatetime \u5c06\u5b57\u7b26\u4e32\u8f6c\u6362\u6210\u65e5\u671f\u503c\uff0cS\u5fc5\u987b\u5305\u542b\u4e00\u4e2a\u5408\u6cd5\u7684\u683c\u5f0f\u65e5\u671f\u7684\u5b57\u7b26\u4e32\u3002\r\nstrtodatetime (const S:string):Tdatetime \u5c06\u5b57\u7b26\u4e32S\u8f6c\u6362\u6210\u65e5\u671f\u65f6\u95f4\u683c\u5f0f\uff0cS\u5fc5\u987b\u5177\u6709MM\/DD\/YY HH\uff1aMM\uff1aSS[AM|PM]\u683c\u5f0f\uff0c\u5176\u4e2d\u65e5\u671f\u548c\u65f6\u95f4\u5206\u9694\u7b26\u4e0e\u7cfb\u7edf\u65f6\u671f\u65f6\u95f4\u5e38\u91cf\u8bbe\u7f6e\u76f8\u5173\u3002\u5982\u679c\u6ca1\u6709\u6307\u5b9aAM\u6216PM\u4fe1\u606f\uff0c\u8868\u793a\u4f7f\u752824\u5c0f\u65f6\u5236\u3002\r\nstrtofloat (const S:string):extended; \u5c06\u7ed9\u5b9a\u7684\u5b57\u7b26\u4e32\u8f6c\u6362\u6210\u6d6e\u70b9\u6570\uff0c\u5b57\u7b26\u4e32\u5177\u6709\u5982\u4e0b\u683c\u5f0f\uff1a\r\n[+|-]nnn\u2026[.]nnn\u2026[<+|-><E|e><+|->nnnn]\r\nstrtoint (const S:string):longint \u5c06\u6570\u5b57\u5b57\u7b26\u4e32\u8f6c\u6362\u6210\u6574\u6570\uff0c\u5b57\u7b26\u4e32\u53ef\u4ee5\u662f\u5341\u8fdb\u5236\u6216\u5341\u516d\u8fdb\u5236\u683c\u5f0f\uff0c\u5982\u679c\u5b57\u7b26\u4e32\u4e0d\u662f\u4e00\u4e2a\u5408\u6cd5\u7684\u6570\u5b57\u5b57\u7b26\u4e32\uff0c\u7cfb\u7edf\u53d1\u751fECONVERTERROR\u5f02\u5e38\r\nstrtointdef (const S:string;default:\r\nlongint):longint; \u5c06\u5b57\u7b26\u4e32S\u8f6c\u6362\u6210\u6570\u5b57\uff0c\u5982\u679c\u4e0d\u80fd\u5c06S\u8f6c\u6362\u6210\u6570\u5b57\uff0cstrtointdef\u51fd\u6570\u8fd4\u56de\u53c2\u6570default\u7684\u503c\u3002\r\nstrtotime (const S:string):Tdatetime \u5c06\u5b57\u7b26\u4e32S\u8f6c\u6362\u6210TDATETIME\u503c\uff0cS\u5177\u6709HH\uff1aMM\uff1aSS[AM|PM]\u683c\u5f0f\uff0c\u5b9e\u9645\u7684\u683c\u5f0f\u4e0e\u7cfb\u7edf\u7684\u65f6\u95f4\u76f8\u5173\u7684\u5168\u5c40\u53d8\u91cf\u6709\u5173\u3002\r\ntimetostr (time:Tdatetime):string; \u5c06\u53c2\u6570TIME\u8f6c\u6362\u6210\u5b57\u7b26\u4e32\u3002\u8f6c\u6362\u7ed3\u679c\u5b57\u7b26\u4e32\u7684\u683c\u5f0f\u4e0e\u7cfb\u7edf\u7684\u65f6\u95f4\u76f8\u5173\u5e38\u91cf\u7684\u8bbe\u7f6e\u6709\u5173\u3002\r\n<\/pre>\n\u25c7[DELPHI]\u7a0b\u5e8f\u4e0d\u51fa\u73b0\u5728ALT+CTRL+DEL<\/p>\n
\u5728implementation\u540e\u6dfb\u52a0\u58f0\u660e:<\/p>\n
\r\nfunction RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; stdcall; external \u2018KERNEL32.DLL\u2019;\r\nRegisterServiceProcess(GetCurrentProcessID, 1);\/\/\u9690\u85cf\r\nRegisterServiceProcess(GetCurrentProcessID, 0);\/\/\u663e\u793a\r\n<\/pre>\n\u7528ALT+DEL+CTRL\u770b\u4e0d\u89c1<\/p>\n
\u25c7[DELPHI]\u7a0b\u5e8f\u4e0d\u51fa\u73b0\u5728\u4efb\u52a1\u680f<\/p>\n
\r\nuses windows\r\nvar\r\nExtendedStyle : Integer;\r\nbegin\r\nApplication.Initialize;\r\n<\/pre>\n","protected":false},"excerpt":{"rendered":"\u25c7[DELPHI]\u7f51\u7edc\u90bb\u5c45\u590d\u5236\u6587\u4ef6 uses shellapi; copyfile(pchar(\u2018newfil […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[6],"tags":[],"class_list":["post-215","post","type-post","status-publish","format-standard","hentry","category-code_related"],"_links":{"self":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts\/215","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/comments?post=215"}],"version-history":[{"count":1,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts\/215\/revisions"}],"predecessor-version":[{"id":4800,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts\/215\/revisions\/4800"}],"wp:attachment":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/media?parent=215"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/categories?post=215"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/tags?post=215"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}