Bild in JVXRichEdit einfügen
Hallo, ich habe seit kurzem die JVCL Komponentenbibliothek und habe ein bisschen herumexperimentiert. Im Forum gibt es zwar Codeschnipsel, wie man in die TRXRichEdit Komponente ein Bild einfügt, das funktioniert aber leider nicht bei der JVXRichEdit Komponente. Daher musste man ein bisschen herumprobieren. Hier der Code:
Code:
procedure TForm1.Button1Click(Sender: TObject);
var
Pict: TPicture;
begin
with OpenPictureDialog1 do
begin
if Execute then
begin
Pict := TPicture.Create;
try
Pict.LoadFromFile(FileName);
Clipboard.Assign(Pict);
JVXRichEdit1.PasteFromClipboard;
finally
Pict.Free;
end;
end;
end;
end;