trichview.support
Re: picture in a richView |
Author |
Message |
pierrebenoit |
Posted: 02/15/2003 5:42:13 Thanks! It works. I have the code for thr JPEG now and I'm able to display a text from a file in the same directory. I can display a string with differents styles. Thanks My problem now is with hyperlinks. I'm able to display a hyperlink but when I clicked on it nothing happen... I saw richview1jump, onjump... How do you code: when you click the link, it send you a messagebox with 'hello". Thanks === For JPEG===== procedure TForm1.Button1Click(Sender: TObject); var img : TJPEGimage; begin img := TJPEGimage.Create; img.LoadFromFile('repInfo.jpg'); richview1.AddBreak; richView1.AddPicture(img); richView1.Format; end; == For a file with text ==== procedure TForm1.Button2Click(Sender: TObject); var stg : string; F : textfile; begin richview1.AddBreak; assignFile(F, 'base.txt'); reset(F); repeat readln(F, stg); richView1.AddTextFromNewLine(stg, rvsNormal); until eof(F); richView1.Format; end; procedure TForm1.Button3Click(Sender: TObject); begin // Affichage et lancement d'url richview1.AddBreak; richView1.AddTextFromNewLine('le roi du jour', rvsJump1); richView1.Format; // richview1.OnJump ... end; "Sergey Tkachenko" <[email protected]> wrote: >var bmp: TBitmap; > > >bmp := TBitmap.Create; >bmp.LoadFromFile(FileName); >rv.AddPicture(bmp); >rv.Format; > > >> >> Please, >> I would like to insert a picture in a richView (freeware - Thanks for your >> job). I have a picture (bmp ot gif) in the same path as the .exe but >althout >> I have read more the documentation (Thanks for pointing me where to find >> it) I dont succes. >> >> I saw you use addpicture but everitime I have error. I'm using D6 perso. >> >> Thanks for a simple sample > > |
Powered by ABC Amber Outlook Express Converter