Beiträge von johnbitner

Using WPTools 7.25 with Delphi Seattle.

When I save a merged document to html the html seems to encode the image data correct. In the html file I see the base64 img tag.
<img border="0" style="width:5.42in;height:4.07in;" src="data:image/jpeg;base64,/9j/4AAQSkZJRgABAgEASABI.......

When this same html is sent as a email body, the to email clients like gmail and outlook the email clients are not displaying the image but rather showing broken image link box. When I open this same html as a file in a browser the image displays as expected. What could I be missing?

Thanks for your help.

I cannot get a paragraph with all formatting and bullet/numbering to copy from one WPRichText to another.

Apar = The paragraph I want to copy to the NewEditor.
NewEditor = TWPRichText I wan't to copy to

Try 1:
NewEditor.CheckHasBody;
Style:= APar.AGetWPSS(false, true, true);
NewPar:= NewEditor.ActiveText.AppendParCopy(APar);
NewPar.ASetWPSS(Style);

Try 2:
NewEditor.CheckHasBody;
NewPar:= NewEditor.ActiveText.AppendNewPar;
NewPar.SetText(APar.GetText(False,True));
APar.AGet(WPAT_IndentLeft,Indent);
NewPar.ASet(WPAT_IndentLeft,Indent);
Number:= APar.Number;
NewPar.ASet(WPAT_NumberStart,Number);

The "NewPar" with each of these attempts are missing the bullet and numbering information. What am I missing?

In the working code example below I expect that the header and footer on the second document (wp2) shows with the text "Header 2" and "Footer 2". Instead the header and footer from the first document (wp1) is copied to wp2 even thought you can see in my code that the wp2 is processed with a different header and footer and different text. Am i missing something simple with the AppendAsSection feature? I need to create many dynamic documents, build them into 1 and then display all pages as 1 document to the user. I need to be able to have different text in the header and footer with different formatting on each page(s).

procedure TestHeaderFooter;
var
  par:TParagraph;
  wpall,wp1,wp2:TWPCustomRichText;
begin
  wpall := TWPCustomRichText.CreateDynamic;
  wp1   := TWPCustomRichText.CreateDynamic;
  wp2   := TWPCustomRichText.CreateDynamic;


  // DOC 1
  par := wp1.FirstPar;
  par.SetText('HEADER 1');
  wp1.HeaderFooter.Get(wpHeader,wpraOnAllPages,'HEADER 1').AppendPar(par);


  par := wp1.ActiveText.AppendNewPar(True);
  par.SetText('BODY 1');


  par := wp1.ActiveText.AppendNewPar(True);
  par.SetText('FOOTER 1');
  wp1.HeaderFooter.Get(wpFooter,wpraOnAllPages,'FOOTER 1').AppendPar(par);


  // DOC 2
  par := wp2.FirstPar;
  par.SetText('HEADER 2');
  wp2.HeaderFooter.Get(wpHeader,wpraOnAllPages,'HEADER 2').AppendPar(par);


  par := wp2.ActiveText.AppendNewPar(True);
  par.SetText('BODY 2');


  par := wp2.ActiveText.AppendNewPar(True);
  par.SetText('FOOTER 2');
  wp2.HeaderFooter.Get(wpFooter,wpraOnAllPages,'FOOTER 2').AppendPar(par);


  wpall.AppendAsSection(wp1);
  wpall.AppendAsSection(wp2);

  wpall.ReformatAll(True);
  // PREVIEW
  with TWPPreviewDlg.Create(Application) do
  begin
    EditBox:= wpall;
    Execute;
    Free;
  end; // WITH
  FreeAndNil(wp1);
  FreeAndNil(wp2);
  FreeAndNil(wpall);
end;

When pasting from word into TWPRichEdit I get the error "Range Check Error".
When pasting the same text from notepad I do not.
No matter how simple the word doc the paste fails with this error.

I set a breakpoint on the control "BeforePasteText" and it is never called.
To make sure it was not just my app I tried and was able to recreate this in the WPTools WordPad 5 demo.

Word 2007
Latest version of WPTools 5.x
Delphi 2007
Both Win XP Pro and 7 Pro

I do not need a paragraph between each line. I do however need more than just line space. I need a blank line that can be selected and text typed into between each line selected in a document. I'm creating a chord and music editor.

For example I have a verse in a song like so:
I believe in Jesus
I believe He is the Son of God
I believe He died and rose again
I believe He paid for us all

I want the user to be able to select this verse and then click a button and the verse will look like this:

I believe in Jesus

I believe He is the Son of God

I believe He died and rose again

I believe He paid for us all

Now the user can click on the new lines between the lyrics and insert chords and notes.

I need to build the functionality to insert new blank lines in between each selected line in a document. I do not see a way to do this. I tried using cpline and looping through the selected text document but no luck.

Any suggestions?

Hello, since this is not a feature of the wpRichText would it be possible to fill a single page with spaces to simulate this? The end result i want is that the user could click anywhere on the new page and the cursor would go to the spot. With a page of spaces this would work. I manually simulated this in the wpdemo make a page of spaces. I just need to kow how to do this in code.

I know this seems strange but i'm building a music editor around wptool5. i need to be able to allow the user (without manually inserting line breaks and space) to click anywhere on a new song page and type text or insert a chord maker at the spot. They might start on what would be line 2 and start typing the lyrics to the song. Then at some point go back to line 1 position 10 and insert a chord. Then they might go down 10 lines and start writting a chorus or bridge section. They need to be able to jump around in the document (without hitting enter or space) but still have it act basically like a word processor.

Does this make sense? Just need to fill a new page with spaces to simulate clicking anywhere.

Thanks.

I'm upgrading a project from V4 to V5. In the V4 project I was able to allow the user to click anywhere on the wpRichText editor and start type in the position even if the page was blank. In V5 the cursor cannot be placed anywhere on the wprichtext for example at the end of a line that is blank.

The user now has to tab, space, or return to get to anywhere on the page to start typing. i understand this is more like common word processor functionality but I need it to work like V4 for my project.

What am I missing with V5? Is there a property I have not found to allow the user to input anywhere in a page and type at that position?

Thanks.