/4a05792d8ee14e888580ffd4553c842d/auth-avatar/5b3d05851d879)
TGraphicControl avec ou sans canvas? [Résolu]
Caribensila
- Messages postés
- 2684
- Date d'inscription
- jeudi 15 janvier 2004
- Dernière intervention
- 26 juillet 2018
- Messages postés
- 2684
- Date d'inscription
- jeudi 15 janvier 2004
- Dernière intervention
- 26 juillet 2018
A voir également:
- Ou canvas
- Delphi canvas - Meilleures réponses
- Tcanvas delphi - Meilleures réponses
- Delphi / Pascal : Dessin sans canvas - CodeS SourceS - Guide
- Delphi / Pascal : Calculer la longueur en pixels d'un texte sans canvas avec textwidth - CodeS Sourc - Guide
- Javascript : Canvas i3d : 3d sous javascript sans weggl - CodeS SourceS - Guide
- Imprimer une page sans ses boutons - Conseils pratiques - Javascript
- Sous-domaine virtuel sur un serveur web en local sans internet - Conseils pratiques - PHP
3 réponses
Meilleure réponse
/34895561af8a4576a319852e165d668c/auth-avatar/6c3799013c7c843f94d77f05b6c99658-Guillemouze)
- Messages postés
- 1015
- Date d'inscription
- samedi 25 octobre 2003
- Dernière intervention
- 29 août 2013
ca ne passe pas car canvas est protected sur TGraphicControl
tu peu outrepasser la protection en utilisant l'astuce suivante:
type
TMyGrpCtrl = class(TGraphicControl) end;
procedure MaProcedure(Control : TControl);
var DC : HDC;
CV : TCanvas;
begin
if Control is TWinControl
then DC := GetDC((Control as TWinControl).Handle); //-->ça passe.
if Control is TGraphicControl
then CV := (Control as TMyGrpCtrl ).Canvas;
end;
tu peu outrepasser la protection en utilisant l'astuce suivante:
type
TMyGrpCtrl = class(TGraphicControl) end;
procedure MaProcedure(Control : TControl);
var DC : HDC;
CV : TCanvas;
begin
if Control is TWinControl
then DC := GetDC((Control as TWinControl).Handle); //-->ça passe.
if Control is TGraphicControl
then CV := (Control as TMyGrpCtrl ).Canvas;
end;
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
120 internautes nous ont dit merci ce mois-ci
- Messages postés
- 2684
- Date d'inscription
- jeudi 15 janvier 2004
- Dernière intervention
- 26 juillet 2018
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.