• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 257
  • Last Modified:

Creating a Bmp

Hi Guys, Girls and those not quite sure !!!!

I was wandering if anyone could help?, I have created a word document via an OLE Container and I need to fax it out through Turbo Powers AsyncProfessionals Fax Component.

The problem I have is that the VCL cannot convert Word Documents and as I do not want to loose any formatting etc, is it possible to create a Bmp of the Word Document?

Cheers for any help, I appreciate it.

WordDocument (in OLE Container) -> Bmp ??????

Stu
0
StuartB_99
Asked:
StuartB_99
1 Solution
 
ITugayCommented:
It look like very difficult to do inside container, but you can show it on screen then catch it into BMP.

Cheers
0
 
wmckieCommented:
I'm not familiar with the Fax component but I assume that you are creating the doc then saving it to a file then passing that file to the Fax component.

Can the Fax handle any other file format that Word can also accomodate e.g. RTF?

Walter McKie
0
 
florisbCommented:
Check in Word under File | Sendto. There should be FAX here. I recorded a macro, got something like SendFax....
Checked in the imported Word tlb, found: procedure SendFax(const Address: WideString; var Subject: OleVariant); safecall; (of _application).

So you can make Word Fax your letter without losing anything. If you don't especially need that FAX component you named, I would consider this option.

Greetings,
Floris.
0
Receive 1:1 tech help

Solve your biggest tech problems alongside global tech experts with 1:1 help.

 
florisbCommented:
indeed, or save doc and have FAX component open and handle it. Files can be saved as:
               wdFormatDocument =              0;
                wdFormatTemplate =              1;
                wdFormatText =                  2;
                wdFormatTextLineBreaks =        3;
                wdFormatDOSText =               4;
                wdFormatDOSTextLineBreaks =     5;
                wdFormatRTF =                   6;
                wdFormatUnicodeText =           7;

with:

//all vars OleVariant
      Name                     := FileName;
      FileFormat               := wdFormatDocument; // Format;
      LockComments             := False;
      Password                 := '';
      AddToRecentFiles         := True;
      WritePassword            := '';
      ReadOnlyRecommended      := False;
      EmbedTrueTypeFonts       := False;
      SaveNativePictureFormat  := False;
      SaveFormsData            := False;
      SaveAsAOCELetter         := False;
      FWord80.ActiveDocument.SaveAs(Name, FileFormat, LockComments, Password, AddToRecentFiles, WritePassword, ReadOnlyRecommended, EmbedTrueTypeFonts, SaveNativePictureFormat, SaveFormsData, SaveAsAOCELetter);


Floris.
0
 
intheCommented:
being nosey ..
0
 
StuartB_99Author Commented:
Sorry for the wait, Ive been away....

Thankyou.

Stu
0

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now