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

Référence [lien]

Juillet 11

Les menus Delphi semblent toujours avoir des polices qui reviennent par défaut (8, Tahoma) Le problème,Questions de l'étranger,mais pas de soluce。La solution temporaire à laquelle je peux penser pour le moment est de définir une touche de fonction (Peut être défini comme raccourci clavier),Permettre à l'utilisateur de rencontrer une petite taille de police,Réinitialiser la taille de la police par vous-même。(Pendant les tests, la police du menu peut être ramenée à la valeur par défaut en modifiant le pourcentage de taille d'affichage de Windows)

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

Référence [lien]

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

Référence [lien]

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

Référence [lien]

Mai 9

J'ai déjà écrit un "Demander le certificat générique de Let’s Encrypt sur Windows",Cet article passe principalement par “Obtenez HTTPS gratuitement!” Le site Web demande ou prolonge le certificat manuellement。Lors du lancement d'un nouveau site Web récemment,Essayez de postuler avec l'outil WIN-ACME,pour faciliter l'utilisation ultérieure de son extension automatique (renouvellement) Caractéristiques。
Continuez à parcourir »

Avril 20

Joomla semble commencer à partir de 2.X et 3.X,L'adresse e-mail dans l'article sera automatiquement convertie en un format de lien hypertexte。Utiliser la syntaxe Javascript pour l'adresse e-mail d'une page aujourd'hui,résultats en un clic,Deux fenêtres Outlook apparaîtront,Vous devez donc désactiver la fonction de conversion intégrée。
Continuez à parcourir »

Avril 15

Conseil environnemental:Il est recommandé que la mémoire de l'hôte WSUS soit supérieure à 8 G。

Q. WSUS génère souvent ou toujours une erreur de connexion,Besoin de réinitialiser le nœud du serveur。
A1. Essayez ceci d'abord,Mettre WsusPool(IIS) supprimer la "limite de mémoire spéciale"。
Réinitialiser WSUS nœuds de serveur | Vieux Sen Chang Tan

Continuez à parcourir »

Mer 11

sur Joomla 4 Créer un nouveau site Web,Après avoir activé le référencement et la réécriture d'URL,Problème avec le site Web,Au début Google à son propre article - "Joomla réécriture d'URL 404 Impossible d'afficher",Principalement parce que le AllowOverride de httpd.conf n'est pas défini sur All。Mais après ce temps,卻變成 403 Interdit,Et toutes les pages ne peuvent pas entrer,Que l'URL de la page soit utilisée ou non pour la réécriture,recherché pendant des heures,Enfin trouvé la raison。
Continuez à parcourir »

Décembre 29

   Des collègues ont signalé que le format de date Excel du nouvel ordinateur manque le champ « Type de calendrier »,Par conséquent, il est impossible de choisir le format du « Calendrier de la République de Chine »。上網查詢後,Certains articles indiquent que vous pouvez télécharger le fichier cab de microsoft-windows-internationalfeatures-taiwan-package à installer,Mais après avoir téléchargé et installé,Un code d'erreur de 0x800f0818 apparaîtra,Il semble que la version ne correspond pas。

Continuez à parcourir »

Novembre 17

Joomla 4 Sur l'environnement de test,Lors de l'installation des langues,L'erreur suivante apparaîtra:

Erreur de connexion au serveur: 303

URL invalide
Impossible de trouver le package d'installation.

Continuez à parcourir »