Ver Mensaje Individual
  #2  
Antiguo 22-08-2006
Avatar de Bicho
[Bicho] Bicho is offline
Miembro Premium
 
Registrado: jul 2003
Ubicación: Inca - Mallorca
Posts: 1.776
Reputación: 22
Bicho Va por buen camino
Hola Rocio, puedes usar el component TImage que es para esos menesteres, y si lo que quieres es crear un TImage en otro componente como un panel como indicas, lo que debes hacer es algo así:

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls;

type
  TForm1 = class(TForm)
    Panel1: TPanel;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  imagen : TImage;

implementation

procedure TForm1.Button1Click(Sender: TObject);
begin
  imagen := TImage.Create(Panel1);
  imagen.Parent := Panel1;
  imagen.Picture.LoadFromFile('X:\Imagenes\2espgi2.bmp');
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  imagen.Free;
end;

end.

Es un pequeño esbozo, pero sirve para empezar, creas una variable del tipo TImage, la creas y lo importante es asignarle el parent, con la imagen aparecerá sobre el panel, luego ya puedes jugar con las propiedades left y top para colocarlo donde quieras.

Espero te sirva.

Saludos
Responder Con Cita