Discussion :

[mittag]

Bonjour,

Après trois ans d'autre chose, je remets le nez dans lazarus, mais je constate ce qui me semble être une régression dans l'utilisation de canvas.Brush. Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
procedure TForm1.FormPaint(Sender: TObject);
begin
    Width:=100;
    Height:=100;
    with canvas do
    begin
      brush.style:=bsSolid; brush.color:=clwhite;
      fillRect(0,0,100,100);
      brush.style:=bsFDiagonal; brush.color:=clred;
      fillRect(10,10,90,90)
    end;
end;

Avec lazarus 1.6 on obtient ce qu'il faut :


Et avec lazarus 1.8.2, c'est pourri :


EDIT : sous linux 64b gtk2.

[Jipété]

Yop !

EDIT : sous linux 64b gtk2.

Idem en 1.8.2 32 bits (à droite dans une machine virtuelle Debian 9, car à gauche c'est ma vieille 1.4, ah, j'ai bien fait de pas migrer, alors, )

[mittag]

Merci d'avoir fait le test.
J'ai signalé le problème sur le bug tracker de lazarus.
Il n'est pas impossible que cela soit du à une évolution dans gtk2, je me demande s'il n'y avait pas déjà un problème de ce type il y a des années...

[jurassic pork]

hello,
effectivement il semble y avoir un problème avec les brosses en gtk2 sous linux avec la version 1.8.2 de lazarus.
En utilisant le bouton Show Brushes dialog de l'exemple canvastest de lazarus (dans examples\canvas_test)
sous windows 10 :



sous Ubuntu 16.04 :




Ami calmant, J.P