Weil Jimmer's Blog

檔案分割器

一個檔案切割器，用來切割檔案，支援大小為：GB、MB、KB、B等，選取檔案後，自動創建同名目錄，並在該目錄下進行檔案分割動作，可以選擇分割數量（2~999）或選擇分割大小！

如果估計被分割檔案為1個檔案則不予以分割，並提示用戶該檔過小而不必分割，或檔案過小以致於生成0Byte檔案，則提示無法切割。（0Byte或1Byte將無法分割）本程式會估算切割後大小以及未切割前的原始大小，並估算切割後會生成多少檔案，以及，是否創建Windows批次檔，進行合併，若，不創建，也可以使用本程式的組合功能！

下載地址【一】：https://url.weils.net/e

下載地址【二】：http://cht.tw/h/013pl

產品頁面：http://web.wbftw.org/product/danganfengeqi

多檔案字串搜尋替換器

一款搜尋資料夾內符合條件的檔案，進行字串搜索與替換的程式。

可以過濾副檔名與檔案大小（支援 Byte ～ GByte 的單位），及過濾唯讀檔或隱藏檔案，並且可以設定其屬性為正常。

載入目錄後，可以從左上方的等待清單裡面核選要進行搜尋或取代的檔案。再者，可以設定「預設文件編碼」及Bom設定 及 換行符號。

若讀取時發現有檔案頭包含Bom，則採用其Bom之編碼進行解譯，辨認不出時，則用預設文件編碼解譯。被搜尋到的文件將會顯示於左下方列表。

※支援：Big5、GBK、UTF-8、UTF-16(Big)、UTF-16(Little)，換行符：CR/LF、CR、LF。

※若進行替換字串時，發現其屬性包含唯讀，無法寫入時，將會自動變更屬性為正常，寫入完成後，再變更回原本的屬性。

2016.04.07 更新 Fixed 過濾欄位無法變更文字

下載地址【一】：https://url.weils.net/c

下載地址【二】：http://cht.tw/h/hvn4l

產品頁面：http://web.wbftw.org/product/duodangansouxuntihuanqi

殭屍生存遊戲

一款殭屍版的回合制戰略遊戲。

遊戲說明：

使用滑鼠左鍵進行槍枝射擊，滑鼠右鍵進行近戰攻擊。

可使用Enter或Q結束回合/天。或使用滑鼠點擊。

可使用WADS移動至黃色區塊。或使用滑鼠點擊。

可使用1234選取生存者。或用滑鼠點擊。

黃色區塊：當前可移動的範圍。

紅色區塊：當前可用近戰武器或槍攻擊的範圍。

紫色區塊：當前可丟擲手榴彈的範圍。（殺傷力3*3格。傷害：20~50。）

下載地址【一】：https://url.weils.net/b

下載地址【二】：http://cht.tw/h/us63i

產品頁面：http://web.wbftw.org/product/jiangshishengcunyouxi

Flash複製文字按鈕

經常網頁上用Java Script 複製到剪貼簿，瀏覽器總是拒絕存取，或是不兼容某些瀏覽器，實在很令人厭煩。現在，本團隊推出Flash複製按鈕，可以兼容所有瀏覽器。

【使用說明】

參數值：

copy_text=要複製的文字

style=1~8之中的數字

　1-黑色（預設是1）

　2-藍色

　3-綠色

　4-紅色

　5-粉紅

　6-紫色

　7-銀白

　8-黃色

type=1或0

　1為開啟Unicode的解譯

　0為關閉Unicode的解譯（預設是關閉）

Example：

<object type="application/x-shockwave-flash" data="WBF_cb.swf?type=1&style=8" width="100" height="50" >
<param name="flashvars" value="copy_text=36889,26159,25991,23383,35079,35069,30340,28204,35430,65281">
<param name="wmode" value="transparent">
</object>

<object type="application/x-shockwave-flash" data="WBF_cb.swf?copy_text=123" width="100" height="50" >
<param name="wmode" value="transparent">
</object>

下載地址【一】：https://url.weils.net/a

下載地址【二】：http://cht.tw/h/exipz

產品頁面：http://web.wbftw.org/product/flashfuzhiwenzianniu

雙重緩衝DataGridView

    Function DoubleBufferedx(ByVal dgv As DataGridView, ByVal setting As Boolean)
        Dim dgvType As Type = dgv.GetType()
        Dim pi As System.Reflection.PropertyInfo = dgvType.GetProperty("DoubleBuffered", System.Reflection.BindingFlags.Instance Or System.Reflection.BindingFlags.NonPublic)
        pi.SetValue(dgv, setting, Nothing)
        Return True
    End Function

僅此作為筆記。