Inscription
3 janvier 2006
Dernière intervention
26 novembre 2013
Interventions
418
Signature

Bitmap : pinceau à bords doux [Résolu]

Bonjour à tous. pour peindre sur un bitmap (ou faire du blending), j'utilise une sélection elliptique. Pour avoir une transition douce avec les zones non peintes, j'essaie d'adoucir les bords, ce qui équivaut à faire un dégradé radial. Je stocke l'opacité dans la couche alpha de mon bitmap 32bits. Voici un exemple test de mon code...

Database : connexion à Sybase

Bonjour à tous. En bases de données sous Delphi, je n'ai jamais utilisé que le BDE. Il y a quelques années, j'ai développé (sous D4) un programme d'extraction de données d'un logiciel comptable utilisant des fichiers Paradox. Ce logiciel vient de muter vers des fichiers Sybase (Advantage DataBase Server 9.10). J'ai maintenant D7 En...

Pour les débutants qui se lancent dans les bases de données

Bonjour à tous. Beaucoup de questions posées sur le forum concernent les bases de données. Je suis effaré de voir que, dans bon nombre de cas, ces questions sont posées par des débutants en Delphi, pour ne pas dire des ultra-débutants. La recommandation a sans doute déjà été faite, mais je crois qu'il est bon de la rappeler : On ne ...

Une question d'ombre...

Bonjour à tous, Pour ajouter une ombre à une Form, il suffit d'ajouter le paramètre CS_DROPSHADOW dans WindowClass.Style (dans la procédure CreateParams). Ce paramètre peut-il être aussi utilisé pour un composant fenêtré dérivé de TCustomControl (p.ex. un TPanel) ? J'ai essayé, mais sans succès. Dans l'aide Microsoft MSDN sur WindowC...

Integer et routines de bas niveau [Résolu]

Bonjour à tous, N'étant pas très familiarisé aux routines Delphi de bas niveau, permettez-moi de vous poser la question : Est-il possible de stocker dans une variable de type Integer deux variables de type SmallInt ? X et Y sont de type SmallInt. Les 16 premiers bits de la variable integer = valeur de X Les 16 derniers = valeur d...

Problème de transparence d'un contrôle

Bonjour à tous. J'écris un composant transparent dérivé de TCustomControl. Je ne peux pas le dériver de TGraphicControl, car j'ai besoin d'un contrôle fenêtré. Cela marche bien, mais j'ai quelques questions : * si je dessine sur le Canvas en mode Brush.Style = bsClear (par exemple, un texte), j'ai parfois besoin d'effacer le Canva...

Problème TCollection dans inspecteur d'objets [Résolu]

Bonjour à tous. Voici mon problème : Je construis un composant qui utilise entre autre un TCollection. Appelons-la "TMyCollection". La Collection doit avoir au moins 1 TCollectionItem. Si le composant est créé dynamiquement, pas de problèmes, il suffit dans TMyCollection.Delete d'empêcher le Delete si TMyCollection.Count = 1. Ma...

Comparaison de strings sans tenir compte des accents [Résolu]

Bonjour à tous. Mon souci est de comparer deux strings sans tenir compte de la casse ni de l'accentuation. Jusqu'à présent, j'utilisais une fonction qui met le texte en minuscules et  remplaçe  les voyelles accentuées par les voyelles normales. En regardant l'implémentation de la fonction  AnsiCompareText, j'ai vu qu'elle employait...

IMPRESSION D'ÉCRAN AMÉLIORÉE

/source/41837-impression-d-ecran-amelioree

Form et barre de titre

Bonjour à tous. J'ai un programme avec plusieurs Forms visibles. Pour simplifier : Form1 = fenêtre principaleForm2 fenêtre de Style fsStayOnTop. Ce que je souhaiterais, c'est que l'apparence de la barre de titre de ces 2 forms reste celle d'une fenêtre active. Avec la complication que le passage à un autre programme ouvert (E...

Initialisation d'un composant [Résolu]

Bonjour à tous. Dans un composant, j'ai une méthode interne 'ReInit' procedure TMonCompo.Reinit; begin    if Assigned(FOnReInit) then FOnReInit(self)  //événement OnReInit    else  FaireParDefaut; end; J'ai plusieurs propriétés publiées avec Setters dans lesquels il y a appel à la  procedure ReInit. Le problème est qu...

Evénement onMouseMove [Résolu]

Bonjour à tous. L'événement onMouseMove n'est pas appelé à chaque changement de position souris. J'ai fait un petit test avec un panel de 400 pixels de large et un compteur dans son événement OnMouseMove : en déplaçant rapidement la souris sur toute la largeur du panel, l'événement n'est appelé que +/- 40 x. Voyez-vous un moyen de ré...

COMPOSANT BOUTON AVEC DÉGRADÉ ET PETITE ANIMATION

/source/38485-composant-bouton-avec-degrade-et-petite-animation

TList et désallocation mémoire [Résolu]

Bonjour à tous. Ma question porte sur la désallocation mémoire des éléments d'un TList. Pour ajouter des éléments, méthode classique :       New(MonPointeur);       MonPointeur^ := Value;       Liste.Add(MonPointeur); Pour libérer tous les éléments, là je trouve 3 méthodes : 1) Liste.Clear : j'ai jeté un coup d'oeil dans l'un...

Petit souci avec messages Windows [Résolu]

Bonjour à tous, Dans le code d'un composant, je gère les événements souris par réception messages Windows. Petit problème avec : WM_LBUTTONUP. Quand le ControlStyle du composant ne comprend pas [csCaptureMouse], le message n'est reçu que si le bouton gauche est relaché au-dessus du composant. Si ControlStyle comprend [csCaptureMo...

TBitmap et occupation mémoire [Résolu]

Bonjour à tous. Je me pose des questions concernant l’occupation en mémoire d’un TBitmap. L’aide de Delphi 7 est à ce sujet assez sommaire. Par exemple : Méthode Assign : l’aide précise : « Si le bitmap doit être changé, l'image bitmap actuelle est copiée avant que les modifications soient ...

Problèmes classe dérivée de TPersistent [Résolu]

Bonjour à tous. Les variables de type Record ne pouvant pas être publiées, je crée une classe dérivée de TPersistent : TMyClass = class(TPersistent) private FVar1: integer; FVar2: TColor; ... published property Var1: integer read FVar1 write FVar1; property Var2: TColor read...