mirror of
https://github.com/ultimatepp/ultimatepp.git
synced 2026-05-16 06:05:58 -06:00
116 lines
3.1 KiB
C++
116 lines
3.1 KiB
C++
#include <Report/Report.h>
|
|
|
|
using namespace Upp;
|
|
|
|
static void CatChart(RichText& out, String title, Drawing dwg)
|
|
{
|
|
RichTable table;
|
|
table.AddColumn(1);
|
|
table.SetQTF(0, 0, title);
|
|
table[0][0].format.color = GrayColor(240);
|
|
RichObject object = CreateDrawingObject(dwg, dwg.GetSize(), dwg.GetSize());
|
|
RichPara para;
|
|
para.format.align = ALIGN_CENTER;
|
|
para.Cat(object, para.format);
|
|
RichTxt txt;
|
|
txt.Cat(para, out.GetStyles());
|
|
table.SetPick(1, 0, txt);
|
|
table.format.keep = true;
|
|
out.CatPick(table);
|
|
out.Cat(RichPara());
|
|
}
|
|
|
|
static void PaintLegend(Draw& draw, Rect& outer, const Vector<String>& linie, bool do_rtext)
|
|
{
|
|
Vector<int> order = GetSortOrder(linie, GetLanguageInfo());
|
|
|
|
static const int LINE_WD = 150;
|
|
static const int TEXT_HT = 80;
|
|
static const int LEG_OUTER_GAP = 100;
|
|
static const int LEG_INNER_GAP = 30;
|
|
|
|
RichPara legend_para;
|
|
RichPara::CharFormat fmt;
|
|
fmt.Face(Font::ARIAL).Height(TEXT_HT);
|
|
for(int o = 0; o < order.GetCount(); o++) {
|
|
String l = linie[order[o]];
|
|
WString ltext = l.ToWString();
|
|
|
|
DrawingDraw ddraw(LINE_WD, TEXT_HT);
|
|
ddraw.DrawLine(0, TEXT_HT / 2, LINE_WD, TEXT_HT / 2, 5, LtGreen());
|
|
|
|
if(o) {
|
|
legend_para.Cat(WString(0xa0, 1), fmt);
|
|
legend_para.Cat(WString(0xa0, 1), fmt);
|
|
legend_para.Cat(WString(0xa0, 1), fmt);
|
|
legend_para.Cat(WString(' ', 1), fmt);
|
|
}
|
|
|
|
legend_para.Cat(CreateDrawingObject(ddraw, LINE_WD, TEXT_HT), fmt);
|
|
legend_para.Cat(WString(0xa0, 1), fmt);
|
|
legend_para.Cat(WString(0xa0, 1), fmt);
|
|
for(int i = 0; i < ltext.GetLength(); i++)
|
|
if(ltext[i] == ' ')
|
|
ltext.Set(i, 0xA0);
|
|
legend_para.Cat(ltext, fmt);
|
|
}
|
|
RichText rtext;
|
|
rtext.Cat(legend_para);
|
|
rtext.Normalize();
|
|
|
|
DDUMP(AsQTF(rtext));
|
|
|
|
int wd = min(rtext.GetWidth(), outer.Width() - 2 * LEG_INNER_GAP);
|
|
int ht = rtext.GetHeight(wd);
|
|
|
|
Rect leg_rc;
|
|
leg_rc.left = (outer.left + outer.right - wd - 2 * LEG_INNER_GAP) >> 1;
|
|
leg_rc.right = leg_rc.left + wd + 2 * LEG_INNER_GAP;
|
|
leg_rc.top = outer.top;
|
|
leg_rc.bottom = leg_rc.top + ht + 2 * LEG_INNER_GAP;
|
|
|
|
DrawFatFrame(draw, leg_rc, Black(), 10);
|
|
if(do_rtext)
|
|
rtext.Paint(draw, leg_rc.left + LEG_INNER_GAP, leg_rc.top + LEG_INNER_GAP, wd);
|
|
|
|
outer.top = leg_rc.bottom + LEG_OUTER_GAP;
|
|
}
|
|
|
|
void VHBChartPrekroceniPrutoku(RichText& out, bool do_rtext)
|
|
{
|
|
Size dwg_size = iscale(Size(140, 100), 6000, 254);
|
|
|
|
DrawingDraw draw(dwg_size);
|
|
|
|
Rect outer(dwg_size);
|
|
outer.Deflate(50);
|
|
|
|
Vector<String> linie;
|
|
for(int i = 0; i < 10; i++)
|
|
linie.Add(NFormat("testovaci linie [%d]", i));
|
|
|
|
PaintLegend(draw, outer, linie, do_rtext);
|
|
|
|
Rect inner = outer, fixed = outer;
|
|
|
|
while(inner.Width() >= 100 && inner.Height() >= 100) {
|
|
DrawFatFrame(draw, inner, LtRed(), 20);
|
|
inner.Deflate(100);
|
|
}
|
|
|
|
CatChart(out, "[A1 [= VHBChartPrekroceniPrutoku", draw);
|
|
}
|
|
|
|
GUI_APP_MAIN {
|
|
RichText richtext;
|
|
|
|
VHBChartPrekroceniPrutoku(richtext, false);
|
|
VHBChartPrekroceniPrutoku(richtext, true);
|
|
|
|
WriteClipboard("Rich text format", EncodeRTF(richtext));
|
|
|
|
Report report;
|
|
report.Put(richtext);
|
|
|
|
Perform(report);
|
|
}
|