Patch level : 10.0 376

Files correlati     : ba8.exe ba8300b.msk
Ricompilazione Demo : [ ]
Commento            :
Uniformato spessore linee in sede di stampa report su carta e/o pdf


git-svn-id: svn://10.65.10.50/trunk@19116 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2009-07-15 15:11:11 +00:00
parent 32f27bfb34
commit 13a9f504b1
2 changed files with 10 additions and 2 deletions

View File

@ -135,7 +135,7 @@ BEGIN
PROMPT 2 5 "Colore ~Sfondo"
END
LIST F_BORDER 1 12
LIST F_BORDER 2 15
BEGIN
PROMPT 2 7 "Bordo "
ITEM "0|Nessuno"
@ -143,6 +143,8 @@ BEGIN
ITEM "2|Normale"
ITEM "3|Spesso"
ITEM "4|Molto spesso"
ITEM "7|1/12 pollice"
ITEM "13|1/6 pollice"
END
STRING F_RADIUS 4

View File

@ -1526,7 +1526,13 @@ bool TReport_window::advanced_set_draw_tools(PAT_STYLE pat, int border, COLOR fo
if (visible)
{
if (has_pen)
set_pen(fore, border, PAT_SOLID);
{
const int pollici720 = border <= 1 ? 5 : (border-1)*10; // Spessore in 1/720 di pollice
const double thickness = pollici720 * _dpi.h / 720.0; // Spessore in pixel
if (thickness < 1.0)
fore = blend_colors(fore, COLOR_WHITE, thickness);
set_pen(fore, int(thickness+0.5), PAT_SOLID);
}
else
hide_pen();
if (has_brush)