AddHotPicture
Description
Ajoute un lien hypertexte d'image à la fin du document.
procedure AddHotPicture (const Name: String; gr: TGraphic; ParaNo: Integer = -1; VAlign: TRVVAlign = rvvaBaseline);
Parameter |
Description |
Name |
Nom de ce lien hypertexte d'image, n'importe quelle chaîne. Le nom ne doit pas contenir de caractères CR et LF. RichEidt n'utilise pas les noms eux-mêmes, ils sont là pour votre propre usage. |
gr |
L'image à insérer |
ParaNo |
Paramètre facultatif. Si ParaNo = -1, la méthode ajoute un élément à la fin du dernier paragraphe. Si ParaNo> = 0, cet élément commence un nouveau paragraphe. |
VAlign |
Paramètre facultatif. Alignement vertical de l'image, par rapport à sa ligne. Valeurs disponibles : rvvaBaseline, rvvaMiddle, rvvaAbsTop, rvvaAbsBottom, rvvaAbsMiddle, rvvaLeft, rvvaRight |
Exemple
procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
var Graphic: TGraphic;
begin
Graphic := TJpegImage.Create;
Graphic.LoadFromFile('d:\filename.jpg');
Form1.RichEdit1.AddHotPicture('', Graphic);
Form1.RichEdit1.Format;
end;