Snippets

Snippets

Vérifier la validité d’un certificat HTTPS

Comment savoir si une page web HTTPS est réellement protégée par un certificat valide ? Lorsqu’une application communique avec un site web en HTTPS, il est essentiel de vérifier que la connexion est sécurisée et ...

Par Delphi Source · March 25, 2026

Web HTTPS

Snippets

Bloquer le menu contextuel dans un TTreeView

Une astuce permettant de désactiver le menu contextuel lors de l’édition d’un nœud dans un TTreeView.L’idée consiste à intercepter la procédure fenêtre du contrôle d’édition interne et à filtrer le mess...

Par Delphi Source · March 25, 2026

TreeView

Snippets

Générer et afficher un code‑barres

Intégrer la génération de codes‑barres via barcodeapi.org dans une application Delphi VCL en utilisant uniquement TEdit pour la saisie, TButton pour lancer la génération et TImage pour l’affichage. Le téléchar...

Par Delphi Source · March 24, 2026

API Web

Snippets

Personnaliser les couleurs d’un TColorDialog

Ajouter une liste de couleurs personnalisées dans un TColorDialog.L’idée est simple : préparer une liste de couleurs au format hexadécimal, les injecter dans la propriété CustomColors, puis afficher la boîte de ...

Par Delphi Source · March 24, 2026

TColorDialog

Snippets

Redémarrer automatiquement une application

Redémarrer automatiquement une application.L’idée : lancer une nouvelle instance du programme, attendre un court délai, puis fermer proprement l’instance actuelle.procedure TForm1.Button1Click(Sender: TObject); be...

Par Delphi Source · March 24, 2026

TThread

Snippets

Forcer la mise à jour du correcteur orthographique TRichEdit

Lorsque l’on active la vérification orthographique dans un TRichEdit via l’API Windows, il arrive que le contrôle n’analyse pas immédiatement le texte déjà présent.Le correcteur ne se déclenche alors que sur...

Par Delphi Source · March 24, 2026

Texte TRichEdit

Snippets

Récupérer son IP publique

Voici une fonction simple et efficace pour obtenir l’adresse IP publique d’un serveur ou d’un poste client. function GetIPPublic: String; var HTTP: TIdHTTP; begin HTTP := TIdHTTP.Create(nil); try Result := HTTP.Get...

Par Delphi Source · March 24, 2026

Indy IP

Snippets

Afficher un texte incliné à 45 degrés avec GDI (CreateFontIndirect)

Delphi permet de manipuler directement les polices Windows via l’API GDI.Voici un exemple simple qui affiche un texte incliné à 45 degrés, parfaitement centré dans la fenêtre. procedure TForm1.FormPaint(Sender: TO...

Par Delphi Source · March 22, 2026

GDI+ Texte

Snippets

Compter le nombre de mots dans une chaîne

Voici une petite fonction simple et efficace pour compter le nombre de mots dans un texte.L’idée est d’utiliser un TStringList configuré avec un espace comme séparateur, puis d’ignorer les entrées vides après ...

Par Delphi Source · March 22, 2026

Texte

Snippets

Convertir du HTML en texte brut avec MSHTML

Il arrive souvent qu’on récupère du contenu HTML (API, fichiers, Etc…) et qu’on souhaite en extraire uniquement le texte lisible.Delphi permet de le faire très simplement grâce à MSHTML, le moteur d’Internet...

Par Delphi Source · March 22, 2026

Html Texte