GTK3: FillRect() mispaint border

[baldzhang]

Lazarus trunk, fpc 3.2.2, slackware 15.0 x86_64, gtk3 3.24.31

within fixes for #36374, add a border drawing when width > 1 and height > 1,
before calling of FillRect(), if Pen.Style set to psDot or psDash, the border was drawing as dot or dash.
even if set Pen.Style to psSolid just before FillRect(), is no effect, border still drawing with dot or dash.

attached image show this problem. and temporary code to fix it.

tested with #42049, #42082. compare their screenshots pixel by pixel, no regression found.
example came with #36374: there is differents between fixes, I think the later is more sensible.

not sure to open an issue, so post here first.

if want to know any differents in other distro or gtk3 version, just let me know.

[zeljko]

Forum is wrong address to place patch or complains about bugs. Please open an issue and attach example project.

[baldzhang]

issue opened:
https://gitlab.com/freepascal.org/lazarus/lazarus/-/work_items/42226