[VB.NET] Dessiner plusieurs rectangles.

Version imprimable

Bonjours,
je voudrais dessiner plusieurs rectnagles

j'ai essayé ça mais ça ne marche pas :

Code:

1
2
3
4
5
6
7
8
9
10
11
Dim i As int16
   		Dim BrushBackColor As New SolidBrush(Color.White) 'défini la couleur de fond
   		Dim Rect As New Rectangle()
 
   		For i=0 To Grid.NbreColonne - 1'Grid.NbreColonne - 1
   			Rect.Location (Grid.OffsetX + i*Grid.X, Grid.OffsetY)  		
			Rect.Size (Grid.CaseX, Grid.TempMaxColonne)
 
			e.Graphics.FillRectangle(BrushBackColor, Rect) 'colorie le fond du rectangle
			BrushBackColor.Dispose() 'efface la mémoire
		Next i

[Tag [VB.NET] ajouté par freegreg]

23/03/2005, 15h53
DotNET74

Il te manquerait pas la ligne:

Code:

e.Graphics.DrawRectangle(...)

par hasard..
23/03/2005, 15h57
Emcy

Non le problème vient de la définition du rectangle...

je crois que les propriétes Location et size ne sont qu'en lecture seule
23/03/2005, 15h58
DotNET74

C'est à dire...
Message d'erreur?
23/03/2005, 16h07
del-dongo

Procède ainsi rect.X = ...
rect.Y = ...
ou rect.Location = new Point(...,...);
23/03/2005, 16h27
Emcy

Merci
23/03/2005, 16h31
DotNET74

Au fait,

Lorsque tu as résolu tes problèmes penses à mettre le Tag Résolu :D
23/03/2005, 16h39
Emcy

pardooon
23/03/2005, 16h44
DotNET74

Ben faut faire gaffe car après les modérateurs y gueulent :D
23/03/2005, 16h57
Emcy

Mais pourquoi sont-ils aussi méchant ? :lol: