TRichView.com

Inglês -
I managed to solve:

Português -
Consegui resolver

look:

ultimalinha := RetornaLinha;

image := TImage.Create(Application);
image.Picture.Assign(TBitmap(ImageList[ListaImagens.ItemIndex]));

SRichViewEdit1.RichViewEdit.BeginUndoGroup(rvutInsert);
SRichViewEdit1.RichViewEdit ...

Inglês -
no, I'm inserting in direct richview

português -
não, estou inserindo direto no richview

Hello Sergey, see the problem I'm having to use the function InsertPicture:

http://i59.tinypic.com/mt6ts3.png

this is the source code:

procedure TFrmCadEditorRegistro.ListaImagensDblClick(Sender: TObject);
var gr: TGraphic;
var image: TImage;
var ultimalinha: Integer;
begin
inherited ...

I use ScaleRichView

which command to use to position cursor in row 1 column 1 the last page of text?

After positioning the cursor, make a function to see if that page is blank or spaces to the end?

Objective: Do not allow the User save the text with the last page blank.
thanks

ok, sergey
thank you

I use the version v4.0.3 of the SRichViewEdit

I do not spotted these two properties (Mirror Margins, Facing Pages) in the Object Inspector, it would be because of the version to be old?

Hello Sergey,
you can put on odd pages margins aligned to the left, and in the even pages aligned to the right?
It would be a kind of independent margin alignment.

thank you

this code is to load the file, but and save, correct?
I will send the original file by email.

file sent, thank you.

this is the code to save the database:

QueryImpressos.Close;
QueryImpressos.Open;
QueryImpressos.UpdateObject := UpdateSQL1;
QueryImpressos.CachedUpdates := true;
QueryImpressos.Insert;
QueryImpressosTIPO.AsInteger := tipo.ItemIndex;
QueryImpressosDESCRICAO.AsString := descricao.Text ...

Hello Sergey,
I have a serious problem, this is my original text:
http://i59.tinypic.com/2m6slc8.png

I save the text above in the database, but when you open it is cut:
http://i59.tinypic.com/2m2t3s8.png

I record in a table, where the field is type "image":
http://i60.tinypic.com/2dhh0lh.png ...

Hello Sergey,
There is a version of Richview for mobile?

Hello sergey,
I would like a function that counts how many spaces have until the end of the line to replace it ".:.:.:.:."
Ex.: