Сентябрь 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.'

【參考連結】

Август 22
Страница настроек объект положение уставки
"ярлык" ярлык файл ярлыка
"совместимость" Пользователь 機碼(Примечание 1.)
«Совместимость для всех пользователей» Все пользователи 機碼(Заметка 2.)

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

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

Июль 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;

【參考連結】

Июль 11

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

【參考連結】

Июль 11
var
  vTime, vTime1, vTime2: double;
begin
  vTime1 := GetTickCount();
  vTime2 := GetTickCount();
  vTime := (vTime2 - vTime1) / 1000;
  Showmessage(floatToStr(vTime) + 's');
end;

【參考連結】

Май 9

Я ранее писал "Подать заявку на подстановочный сертификат Let’s Encrypt в Windows",Эта статья в основном через “Получи HTTPS бесплатно!” Веб-сайт подает заявку на получение сертификата или продлевает его вручную。При запуске нового веб-сайта недавно,Попробуйте подать заявку с помощью инструмента WIN-ACME,чтобы потом было проще использовать его автоматическое расширение (обновление) Характеристики。
Продолжить просмотр »

Апрель 20

Joomla, кажется, начинается с 2.X и 3.X,Адрес электронной почты в статье будет автоматически преобразован в формат гиперссылки.。Использование синтаксиса Javascript для адреса электронной почты страницы сегодня,приводит к щелчку,Появятся два окна Outlook,Так что вам нужно отключить встроенную функцию преобразования。
Продолжить просмотр »

Апрель 15

Консультации по охране окружающей среды:Объем памяти узла WSUS рекомендуется превышать 8 ГБ.。

Q. WSUS часто или всегда выдает ошибку подключения,Необходимо сбросить узел сервера。
А1. Попробуйте сначала,Поставить WsusPool(IIS) убрать "особый лимит памяти"。
Сбросить серверные узлы WSUS | Старый Сен Чан Тан

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