2019年6月1日

Get IP Address for different Adpater

摘要： 1 CLS 2 $NetworkAdapters = Get-WmiObject -Class win32_networkadapter | ?{$_.PhysicalAdapter -eq 'True'} |select NetConnectionID 3 foreach($NetworkAdapter in $NetworkAdapters) 4 { 5 $CurrentAda... 阅读全文

posted @ 2019-06-01 11:00 KivinLau 阅读(219) 评论(0) 推荐(0)

Test-Admin

摘要： function Test-IsAdmin { return ([Security.Principal.WindowsPrincipal] [Security.Principal.WindowsIdentity]::GetCurrent()).IsInRole([Security.Principal.WindowsBuiltInRole] "Administrator") } Test-... 阅读全文

posted @ 2019-06-01 10:42 KivinLau 阅读(240) 评论(0) 推荐(0)

2015年9月27日

Run bat file in Delphi

摘要： D Code123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475uni... 阅读全文

posted @ 2015-09-27 14:04 KivinLau 阅读(189) 评论(0) 推荐(0)

2015年7月14日

Color To String

摘要： Pascal Code12345678910111213141516171819202122232425262728293031323334353637383940414243unitPickColor;interfaceusesWinapi.Windows,Winapi.Messages,Syst... 阅读全文

posted @ 2015-07-14 23:57 KivinLau 阅读(95) 评论(0) 推荐(0)

Random

摘要： Pascal Code12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758unitRand;interfaceusesWinapi.Win... 阅读全文

posted @ 2015-07-14 23:54 KivinLau 阅读(154) 评论(0) 推荐(0)

Uppercase and Lowercase

摘要： Pascal Code12345678910111213141516171819202122232425262728293031323334353637unitUpperCaseAndLowerCase;interfaceusesWinapi.Windows,Winapi.Messages,Syst... 阅读全文

posted @ 2015-07-14 23:51 KivinLau 阅读(559) 评论(0) 推荐(0)

Function Overload

摘要： Pascal Code1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556unitGetOverload;interfaceusesWinapi.... 阅读全文

posted @ 2015-07-14 23:49 KivinLau 阅读(203) 评论(0) 推荐(0)

PlusSum

摘要： Pascal Code1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768unitSumPlus;... 阅读全文

posted @ 2015-07-14 23:46 KivinLau 阅读(110) 评论(0) 推荐(0)

Return via Address

摘要： Pascal Code1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253unitXingshiCanshu;interfaceusesWinapi.Wind... 阅读全文

posted @ 2015-07-14 23:44 KivinLau 阅读(113) 评论(0) 推荐(0)

Const

摘要： Pascal Code12345678910111213141516171819202122232425262728293031323334353637383940414243444546unitFunctioncal;interfaceusesWinapi.Windows,Winapi.Messa... 阅读全文

posted @ 2015-07-14 23:41 KivinLau 阅读(143) 评论(0) 推荐(0)

2019年6月1日

2015年9月27日

2015年7月14日

公告