Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   imagen en RichEdit (https://www.clubdelphi.com/foros/showthread.php?t=86737)

jars 24-09-2014 14:00:25

imagen en RichEdit
 
Hola amigos.
Tengo una ventana que es un chat, durante el chateo me quieren pasar una url que contiene una imagen y que esta se muestre en la ventana de chat (RichEdit), es esto posible?, alguna mano con algo de código.

Por otro lado tambien me quieren pasar unas coordenadas de posisionamiento (latitud y longitud) y de ser posible que tambien de alguna forma se muestre el mapa en la ventana de chat.
Estoy totalmente a oscuras con esto.
Alguien me tiende una mano.
Gracias

ecfisa 24-09-2014 20:50:23

Hola jars.
Cita:

Empezado por jars (Mensaje 481994)
...
Tengo una ventana que es un chat, durante el chateo me quieren pasar una url que contiene una imagen y que esta se muestre en la ventana de chat (RichEdit), es esto posible?, alguna mano con algo de código.
..

Un modo es usando un TImage:
Código Delphi [-]
procedure TForm1.PutImageInRE(RE: TRichEdit; Img: TImage;
  const posX, PosY, aWidth, aHeight: Integer);
begin
  RemoveControl(Img);
  Img.Left  := posX;
  Img.Top   := posY;
  Img.Width := aWidth;
  Img.Height:= aHeight;
  RE.InsertControl(Img);
  Img.Parent:= RE;
end;

Ejemplo de uso:
Código Delphi [-]
procedure TForm1.btnPutImageClick(Sender: TObject);
begin
  PutImageInRE(RichEdit1, Image1, 510, 50, 80, 80);
end;

Muestra:


Saludos :)


La franja horaria es GMT +2. Ahora son las 06:13:02.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi