ppRegisterRichEditClass

rbuser

I used in Delphi 6 Report Builder 6.03 an register of class for
justification
an text how:
ppRegisterRichEditClass(TIPRicEdt)
where the TIPRicEdt is an component owner;

Now i change to Delphi 7 with Report Builder 7.03 and
give this error:
"Control '' has no parent window"

if i hide the line of register {ppRegisterRichEditClass(TIPRicEdt)}
it work fine, but don't justication my text of corse!

What change in this method to Report Builder 7.03???

nardmoseley

The architecture has changed to enforce thread-safety.

For an example, see ..\RBuilder\InfoPower\ppWWRichEd.pas.

The CreateParams is overidden as follows:

procedure TppWWRichEdit.CreateParams(var Params: TCreateParams);
begin

inherited CreateParams(Params);

{remove ws-child so that no parent window is required}
if (Parent = nil) then
Params.Style := Params.Style and not(WS_CHILD);

end; {procedure, CreateParams}



--
Nard Moseley
Digital Metaphors
http://www.digital-metaphors.com