Julio 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;

【參考連結】

Julio 11

Los menús de Delphi parecen tener siempre fuentes que vuelven a las predeterminadas (8, Tahoma) El problema,Preguntas desde el exterior,pero no hay solución。La solución temporal que se me ocurre en este momento es establecer una tecla de función (Se puede configurar como tecla de acceso directo),Permita que el usuario encuentre un tamaño de fuente pequeño,Restablezca el tamaño de fuente usted mismo。(Durante la prueba, la fuente del menú se puede volver a cambiar al valor predeterminado cambiando el porcentaje de tamaño de pantalla de Windows)

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

【參考連結】

Julio 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;

【參考連結】

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

【參考連結】

Mayo 9

Anteriormente he escrito un "Solicite el certificado comodín Let's Encrypt en Windows",Este artículo es principalmente a través de “Obtén HTTPS gratis!” El sitio web solicita o extiende el certificado manualmente。Cuando se lanzó un nuevo sitio web recientemente,Intente aplicar con la herramienta WIN-ACME,para facilitar el uso posterior de su extensión automática (renovación) Caracteristicas。
Continuar con la búsqueda »

Abril 20

Joomla parece comenzar desde 2.X y 3.X,La dirección de correo electrónico del artículo se convertirá automáticamente a un formato de hipervínculo.。Usando la sintaxis de Javascript para la dirección de correo electrónico de una página hoy,da como resultado un clic,Aparecerán dos ventanas de Outlook,Por lo tanto, debe desactivar la función de conversión incorporada。
Continuar con la búsqueda »

Abril 15

Asesoramiento medioambiental:Se recomienda que la memoria del host WSUS sea superior a 8G。

Q. WSUS a menudo o siempre arroja un error de conexión,Necesidad de restablecer el nodo del servidor。
A1. Prueba esto primero,Poner WsusPool(IIS) eliminar el "límite de memoria especial"。
Restablecer nodos de servidor WSUS | Antiguo Sen Chang Tan

Continuar con la búsqueda »

Mar 11

en Joomla 4 Construir un nuevo sitio web,Después de habilitar SEO y reescritura de URL,Problema con el sitio web,Al principio Google a su propio artículo - "Joomla reescritura de URL 404 No se puede mostrar",Principalmente porque AllowOverride de httpd.conf no está establecido en All。Pero después de este tiempo,卻變成 403 Prohibido,Y todas las páginas no pueden entrar,Independientemente de si la URL de la página se usa para reescribir,investigué durante horas,Finalmente encontré la razón。
Continuar con la búsqueda »

Diciembre 29

Los colegas han informado que en el formato de fecha Excel de la nueva computadora falta el campo "Tipo de calendario".,Por lo tanto, es imposible elegir el formato de "Calendario de la República de China".。上網查詢後,Algunos artículos dicen que puede descargar el archivo cab de microsoft-windows-internationalfeatures-taiwan-package para instalar,Pero después de descargar e instalar,Aparecerá un código de error de 0x800f0818,Parece que la versión no coincide.。

Continuar con la búsqueda »

Noviembre 17

在 Joomla 4 En el entorno de prueba,Al instalar idiomas,Aparecerá el siguiente error:

Error al conectarse al servidor: 303

URL invalida
No se puede encontrar el paquete de instalación.

Continuar con la búsqueda »