Beiträge von Nitro

Hi,

I would like to translate the file WPPRTAB1. DFM

I added the following XML in my TWPLanguageControl to translate the ShowBord button, but it does not work.

<?xml version="1.0" encoding="windows-1250"?>
<loc><FR><WPTDlg><WPTableSelect>
 <ShowBord H="test"/>
 </WPTableSelect>
</WPTDlg></FR></loc>

I made other translations without problems. Is it the screen that does not manage the translations ?

Thanks.

Thank you for this correction.

Hi,

The compiler is wrong line. These are the two previous lines that pose problems.

Zitat

MESSAGE void __fastcall WM_GetTextLength(Winapi::Messages::TWMNoParams &Message);
MESSAGE void __fastcall WM_SETTEXT(Winapi::Messages::TMessage &Message);
MESSAGE void __fastcall WM_GETTEXT(Winapi::Messages::TMessage &Message);
HIDESBASE MESSAGE void __fastcall WMSetFocus(Winapi::Messages::TWMSetFocus &Message);

Hello,

On WPTools8, when I include the WPTRMemo.hpp file, I get a compilation error :

[C ++ Error] WPCTRMemo.hpp (1491, 35): E2040 Declaration terminated incorrectly.

on the line :

MESSAGE void __fastcall WM_SETTEXT (Winapi :: Messages :: TMessage & Message);

This is not surprising since WM_SETTEXT and WM_GETTEXT correspond to Windows constants defined in winuser.h.

#define WM_SETTEXT                      0x000C
#define WM_GETTEXT                      0x000D

These two functions should bear another name. How to get around the problem?

Hello,

I generate text with bullets.

I use this code :

reTable->CurrAttr->NumberStyle = wp_bullet;_reTable->SaveToStream(pFlux);

Then in an OnMailMergeGetText event :

Contents->Options << mmIgnoreLoadedFonts;
Contents->LoadTextFromStream(pFlux);

My problem is very simple, I created a bullet, which implicitly uses the Wingdings font.
I use the mmIgnoreLoadedFonts option because I want it to ignore the font text.

But I want to keep my bullet!

Would it be possible to have a new option mmIgnoreLoadedFontsExcept or another solution to handle this type of case ?

Thank you for your reply.

I favor the use of the forum because it allows to share the answer with the other users. So, if they ask themselves the same question tomorrow, instead of soliciting you, they will get a simpler answer.

Hello.

Having no answer, I would like to reopen my question. If it is not clear enough, I am available to provide additional information.

Hello,

I want to know the numbering value of a paragraph.

To assign a value, I do :

MyRichText->ActiveParagraph->ASet(WPAT_NumberStart, 1);

It works.

To retrieve the value of a paragraph, I tried:

MyRichText->ActiveParagraph->AGet(WPAT_NumberStart, resultat);

and

int result = MyRichText->CurrAttr->NumberStart; //return -1

It does not work.

There is a solution ?
Thank you for your help.

Hello.

In a TWPRichText, the height of headers and footers varies automatically depending on the content.

Is it possible to impose their height by programming? (And thus no longer let the headers resize according to their content).

Hello.

Thank you.

This is not the ideal solution for me because I do not have direct access to the TWPRichText in my OnMergeGetTextEvent function. I would have liked to see access to it using the parameters of the function but I will go through global variables to solve the problem.

Hello.

My problem seems really simple, but I'm stuck.
In the following code, during a merge I add a field "NUMPAGES" or text as appropriate.

void __fastcall ConvertirModele::OnMergeGetTextEvent(System::TObject * Sender, const System::UnicodeString inspname, TWPMMInsertTextContents * Contents)
	{
	if (inspname=="NUM_PAGE")
		{
		Contents->InputTextFieldName("NUMPAGES");
		}
	else	if (inspname=="TEXTE"))
		{
		Contents->StringValue = "Texte";
		}
	}

In case I use the InputTextFieldName function, the font of the variable is not resumed. The result is always in Arial, Size 11, Color Black.
When I assign my text to the StringValue property, the original font is always preserved.

How to apply the original font to the new field created ?

Thank you for your reply.

Hello,

In a TWRichtext document, I integrated an EMF image.

When I print this document on my printer, this image is correct.
When I print this document to PDF Creator, my image is also correct.
When I directly generate a PDF with WPDF, my image is degraded.

I use the following code :

TWPPDFExport *pdf = NULL;
	pdf = new TWPPDFExport(NULL);
	pdf->Source = reCourrier; //The TWPRichText
	pdf->Filename = SaveDialog1->FileName; /
	pdf->Print();

I have not found an option to influence the export of EMFs in the pdf file. Is there a solution ?

To help you, you can download this link: EDIT - download link removed -
- EICF546.tmp.EMF: The file that I integrate with TWPRichEdit
- WPDF Result.png: A screenshot of the PDF obtained with wPDF.

Thank you for help.

Hello,

To continue my previous post in the theme of styles, I have another problem.

When I define a style with an outline number >= 2, no text is displayed in the styles list.

Hello,
I use a TWPStyleScroller, and when the text size is too large, it is not displayed, making it impossible to use the component.

Here is an example that works :
http://image.noelshack.com/fichiers/2016/47/1479910625-ok.png

And now, putting the font size at 28:
http://image.noelshack.com/fichiers/2016/…9910697-non.png

Even worse, if my font is really too big, it displays several rectangle as if there were plenty of styles.
http://image.noelshack.com/fichiers/2016/…913815-nok2.png

There is a solution ?

Thanks.