在Windows工具列上 增加非MainForm的視窗
https://stackoverflow.com/questions/5493591/how-can-i-get-taskbar-buttons-for-forms-that-arent-the-main-form
https://stackoverflow.com/questions/5493591/how-can-i-get-taskbar-buttons-for-forms-that-arent-the-main-form
- 4月 07 週三 202111:46
Delphi 工具列上增加Form點選功能
- 4月 28 週二 202011:41
Delphi TStringList 自訂排序功能
使用TStringList 達成依照數字大小排序
unit XBCurrList;
unit XBCurrList;
- 12月 25 週三 201909:59
Delphi Enter 改成 TAB
procedure TForm1.Edit1KeyPress (Sender: TObject; var Key: Char) ;
begin
If Key = #13 Then Begin
If HiWord(GetKeyState(VK_SHIFT)) <> 0 then
SelectNext(Sender as TWinControl,False,True)
else
SelectNext(Sender as TWinControl,True,True) ;
Key := #0
end;
end;
begin
If Key = #13 Then Begin
If HiWord(GetKeyState(VK_SHIFT)) <> 0 then
SelectNext(Sender as TWinControl,False,True)
else
SelectNext(Sender as TWinControl,True,True) ;
Key := #0
end;
end;
- 12月 02 週一 201908:40
Delphi 四捨五入
Delphi 四捨五入
- 11月 19 週二 201911:18
Delphi TXBPWEdit 實現Edit部分文字屏蔽
(* ---------------------------------------------------------------------------------------------- *)
// XBPassWordEdit_Unit
// Author: Kamilia
// 元件用途: 實現Edit部分文字屏蔽
// 用法
// PWMarkerPos 屏蔽開始位置
// PWMarkerLen 屏蔽長度
// XBPassWordEdit_Unit
// Author: Kamilia
// 元件用途: 實現Edit部分文字屏蔽
// 用法
// PWMarkerPos 屏蔽開始位置
// PWMarkerLen 屏蔽長度
- 11月 06 週三 201922:07
Delphi 取得當前時間(微秒)
Window Api
QueryPerformanceFrequency
QueryPerformanceFrequency
- 10月 10 週四 201910:34
Delphi FMX InputBox 多欄 / 密碼
http://docwiki.appmethod.com/appmethod/1.16/libraries/en/FMX.Dialogs.InputQuery
- 8月 24 週六 201916:14
C# INI讀取寫入
using System.Runtime.InteropServices; //使用Winapi 讀寫 INI
...
...
- 8月 22 週四 201923:58
高DPI解法 所有程式語言適用
找了好久 終於找到高DPI的解法
1.手動執行 執行檔>右鍵內容>變更高DPI設定>覆寫高DPIn縮放比例行為 打勾> 縮放執行者 選系統 (選應用程式無效)
- 8月 10 週六 201911:36
Python實作WOL及DMS作業系統排程執行
使用Python 實作WOL代碼如下
import socket
JSP (2)