Beiträge von bernd.maierhofer

Hi + tx for every answer!

What is the best way to basically deal with RTF strings (= {\rtf1\ansi ...... }) ? I want to convert a plain unformatted ANSI string to RTF, I want to concate RTF strings, I want to remove all formattings from a RTF string, ...

Is there any RTF engibe I can use for these tasks?

tx Bernd

TWPRichText does not have a LoadFromString method.

Additionally: How do I retrieve the resulting RTF (=the base RTF string containing encodings)?

tx Bernd

Hi + tx for every input!

I have two RTF strings (= both starting with {\rtf1\ansi \...) and I want to concat them.

I tried:
WPRichText1.SelectionAsString := rtf1;
WPRichText1.SelectionAsString := rtf2;

But this does not work.

Thanks!
Bernd

Hi + tx for an answer:

I use a TDBWPRichText to let the user create RTF text elements. My app merges These elements together. However, sometimes I want to have the final rtf to have only one font, not the individual fonts of the elements.

So how do I remove all Arial 10 pt from my RTFs and - if necessary - reaplace it by Tahoma 8 pt?

tx Bernd

I have a form with a WPEditor which I use to edit a rtf which is later inserted into another rtf. Using the WPEdfitor, I insert a table with width set to 100%. I save the rtf as text to a field of the DB.

The field in DB contains ...{\tblstart1{....\trftsWidth2\trwWidth5000 which exactly makes the table stretch to the whole width of the doc.

However, if I reload the rtf from the database into the WPEditor, the \trftsWidth2 is changed to \trftsWidth3\trwWidth6806.

So after the second edit/save, the table no longer streches over the width of the doc.

What am I mising?

tx + brgds bernd

With WPP6 I had this issue:

With WP7 the same is true.

This occurs only, if the RTF contains graphic data. And yes, wobRTF is set and the RTF is ascii.

Any clue, why?

Is the WPToolsEditor a global object, I do not have to create?

Yes, data is ASCII. Yes wobRTF is set.

I have had this already with WP6:

and the solution worked. However, with WP7 I have this issue again - but the wobRTF is set.

tx for any help.

Using WPTools 7 i managed to have a WPToolbar localised. I create the WPLanguageControl in my datamodule first, as described in the manual.

However, when I do editor:=TWPToolsEditor.create; the editor is not localised. What am I missing?

tx Bernd

The {\*\ indicates optional text, so basically the RTF is ok, but Word does the wrong thing.

I use the TDBWPRichText to create RTF pieces, that afterwards get assembled to one big RTF, that is loaded in WORD or WORDPAD.

I create my RTF-Part 1 in the control and save it to a BLOB in MSSQL using RTF as format.

However, data for graphics is duplicated:

{\rtf1\ansi\deff0\uc1\ansicpg1252\deftab720{\fonttbl{\f0
\fnil\fcharset1 Times New Roman;}{\f1\fnil\fcharset1 Arial;}{\f2
\fnil\fcharset1 Verdana;}{\f3\fnil\fcharset2 Wingdings;}{\f4\fnil\fcharset2 
Symbol;}}{\colortbl\red0\green0\blue0;\red255\green0\blue0;\red0
\green128\blue0;\red0\green0\blue255;\red255\green255\blue0;\red255
\green0\blue255;\red128\green0\blue128;\red128\green0\blue0;\red0
\green255\blue0;\red0\green255\blue255;\red0\green128\blue128;\red0
\green0\blue128;\red255\green255\blue255;\red192\green192
\blue192;\red128\green128\blue128;\red0\green0\blue0;}\wpprheadfoot1
\paperw12240\paperh15840\margl720\margr720\margt720\margb720
\headery720\footery720\endnhere\sectdefaultcl{\*\generator 
WPTools_6.250;}{\qr\plain\f2\fs20{\*\wptools\wpomode0\wpoframe0
{110e0a005457504f496d6167650054504630095457504f496d616765025f3
10757696474685457037d0a0848656967687454570374040c577269746552
54464d6f64650707776f62426f7468064f626a546167020000004a504700ffd
8ffe000104a46494600010101004800480000ffdb0043000101010101010101
0101010101010101010101010101010101010101010101010101010101010
1031101ffc4001d00010003010101010101000000000000000008090a07060
40b0205ffc4004e1 ..... 03800e003800e003801fffd9}}
{\pict\jpegblip\picw2685\pich1140\picwgoal2685\pichgoal1140  
ffd8ffe000104a46494600010101004800480000ffdb0043000101010101010
1010101010101010101010101010101010101010101010101010101010101
010101010101010101010101010101010101010101010101010101ffdb0043
0101010101010101010101010101010101010101010101010101010101010
1010101010101010101010101010101010101010101010101010101010101
01010101ffc0001108004c00b303011100021101031101ffc4001d000100030
10101010101000000000000000008090a0706040b0205ffc4004e100000060
2020000060a0b0d0900000000020304050607010800090a11121314151617
192139587897b7d622373a5759767796b6d4d7181a385a75799598b1b4b5b
8d12331365354567293d5ffc4001b010100030003010000000000000000000
00007080904060a05ffc4004911000006 ......800e003801fffd9}\par  }}

Word displays then all the numbers and then the image. Any idea, how to change this behaviour?

BTW: I am pretty sure, this is new with the last update.

Workaround:

Do not set Datasource and Datafield of the TDBWPRichText.
Create the form.
Retrieve data.
Set Datasource and Datafield (see code below).

with TFrmTextbaustein.Create(CForm(Self)) do begin
  mlRTFText.DataSource:=frmTextbausteinList.dsTextbaustein;
  mlRTFText.DataField:='TEXTBAUSTEIN';
     if ShowModal=idOk then begin

Conclusion: This must be a timing problem. Retrieveing data prior to having set properties, that influences the behaviour.

Additional info:
I verified, that the data is not truncated.
Edit/Save/Reload from the DB does not change the RTF.
If I disconnect the control from the datafield, the error does not occur.
If I edit the rtf with the editor component (see code below), no error occurs and the RTF is displayed ok.

editor := TWPToolsEditor.Create(nil);
    editor.WPRichText1.WriteObjectMode := wobRTFNoBinary;
    editor.WPRichText1.AsString :=
      frmTextbausteinList.cdsTextbaustein.FieldByName('textbaustein').AsString;
    if editor.ShowModal = mrOk then begin
      frmTextbausteinList.cdsTextbaustein.Edit;
      frmTextbausteinList.cdsTextbaustein.FieldByName('textbaustein').AsString :=
        editor.WPRichText1.AsString;
    end;
    editor.Close;
    editor.Free;
    editor := nil;

Thsi is, what I checked at first - no, the RTF is not trubcated. Have a look at my post. The RTF itself is NOT changed.

It seems, as if the Component can not load the RTF anymore, as soon as it is "nobinary".

bernd

Additional info:

The RTF itself is not changed when saving/restoring. The string, that goes to the DB is the same that is retrieved.

I disconnected the TDBWPRichText from the datasource setting field/datasorce to Nil and the error does not pop up anymore.

Below is the RTF that causes the trouble.

(RTF removed, was truncated)

Hi + tx for any info.

Using WP 6.25m MS SQL 2008 R2

I have a TDBWPRichText connected to a TQuery and a Field of tye TMemoField - undrlying DB type is TEXT. I finally managed to save my RTF with graphics included to the DB setting the wobRTFnobinary.

However, when I now try to load the saved RTF into the TDBWPRichText, I receive a "list index of ouf bounds".

Can anybody direct me how to save/rsetore RTFs with graphics embedded to the database?

tx Bernd

That´s not the point. Same code, same data. Works if it is TMemoField, works not if it is TStringField. What am I missing?

Hmm. All other combos are sized correctly. So you suggest setting another font size?

Solved. The problem was, that the TDBWPRichText was bound to a TStringField. Bound to a TMEMOField everything works fine.