Beiträge von andi

But the image is not really linked to a file... the image is embedded, only the additional parameter Source is present!

But i will try to check it in the PrepareSaving ...

Hello why is sometimes an embedded image not stored to HTML?

<txtobj wpsty=[[Type:12;Source:[[_img4.PNG]];Width:11347;Height:2434;Wrap:0;]] ch=1 data="wpvcl-binary" type="TWPOImage">

I don't know exactly why, but sometime the image has an

Source:[[_img4.PNG]];

and if this is present, the image in the HTML is stored as link.
if i remove the

Source:[[_img4.PNG]];

the image is correctly exported as embedded data

Is it possible to simple set the embeddedText of a TWPTextObj to a RTF or WPT Text?
with plainText it works fine with

WPTextObj.EmbeddedText := 'Test';

but for WPT or RTF it doesn't work.

Zitat von wpsupport

This is how it was implemented - while the focus routine can distribute the text on multiple pages there are no page breaks within a table cell.

This mean i can only force a new page outside any table, if i am inside ONE Table, i can't force a new page?
Is this correct?

Ich kann innerhalb einer Tabelle, also nicht wenn ich zwei Tabellen inneinander verschachtle, mit Strg-Enter keinen Page Break erzeugen, der mir genau an der Stelle dann eine neue Seite erzeugt, es wird immer die gesamte Tablelen Row zusammengeahlten, und das lässt sich nicht ändern? Korrekt?

How do i get the actual EditField?

And an additional question .- is it possible to define an InputField, that it is plain text?
The user isn't allowed to insert an image, or change the font or style for some of the fields.
Other fields are RTF fields.

Zitat von wpsupport

I am sorry, Page breaks in an inner table are not supported, only in outer tables.

The page break is always put in the outer table.

And what are the correct settings, to get a page break inside a tabel row?
For example if i press Ctrl-Enter.
at the moemnt the whole TR is painted on the next page.

[edit]I just noticed, if i write text, and therefore a new page is needed, it works fine, the new text is on the new page.
If i hit Ctrl-Enter for forcing a new page - the whole tr is put on the new page.

