Beiträge von csmith

Since the v4 forum is closed, I'm asking this here...

I'm trying re-create the development environment that was used to create an older program, which included WPTools v4 on Builder v5 C\C++. It's been a long time since I've installed WPTools and assume there was a trick to properly install it.

I'm able to compile the WPShared_BCB5_RT.bpk and WPShared_BCB5.bpk. In $(BCB)\Projects\Bpl, there are WPShared_BCB5 & RT files (.tds, .bpl) and in the \Lib, there are WPShared_BCB5 * RT files (.bpi, .lib).

Then I try to compile WPTools_BCB5_RT.bpk, but get an error message that the WPTools_BCB5.bpi is not found (vcl50.bpi, WPShared_BCB5.bpi and WPTools_BCB5.bpi are shown as Requires). Based on the manual, it says to compile the RT files first. However, I had to comple WPShared_BCB5.bpk first, otherwise it will complain about WPShared_BCB5.bpi not being there also.

I tried to compile WTools_BCB5.bpk but it couldn't find WPTools.lib.

So the question is, what do I compile to get WPTools_BCB.bpi and .lib?

Any help would be greatly appreciated!

Thanks,
Craig.

Is it possible to SaveToFile the RTF contents of the wprichtext to a temporary file and is there a Word method to Append the RTF file to the word component?

Have you looked at LoadToStream and SaveToStream methods?

Meant to say to view the saved clipboard contents with word,notepad etc... you will see the binary info for the images.

I did a copy/paste from wprichtext component into word using Ctl-C/Ctl-V. I looked at the clipboard contents (clipbrd.exe), and you will only see the text. If you save the clipboard contents and look at it's contents, you will see the binary info for the images.

Are you able to do this? If not, check the ClipboardOptions (mine are all false) and WriteBitmapMode (wbmDIBBitmap).

Alternative, could save richtext into temporary RTF file and read it back in to the word doc?

Check out WriteObjectMode property and ensure it's set properly for RTF compatibility....

I'm using WPRichText contents as a field in a table and creating a report using RAVE (reportprinter pro - code based).

In the past (when editing), the ruler had darker gray areas on the left and right, along with the margin markers. When I created the report, the richtext contents would look correct and each page would end properly at the page end. Currently these older richtext fields still look good.

However, some how the dark gray area on the left and right on the ruler disappeared. When generating a report with the new contents of the field, the pages will run off the end/bottom. The only temporary solution is to add blank lines at the bottom of each page in the richtext document.

When I turn off text wrapping, the bottom is correct, but the text will run off the page on the right.

What happened and what can I do to correct this?

Thanks,

Craig.

void __fastcall TForm1::ReportSystem1Print(TObject *Sender)
{
  TMetafile *MF = new TMetafile;
  TMetafileCanvas *MFC;
  TRect R,RR;
  int i, num_pages;
  double PaperWidth, PaperHeight;
  HDC MyHDC;
  TBaseReport *report;
  TPrintPageMode pm_mode;
  TStream *Stream1 = NULL;




  //  Create pointer to RP Pro BaseReport....


  report = dynamic_cast<TBaseReport*>(Sender);


  //  Ensure WPRichText->ScreenResMode is rm1440...
  //  Get PaperWidth and PaperHeight of WPRichText...


  // Get RichText field contents....
  Stream1 = myWPtable->CreateBlobSteam(info_table->FieldByName("richtext_info"), bmRead);
  WPRichText1->LoadFromStream(Stream1);


  PaperWidth = WPRichText1->Header->PageWidth /1440.0;
  PaperHeight =WPRichText1->Header->PageHeight /1440.0;


  // Calculate pixel Height & Width based on screen resolution...


  MyHDC = GetDC(0);
  MF->Height = PaperHeight * GetDeviceCaps(MyHDC, LOGPIXELSY);
  MF->Width = PaperWidth * GetDeviceCaps(MyHDC, LOGPIXELSX);
  ReleaseDC(0,MyHDC);


  //  Define MetaFile "image" size....


  R.Top = R.Left = 0;
  R.Right = MF->Width;
  R.Bottom = MF->Height;


  //  Set options for PrintPageOnCanvas....


  pm_mode = << ppmUseEvents;


  //  Get number of pages in WPRichText document...


  num_pages = WPRichText1->CountPages();


  //  For each page, print to the preview window....


  for (i = 0; i < num_pages; i++) {
    //  Create a new MetaFileCanvas....
    MFC = new TMetafileCanvas(MF,0);
    //  Print to canvas, based on screen resolution
    WPRichText1->PrintPageOnCanvas(MFC,R,i,pm_mode,100);
    delete MFC;
    // ---------Create "image" size, based on printer resolution!!!!---------
    RR = Rect(0.0,0.0,PaperWidth*report->XDPI,PaperHeight*report->YDPI);
    //  Stretch "image" based on printer resolution....
    report->StretchDraw(RR,MF);
    //  If new WPRichText page.......
    if (i < (num_pages-1)) {
      report->NewPage();
    }
  }
  delete MF;
}

Julian,

I removed the wpdf.bpi from the Package list, but now it comes up with a linker error: Unable to open fiel 'WPDF.LIB'.

I also checked the INC file and the WPPDFEX is not defined =>{.$DEFINE WPPDFEX}.

I downloaded the BC6 demo version and tried to install it. However it is looking for wPDF.bpi and can't find it. Note that I compiled and installed the shared stuff first.

Note also a few months earlier, I downloaded the BC5 version and had to comment out the USESDB in order for it to compile.

Currently have BC++Builder Pro 3,5 and now 6.

Any suggestions on how to get the BC6 version going?

Thanks,
Craig.