Beiträge von hewy

    Hi

    In my report I would like to shift the right side of my header closer to the paper border, right side should stay as it is.
    The header contains a table lWP.AddTable( 2, 1, false );
    I tried to following parameter.
    lWP.CurrAttr.SetTableLeftRight( 0, 1000 ); doesn’t shift any thing
    lWP.CurrAttr.SetTableLeftRight( 1000, 0 ); doesn’t shift any thing
    lWP.CurrAttr.SetTableLeftRight( 1000, 1000 ); shifts the entire table to the right left and right.

    How do I set the parameter to leave left side as it is and shift right side some value to the right?

    Tanks and regards
    Henry

    Hi

    Please give me some sample code to create several tables at runtime on a page.

    My problems:

    1. The table is always wider than the Paper, how do I set the Table width, or is there only the rigth Border line missing?.

    By default the tabe will be as wide as the text area. You can use CurrAttr.SetTableLeftRight to set left and right margins to shrink the table.

    2. I need two header lines, how do I remove the separating horizontal border line between them? If I have some text that should be outside and below the grid it always get into one of the last field.

    You can remove the blLeft and blRight borders from the cells.

    ActiveParagraph.Border.LineType contains alls border switches.

    >>3. How do I end one table and start an other one with some vertical space in between?<<

    Create a new paragraph after the table with InputString(#13)

    >>4. Is there a way to set the column width, or do I have to set the width for each single cell?<<

    Usually it is easier to use FastAddTable to create a table with all properties. See example in manual. The PCWidth parameter is measuerd in 1/255 - this means % * 255

    WPTools Version 5 allows it to create tables in an object oriented way.

    Julian Ziersch

    Hi

    Writing the text in to one Step seams to work

    How can I in such a case write one part of the line with a diferent text attribute?

    Example: This part afsBold and from here afsItalic

    Thanks and regards
    Henry

    Hi

    Some thing isn’t clear to me with Tab Stops.

    Following code gives me some thing like this

    0___________1___2_____3_____4_____5_____6_____
    7

    I expected this
    0_____1_____2_____3_____4_____5_____6_____7

    What could be wrong?

    aWP := TWPRichText.CreateDynamic;

    aprp.Attr.Size := 10;
    aWP.CurrAttr.ClearAllTabs;
    aWP.CurrAttr.AddTab( 1000, tkLeft );
    aWP.CurrAttr.AddTab( 2000, tkLeft );
    aWP.CurrAttr.AddTab( 3000, tkLeft );
    aWP.CurrAttr.AddTab( 4000, tkLeft );
    aWP.CurrAttr.AddTab( 5000, tkLeft );
    aWP.CurrAttr.AddTab( 6000, tkLeft );
    aWP.CurrAttr.AddTab( 7000, tkLeft );
    aprp.Attr.Style := [ ];
    aprp.Text := '0';
    aWP.FastInputText( aprp );
    aprp.Text := #9 + '1';
    aWP.FastInputText( aprp );
    aprp.Text := #9 + '2';
    aWP.FastInputText( aprp );
    aprp.Text := #9 + '3';
    aWP.FastInputText( aprp );
    aprp.Text := #9 + '4';
    aWP.FastInputText( aprp );
    aprp.Text := #9 + '5';
    aWP.FastInputText( aprp );
    aprp.Text := #9 + '6';
    aWP.FastInputText( aprp );
    aprp.Text := #9 + '7';
    aWP.FastInputText( aprp );

    Hi

    Is there any example on creating a document dynamicly at run time?
    I would need to add Header, fooder, Text in difenrent style and size, Tab-Stops,
    Colored Text and Graphics.
    How do i proceed or where can I get some samples?

    I have WPTools 4.25 with Delphi 7

    Thanks and regards

    Thank very much. Now it works I had to modify it a little.

    aHrmResult.CurrAttr.AddStyle(aFontStyles);
    aHrmResult.CurrAttr.Color := aHrmResult.CurrAttr.ColorToNr( aColor, true );
    aHrmResult.CurrAttr.Size := aSize;
    aHrmResult.InputString( aStr );
    aHrmResult.CurrAttr.DeleteStyle(aFontStyles);

    Without DeleteStyle all text would be written as bold after the first bold word.

    Henry

    Hi

    My Procedure call


    How could I write a procedure that adds a text to the end of a TWPRichText and using Font attributes?
    The way I'm trying doesn't work.

    Thanks
    Henry

    Hi
    Somehow i don’t find the way to programmatically add and format text to a TWPRichText component.
    What I would like to do
    RichText.Add (‘My text’ , Text Size = 10, Text Style = [fsBold], Text Color = clRed, New line = true ).
    Or some thing similar.

    Any hint would be appreciated

    Hi
    what would be the best way to generate a report as PDF file?
    In my Webapplication (Delphi and Intraweb)
    The content should be generated at runtime, and will have some formatted text.
    Thanks
    Henry

    Hi
    In our project I included in the toolbar some comboboxes in order to set the font size, type and colours. Unfortunately the framework we are sing doe not allow the use of WPCombobox. Setting font attribute works well, now I would also have to reposition the comboboxes while moving the cursor to a specific position in the text.
    What would the best way to catch SelectionChange in a tWPRichText?

    Thanks and regards
    Henry

    Hi
    We down loaded the ‘WPTools impressive Sample wordprocessor’.
    Now we would like to include in a our Software product such a editor.

    1. What Module of would we have to Purchase to be able to build such an wordprocessor?

    2. We should also provide the use of OLE Objects. What would we need for that?

    3. Are there any export processor available? PDF, Word 6.0, ….

    4. Will we get the Source of your ‘WPTools impressive Sample wordprocessor’ when we Purchase WPTools?

    Thanks and regards

    Henry