Ok i found the proble,
I had one Row with One cell without a ASet(WPAT_COLWIDTH*

after setting all Columns a Width - it works how it should,

Now i will check if the page break works as i need.

Ok, now i try to build it into one tabel ... but i think i make something wrong :

This is my test code, but the columns don't work as expected!

(If it is possible to upload an image i can show it to you ... )
the First column which should be 83 Twips (is about 8 cm) is larger than the second column which shouel be 580 Twips

rowName := 'TEST';
        Result      := posTable.AppendNewRow(true);
        Result.Name := rowName;


		for i:=1 to 4 do begin
			cell	:= Result.AppendNewCell(true);
			cell.Align	:= paralRight;
            if i =1 then begin
	    		cell.Aset(WPAT_COLWIDTH, 83);  // 580, 580, 4960
    			cell.AppendNewObjectPair(wpobjMergeField, 'SEPERATOR@ID'+IntToStr(ID));
            end
            else if i = 2 then begin
	    		cell.Aset(WPAT_COLWIDTH, 580);  // 580, 580, 4960
    			cell.AppendNewObjectPair(wpobjMergeField, 'MENGE@ID'+IntToStr(ID));
            end
            else if i = 3 then begin
	    		cell.Aset(WPAT_COLWIDTH, 580);  // 580, 580, 4960
    			cell.AppendNewObjectPair(wpobjMergeField, 'EINHEIT@ID'+IntToStr(ID));
            end
            else if i = 4 then begin
	    		cell.Aset(WPAT_COLWIDTH, 4960);  // 580, 580, 4960
    			cell.AppendNewObjectPair(wpobjMergeField, 'BEZEICHNUNG@ID'+IntToStr(ID));
            end
            ;


		end;

Hello
I have a table in a table, because i need it to reprint the header of the first table on every page.

If i now make a Page Break in the cell of the inner Table, (or press Ctrl-Enter) the whole inner Table starts on a new page.
But i don't want this, i tried nearly every Keeptogether option i could find, but didn't get it working ....

What i am missing?

HEllo
I have a table with 6 columns, i use following code

pt      := Mouse.CursorPos;


        pt      := vEd.ScreenToClient(pt);
        vEd.Memo.GetParAtXY(pt.X, pt.Y, actPar, p);
        wpFld   := vEd.FieldGetInPar(actPar, p);

to locate the EditField where the mouse is, but the GetPArAtXY returns in the table the incorrect position, allways, the last Column.
Outside the table it works as it should!

I have protected my text, but if i move my mouse to the column of a row (i can see the Cursor of the mouse is cahnging into do Arrow Down - i think it should select the whole column) i can select the column and hit the Delete KEy which deletes the protected text.

I am using

ProtectedProp               := [ppAllExceptForEditFields];
    EditOptionsEx               := [wpTABMovesToNextEditField, wpRepaintOnFieldMove];

A second problem is that the user can move textboxes - and resize them - what shouldn't if the document is protected!

If i move the cursor with the Cursor Keys (Left Right) i only get the Event EditFieldFocus with the Enter = FALSE, (LEaving the field)

But not the Event with Enter=TRUE, Entering the field

Hello i have a problem with this event.
If i focus a field with the mouse - OK
if i focus the next field with TAB - OK
if i focus the prev field with SHIFT-TAG - InspName ist empty!

What is wrong?

HEllo i would like to change the text of a Field if it gets the focus

procedure TCrTableForm.WPRichText1EditFieldFocus(Sender: TObject; const InspName: string; Enter: Boolean; FieldObject: TWPTextObj; var Abort: Boolean);
var
    value   : string;
begin
if inspName = 'PROZENT' then begin
        if Enter then begin
            value   := '12';
        end
        else begin
            value   := '12,0 %';
        end;
        FieldObject.EmbeddedText    := value;
        WPRichText1.Refresh;
    end;
end;

But i think it is not correct to do it this way, because if i do it, i didn't get evere FocsuEnter and FocusLose Event ...
if i remove the WPRichText1.Refresh, i get ALL Events, with this code i sometime didn't get the next FocusChange event.

And what is the best practise, to select the whole text if i focus a field?

Hello
2 question about PDF Watermark

1.) Can i delete the watermark which i applied with COMPDF_LoadFileAsWatermark and COMPDF_ApplyWatermark?
I didn't find a function and a COMPDF_ApplyWatermark with 0 didn't change anything ...

2.) Is there an function without a visual PDF, for Load and Apply a PDF as Watermark?
I need it for the WPPDF component to apply a PDF File as watermark, and i don't want to vreate every time a PDFViewer if i export a page to pdf

No - no threading (there are some threads in background but not for the GUI only for tasks like TCP/IP and so)

My first thought was also the ressource problem, but in Task manager i can see that i use many handles, but as i know the limits are 10.000 and my application is "only" 5000-6000.

And if i has Excel not running, i can open 20 Editors in my application, with excel i can open only 5 editors.
But if excel running, i can start my application 4 times, and in every application i can open 5 editors
Which means, the application running alone without excel, can start 20 editors without problems - therefore should no problem with the system per application.
And if excel is running i can start my application 4 times ....

And if it is a problem with the handle, shouldn't i get some exception?

I have some Timers in my application ....

no i can't make a simple project ... in a simple test project i can open about 80 editors without problems, the same in my big project the 6th editor is wrong and empty ----
What can i check else?

Ok, at the moment i load the text as html, and modifie the html text.
I will try your solution, for my need the text can be modified ...

Is it possible to highlight all founded text in a document?

by the way, i would like to highlight more than one word, because i search with an external tool, and would like to open the WPEditor and mark all words which i search and found in the editor?

Possible?

Ok thanks, now it looks how it should :D

An additional question - is it possible to rename these 2 dll's?
Would like to add an internal versionsnumber to it.