Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Gráficos (https://www.clubdelphi.com/foros/forumdisplay.php?f=8)
-   -   Colocar Imagen (https://www.clubdelphi.com/foros/showthread.php?t=69895)

Er0s 16-09-2010 12:10:11

Colocar Imagen
 
Buenos días Foreros!!

El interface de mi aplicación esta dividido en 4 zonas:

1º. Los menús
2º. Una Barra debajo de los menús para accesos rápidos
3º. Un TPanel que ocupa casi toda la pantalla
4º. Una barra de estado.

El interface cuando se ejecuta se abre maximizado ocupando el total de la pantalla, lo cual hace, que dependiendo el pc donde lances la aplicación pues esta se redimensione dependiendo de la resolución de pantalla de cada equipo.

Hasta aquí todo OK. El problema me viene de la siguiente manera, quiero colocar una imagen en el Tpanel que me ocupa casi toda la pantalla de la aplicacion, y quiero colocarla, en la esquina inferior derecha de dicho panel y que siempre se quede en dicha esquina. El caso que si pruebo con resoluciones mayores a la que tengo ahora mismo la imagen se queda en su sitio y no en la esquina que quiero.

Alguna solucion?

Gracias

Casimiro Notevi 16-09-2010 12:39:44

Código Delphi [-]
procedure TFmain.FormResize(Sender: TObject);
begin
  if img.Visible then
  begin
    img.Left := (self.Width-img.Width-36);
    img.Top  := (Self.Height-img.Height-92);
    end
end;

El 36 y el 92 debes sustituirlo por el valor que te venga bien para colocar tu imagen.

cloayza 16-09-2010 17:44:37

Tambien podria ser:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
     img1.Anchors:=[akRight,akBottom];
end;

Saludos...


La franja horaria es GMT +2. Ahora son las 01:58:52.

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