21 août 2020

Comment zoomer un RichEdit

Ces quelques lignes de code,repondent à une question que je me.pose depuis 2006 procedure SetZoom(const RichEdit: TCustomRichEdit; const Value: Integer);const EM_SETZOOM = (WM_USER + 225);begin  SendMessage(RichEdit.Handle, EM_SETZOOM, Value, 100);end; procedure TForm1.btn1Click(Sender: TObject);begin  SetZoom(RichEdit1, 200);end; Je ne sais pas si si 200=200%, mais selon cette valeur, zoome ou dézoome (pivot=100 ?).  
Posté par Luc Fricot à 12:16 - Permalien [#]
Tags : , , ,
10 août 2020

Utiîser Delphi 7 sous Windoéws 10 (en vrac)

Sommaire →Généralités →Installation et informations (7) Où trouver des composants et outils freeware pour Delphi ? Peut-on installer plusieurs versions de Delphi sur un même système ? Comment automatiser l'installation du SP1 pour Delphi 2005 ? Comment récupérer des options de configuration de Delphi après une réinstallation ? Comment utiliser les fichiers d'aide au format hlp sous les nouveaux OS Windows (7 et plus) ? Réinstaller Delphi 7 après une désinstallation Comment installer et utiliser Delphi 7 avec les OS récents... [Lire la suite]
Posté par Luc Fricot à 22:54 - Permalien [#]
Tags : , , ,
10 janvier 2019

RESSOUCES codes touche virtuelle

            Les codes touche virtuelle fournissent une représentation symbolique des appuis utilisateur sur les touches. Les codes touche virtuelle vous permettent de représenter les valeurs clavier pour les touches non-alphanumériques. Windows définit des constantes spéciales pour chaque touche pouvant être enfoncée par l'utilisateur. Ces constantes peuvent alors être utilisées pour faire référence à la frappe de touche dans des appels API Windows ou dans un gestionnaire... [Lire la suite]
Posté par Luc Fricot à 16:27 - Permalien [#]
Tags : , ,
09 septembre 2018

RESSOUCES Raccourcis clavier

Windows 7 Raccourcis clavier permettant de contrôler Windows 7 à partir du clavier. Raccourcis clavier d’Options d’ergonomie Le tableau ci-dessous répertorie les raccourcis clavier susceptibles de faciliter l’utilisation de votre PC. Appuyez sur la touchePour ce faire : Maj droite pendant huit secondes Activer et désactiver les touches filtres Alt gauche + Maj gauche + Impr. écran Activer et désactiver le contraste élevé Alt gauche + Maj gauche + Verr... [Lire la suite]
Posté par Luc Fricot à 12:13 - Permalien [#]
Tags : , , , ,
27 août 2018

RESSOUCES Sources Pascal Delphi Lazarus

Loupe Présentation Petite fenêtre effectuant un zoom d'une partie de l'écran. NOTES : C'est en cherchant autour du source précédent ( obtenir la couleur d'un point de l'écran ) que j'ai vu la fonction API StretchBlt. Je me suis dit qu'en une ligne on pouvait copier et agrandir une partie de l'écran : donc faire une loupe toute simple !Utilisation : La loupe se place par défaut en haut à droite de l'écran. Pour la déplacer il suffit de cliquer dessus et de la faire glisser là ou vous voulez. Pour fermer la loupe il faut faire un clic... [Lire la suite]
Posté par Luc Fricot à 14:38 - Permalien [#]
Tags : , , , ,