TRichView.com

Dear Sergey Tkachenko,

Thank you very much!

I tested my program as your suggestion.

My program run successful.

My problems are solved .

Thanks a lot.

Dear Sergey Tkachenko, The program run ok.But when I test it,I found a new problem. My operate steps is as below. 1)I input the content on the tag "eName15". http://www.cnblogs.com/mikalshao/gallery/image/95383.html 2)I click "save" button to save it to the "X_result". ...

Corrections in the code: 1) Modify ChangeFieldValue: procedure ChangeFieldValue(RVData: TCustomRVData; const s: String); var ParaNo, StyleNo, Tag: Integer; sl: TStringList; i, Cnt: Integer; begin [color=red]RVData := RVData.GetRVData;[/color] sl := GetStringListFromString(s); if sl.Count<X_Arrcount...

I test it.

If you use "right" click to save ,it's not successful.

The best is to use your download software to download it.

I test it with download software, it's ok.

Sergey Tkachenko wrote:This link does not work (it requires me to log in?)

I'm sorry that I have not test it before.

Please try this link.(http://www.cnblogs.com/mikalshao/archiv ... 60080.html)

click the ¡¾Delphi Program¡¿Link.

If you have also other problem, please tell me.

Thanks

Can you create a simple compilable project (preferably not using database tables) and send it to me? I'll try to fix it. Thank you. I have uploaded my program.The url is as below. http://files.cnblogs.com/mikalshao/DZBL-test.rar The main button is Save,read,button1,button2. The Save button is simil...

I write off the two sourcecode as below in the read,button1,button2 button. form1.srv.Visible:=false; form1.srv.Visible:=true; then I run my program. I click the buttons from the read ,button1,button2. At first, It's can switch successful. But I switch serval times,the error also be found. The error...

I create two new button.(button1,button2) their sourcecode is similar to the read button. the different is s string; The read button's is "s:='111';" The button1's is "s:='111'+#13#10+'222';" The button2's is "s:='111'+#13#10+'222'+#13#10+'333';" I run my program. If I ...

Dear Sergey Tkachenko, Thank you for your help. I modify your function as below. procedure ChangeFieldValue(RVData: TCustomRVData; const s: String); var ParaNo, StyleNo, Tag: Integer; sl: TStringList; i, Cnt: Integer; begin sl := GetStringListFromString(s); if sl.Count<X_Arrcount then Cnt := sl.Coun...

As I understand, you modified GetFieldValue2 so that it adds '^' between lines. To change 'eName5' to multiline text: 1) Read field value from database (s = '111^222^333') 2) Change '^' to #13#10 (s = '111'#13#10'222'#13#10'333) 3) Call: if GetFieldLocation2(rv.RVData, field, RVData, ItemNo, 'eName...

I'm meaning is that I hope when the user read the data again, the richview format as the user input before. (when the user input ,they perhaps user "enter" key auto create serval "eName" tags.) example: when input: 1111 2222 3333 when read: I hope : 1111 2222 3333 not like this: ...

I created these functions for you, but I HIGHLY recommend you to use one of demos from http://www.trichview.com/forums/viewtopic.php?t=8 as a basis, instead of these functions. Thank you for your reply. I'm sorry I can't be blind to the demo. Here's my meaning's sourcecode. 1.create the talbe and t...

Sorry for delay. As I understand, you need to change text of the field. 1) Use the unit http://www.trichview.com/support/files/RVInsertItems.zip (the most probably, it will be included in the next versions of TRichView. This unit has the function RVInsertString allowing to insert a single line of o...

Urgent!

Please help me!

Thanks!

Sergey Tkachenko, I searched the two funcitons. I create my funcitons base on them. The detail is as below. procedure TForm1.bSaveClick(Sender: TObject); var s: String; begin s := trim(GetFieldValue2(srv.RichViewEdit, 'eName5')); showmessage('»бХпјЗВјЎѕ'+s+'Ўї±ЈґжіЙ№¦ЈЎ'); end; function GetFieldValu...