PDA

Ver la Versión Completa : Colocar Imagen


Er0s
16-09-2010, 12:10:11
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
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:


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


Saludos...