Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Gráficos (https://www.clubdelphi.com/foros/forumdisplay.php?f=8)
-   -   Misma imagen en diferentes forms (https://www.clubdelphi.com/foros/showthread.php?t=44269)

Waldo 01-06-2007 21:39:17

Misma imagen en diferentes forms
 
Hola, antes que nada les mando un cordial saludo desde Mexico. Ojla me puedan ayudar en el siguiente situacion.

Obviamente estoy realizando una aplicacion en la cual existen varias forms y en algunas de ellas utilizo imagenes repetitivas (fondos especiales) mi objetivo es, como puedo hacer para cargar de una sola vez la imagen y asi poder invocar esa misma en las demas forms que la requiera, sin tener que estar engordando el executable por aplicar la misma imagen en las forms.

No se si me explique, el caso es que deseo cambair la applicando fondos en las form, pero a la vez no deseo que el executable se engorde.

jhonny 01-06-2007 21:48:39

Si colocas un TImage en un Form Padre y heredas los demás de allí, no solo dejaras de "engordar" el ejecutable, si no que si en un futuro quieres cambiar dicho fondo solo tendrás que hacerlo al padre.

Waldo 01-06-2007 21:57:24

Bien, y como puedo heredarlo

Delphius 01-06-2007 22:20:50

Mediante la herencia visual.
Se ha hablado del tema en varias oportunidades sobre el tema. Fíjate si esta búsqueda te sirve.

Saludos,

marcoszorrilla 01-06-2007 22:39:26

También puedes cargarlo de esta manera:

Código Delphi [-]
procedure TfrMenu.FormCreate(Sender: TObject);
begin
  bmpFondo := TBitmap.Create;
  BmpFondo.LoadFromFile(ExtractFilePath(Application.ExeName)+'Xxxxx.bmp');
end;

procedure TfrMenu.FormPaint(Sender: TObject);
begin
Canvas.Draw( 130, 200, bmpFondo );
end;

procedure TfrMenu.FormDestroy(Sender: TObject);
begin
 bmpFondo.Free;
end;

Un Saludo.


La franja horaria es GMT +2. Ahora son las 15:25:59.

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