Retouching on Preview

abak

Hello Team,

When rewrite some text (retouching) on Preview Mode, we are using :

procedure TDFR.frxReport1ClickObject(Sender: TfrxView; Button: TMouseButton;

 Shift: TShiftState; var Modified: Boolean);

begin

 if (Sender is TfrxMemoView) and (Sender.Name = 'mem_Customer') then

 begin

  TfrxMemoView(Sender).Text := InputBox('Modify...', 'Customer : ',TfrxMemoView(Sender).Text);

  Modified := True;

 end;

end;

Question :

If we complete the text after the colon : it doesn't write anything !

Why we have to rewrite the entire text, each time to see it modified ?

Thx