Лао Сен Чанг Тан ИТ-помощь

Быстрый отчет в 1920*1080 разрешение плюс 125% Когда указанная выше среда настройки дисплея，Пропорция «Предварительный просмотр печати» будет неправильной.(слишком большой или слишком маленький)，Но фактическая печать нормальная.，Если вы хотите исправить，Необходимо изменить файл qrprntr.pas быстрого отчета в среде компиляции.，Есть два способа исправить это。

Продолжить просмотр »

Мой компьютер имеет внешний жесткий диск NTFS.，После недавней загрузки，Нажмите на этот диск в Тунаре，Все не удастся смонтировать，сообщение об ошибке “ошибка монтирования, неправильный тип фс, неправильный параметр, плохой суперблок…”。

Продолжить просмотр »

[Настройка VLAN]
◎「VLAN」→「802.1Q」→「Дополнительно」→「Конфигурация VLAN」，Выберите «Включить»。
◎ Последовательно добавлять идентификатор VLAN，Как：53、172。

Продолжить просмотр »

при установке программы，Появляется сообщение "На устройстве больше нет места"，Проверить с помощью df -h，/tmp заполнен。

Мой /tmp зависимый раздел，это с / та же магнитная область，и / есть место，Таким образом, вы можете временно увеличить пространство /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

При установке сетевого принтера，иногда после двух кликов，Произошла ошибка 0x00000BCB，Обычно встречается в этикетировщиках штрих-кодов и матричных принтерах.，Мейнфрейма никогда не было，Обычно переустановка драйвера на Windows Server решает проблему，Но через некоторое время，случится снова。
Продолжить просмотр »

<%# 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.'

【參考連結】

• asp.net – как применить определенный ФОРМАТ даты с помощью eval? – Переполнение стека
• C # – Что это 0 в “{0:мм дд гггг}” делать? – Переполнение стека
• Метод String.Format (Система) | Microsoft Docs
• Пользовательские строки формата даты и времени | Microsoft Docs
• Строки стандартного формата даты и времени | Microsoft Docs

註1.
ПапкаHKEY_CURRENT_USERSOFTWAREMicrosoftWindows NTCurrentVersionAppCompatFlagsLayers
Заметка 2.
ПапкаHKEY_LOCAL_MACHINESOFTWAREMicrosoftWindows NTCurrentVersionAppCompatFlagsLayers

PS. Ключ "строковое значение"，значение”~ АДМИНИСТРАТОР ЧЕЛОВЕКА”。

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 для оценки строки | три пещеры

Кажется, что в меню Delphi всегда используются шрифты, которые возвращаются к значениям по умолчанию. (8, Тахома) Проблема，Вопросы из-за границы，но нет решения。Временное решение, о котором я могу думать на данный момент, - установить функциональную клавишу (Можно установить как горячую клавишу)，Пусть пользователь сталкивается с маленьким размером шрифта，Сбросить размер шрифта самостоятельно。(Во время тестирования шрифт меню можно вернуть к значению по умолчанию, изменив процент размера экрана Windows.)

procedure Tmainform.N93Click(Sender: TObject);
begin
  Screen.MenuFont.Size := 12;
  xxxxxx.BringToFront; // 改變畫面焦點，以刷新選單畫面。
end;

【參考連結】

• Принудительное перерисовывание меню Delphi VCL – Переполнение стека
• иногда: Увеличение шрифта Delphi MainMenu и отсутствующий значок подсказки Menu Checked

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 во время выбора пункта меню? – Советы Делфи – ЗАО Дельфи (Крутые советы Delphi)
• GetKeyState:GetKeyState ，Эта функция извлекает указанный виртуальный ключ -Энциклопедия знаний китайской сети
• ДЕЛФИ ОнКейДаун,OnKeyPress,Разница OnKeyUp-CSDN Blog_delphi onkeydown
• таблица значений ключей delphi – Тайваньское племя
• Как определить нажатие клавиши ctrl-t в Delphi – Переполнение стека
• Таблица сравнения значений кодов клавиш клавиатуры