陈方安生 | 
02 19日, 2024| 
Quick Report 在 1920*1080 解析度加上 125% 以上的显示设定环境时，会发生「预览列印」的比例不对(过大或过小)，但实际印出来是正常的情形，如果要修正，需要在编译环境修正 Quick Report 的 qrprntr.pas 档，有两种修正方式。
二月
19
十二月
31
我的电脑固定有外接一颗 NTFS 的硬碟，最近开机后，在 Thunar 点击这颗硬碟，都会挂载失败，错误讯息时 “安装错误 fs 类型错误选项错误超级块…”。
一月
2
安装程式时，出现「装置上已无多余空间」，用 df -h 查，是 /tmp 满了。
我的 /tmp 非独立磁区，是跟 / 同磁区，且 / 还有空间，所以可以透过重新 mount 的指令来暂时增加 /tmp 的空间。
df -h /tmp #查詢 /tmp 佔用空間。 sudo mount -o remount,size=15G /tmp/ #將 /tmp 大小改成 15G。 df -h /tmp #確認 /tmp 的佔用 % 是否改變。
若要清空 /tmp，可以执行以下指令：
sudo rm -r /tmp/*
【參考連結】
- 如何在 Linux 上增加临时文件夹的大小
- 如何清理/tmp？ – Ubuntu问答
九月
1
在安装网路印表机时，有时会在点两下后，出现 0x00000BCB 的错误，通常发生在条码标签机以及点阵印表机，大型事务机则没发生过，通常重新安装 Windows Server 上的驱动可以解决，但是隔一段时间后，就又会发生。
继续浏览 »
八月
25
<%# Eval("SDate", "{0:yyyy/MM/dd}") %>
// 0: 表示定義整個括號裡面的第 0 個變數要採用此日期格式。
// 以下為兩個變數的範例。
string s = String.Format("At {0}, the temperature is {1}°C.",
DateTime.Now, 20.4);
Console.WriteLine(s);
// Output similar to: 'At 4/10/2015 9:29:41 AM, the temperature is 20.4°C.'
【參考連結】
- 网 – 如何使用 eval 应用特定的日期格式? – 堆栈溢出
- C＃ – 什么是 0 在 “{0:MM dd yyyy}” 做? – 堆栈溢出
- String.Format 方法 (系统) | 微软文档
- 自订日期与时间格式字串 | 微软文档
- 标准日期和时间格式字串 | 微软文档
八月
22
| 设定页面 | 对象 | 设定值位置 |
| 「捷径」 | 该捷径 | 捷径档 |
| 「相容性」 | 用户 | 码机(注意：1。) |
| 「所有使用者的相容性」 | 所有User | 码机(注2.) |
注1.
电脑HKEY_CURRENT_USERSOFTWAREMicrosoftWindows NTCurrentVersionAppCompatFlagsLayers
注2.
电脑HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindows NTCurrentVersionAppCompatFlagsLayers
聚苯乙烯. 机码为「字串值」，值为”〜人类管理员”。
七月
11
unit unit1;
interface
uses
Windows, Messages....
type
TFormName = (Casefm1, Casefm2, Casefm3);
function xxx(): Boolean;
var
StrFormName: String;
CaseFormName: TFormName;
begin
StrFormName := 'Case' + vFormName;
// 將 FormName(物件) 與 TFormName(值) 做區隔。
// (vFormName為帶有各FormName的字串變數)
CaseFormName := TFormName(GetEnumValue(TypeInfo(TFormName), StrFormName));
case CaseFormName of
Casefm1:
begin
..............
end;
Casefm2:
begin
..............
end;
Casefm3:
begin
...............
end;
【參考連結】
- case 判断string的方法 | 三窟
七月
11
Delphi 选单似乎一直都有字型会变回预设值 (8, 塔霍马) 的问题，国外有人提问，但没有解决方式。目前我能想到的暂时解法是设定一个功能键 (可设为热键)，让 user 遇到字型变小时，自行重置字型大小。(测试过程可透过变更 Windows 显示大小百分比来让选单字型变回预设值)
procedure Tmainform.N93Click(Sender: TObject); begin Screen.MenuFont.Size := 12; xxxxxx.BringToFront; // 改變畫面焦點，以刷新選單畫面。 end;
【參考連結】
七月
11
procedure TfmQAB.FormShortCut(var Msg: TWMKey; var Handled: Boolean);
begin
if (Msg.CharCode = 116) and (HiWord(GetKeyState(VK_CONTROL)) = 1) then
begin
......
end
end;
【參考連結】
- 在菜单项选择期间抓住 SHIFT 键? – 德尔福技巧 – CJC德尔福 (酷德尔福技巧)
- 获取密钥状态:获取密钥状态 ，该函式检取指定虚拟键的 -百科知识中文网
- 德尔福 OnKeyDown,OnKeyPress,OnKeyUp区别_踏雪无痕的博客-CSDN博客_delphi onkeydown
- delphi key值表 – 台部落
- 如何在 Delphi 中检测 ctrl-t 按键 – 堆栈溢出
- 键盘键码值对照表
