Tramage

3/5 (13 avis)

Vue 5 353 fois - Téléchargée 400 fois

Description

On a la possibilité de faire en sorte que la feuille soit tramés automatiquement.
Pour cela on surchargé la méthode paint.

Source / Exemple :


procedure TForm1.FormPaint(Sender: TObject);
var xf,yf : word;
begin
   for xf := 0 to width div 10 do
     for yf := 0 to height div 10 do
        canvas.pixels[xf*10,yf*10] := clred;
end;

Codes Sources

Ajouter un commentaire Commentaires
cs_Squallou Messages postés 249 Date d'inscription mardi 5 août 2003 Statut Membre Dernière intervention 15 juillet 2006
6 févr. 2006 à 11:07
Dans la solution de CIREC :

"var xf,yf : word;"
integer ça suffirait pas là :?(

Et par contre je ne connais pas le Invalidate;. Qu'est-ce donc ?
cirec Messages postés 3833 Date d'inscription vendredi 23 juillet 2004 Statut Modérateur Dernière intervention 18 septembre 2022 50
6 févr. 2006 à 11:19
bonjour Squallou :

je pense qu'une petite révision s'impose :
Integer ?2147483648..2147483647 32 bits signé
Word 0..65535 16 bits non signé
ça se passe de commentaires non ?

en ce qui concerne Ivalidade voici un extrait de l'aide de Delphi :

Description

Utilisez la méthode Invalidate si la totalité d'un contrôle doit être redessinée. Si plusieurs régions du contrôle doivent être redessinées, Invalidate provoque le réaffichage de toute la fenêtre en une seule passe, en évitant des "sautillements" dus à des réaffichages multiples. Les performances ne sont pas dégradées par plusieurs appels d'Invalidate avant que le contrôle ne soit effectivement redessiné.

@+
Cirec
cs_Squallou Messages postés 249 Date d'inscription mardi 5 août 2003 Statut Membre Dernière intervention 15 juillet 2006
6 févr. 2006 à 11:49
Houla. Word => 0..65535 ? Oo
Confusion de ma part alors désolé je pensais que la capacité du Word était + grande lol.

Merci pour l'explication du Invalide. Ca a l'air sympa tout ça :p
cirec Messages postés 3833 Date d'inscription vendredi 23 juillet 2004 Statut Modérateur Dernière intervention 18 septembre 2022 50
6 févr. 2006 à 12:14
Juste une petite précision:

Dans l'exemple que je donne plus haut
"Var xf, yf : Word;" existait déjà dans la version de Sivaller. Il est vrai que si j'avais réécris le code entièrement j'aurais opté pour "Integer" comme beaucoup d'entre nous, mais à quoi bon le "word" suffit amplement ici (on a très peut de chance voir un écran avec des coordonnées supérieurs à 65535 ). Mais en revanche l'on peut adresser une fenêtre au delà des limites de l'écran (positif où négatif)
Donc le choix vous appartient en fonction de vos besoins.

@+
Cirec
wolf691300 Messages postés 41 Date d'inscription mardi 15 juin 2004 Statut Membre Dernière intervention 31 mars 2006
7 févr. 2006 à 13:02
Bonjour,
Les codes sont simples, que dire d'autre ... enfin c'est super ! 8/10 que je place pour toi et bonne continuation.

Wolf691300

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.