Закрасить shape в отчете

[miklenew]

Цитата:

Сообщение от dreamer

Уже думал над картинкой,но туда же (в шейп) надо еще и числа выводить

Вот код рисует печать и поверх печати дату. В зависимости от того чья печать разные размеры.

void setStamp()
{
    BankGroup           bankGroup;
    ReportBitmapControl rbcStamp;
    ReportTextControl   rtcData;
    int                 width100;
    int                 height100;
    int                 left100 = 11000;
    int                 top100  = 16000;
    int                 fontSize;
    str                 font;
    int                 left100text;
    int                 top100text;
    int                 bold;
;
    switch (requesttable.bic_Payer)
    {
        case "044525256": 
            width100  = 6100;
            height100 = 3000;
            fontSize  = 6;
            left100text = 13600;
            top100text  = 17450;
            bold        = 3;
            font        = "Arial";
            break;
        case "044525466":  
            width100  = 7800;
            height100 = 4800;
            fontSize  = 8;
            left100text = 14200;
            top100text  = 17450;
            bold        = 3;
            font        = "Courier";
            break;
        case "044525593":  
            width100  = 7800;
            height100 = 4800;
            fontSize  = 10;
            left100text = 14200;
            top100text  = 18500;
            bold        = 3;
            font        = "Arial";
            break;
        case "044525272":  
            width100  = 7100;
            height100 = 2900;
            fontSize  = 6;
            left100text = 14200;
            top100text  = 16600;
            bold        = 3;
            font        = "Arial";
            break;
        default:
            return;
    }
    bankGroup = BankGroup::find(requesttable.bic_Payer);
    if (bankGroup.BankStamp)
    {
        rbcStamp = Main.addBitmapControl();
        rbcStamp.imageName(bankGroup.BankStamp);
        rbcStamp.width100mm(width100);
        rbcStamp.height100mm(height100);
        rbcStamp.left100mm(left100);
        rbcStamp.top100mm(top100);
        rbcStamp.resizeBitmap(true);
        rtcData = Main.addTextControl(date2str(requestTable.documentDate,2,2,2,2,2,2));
        rtcData.top100mm(top100text);
        rtcData.left100mm(left100text);
        rtcData.fontSize(fontSize);
        rtcData.bold(bold);
        rtcData.font(font);
    }
}