![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
#3
|
|||
|
|||
|
No lo entiendo
Gracias delphi.com.ar si es el objeto timage lo que quiero crear
no sabia bien como explicarlo y se me habia pasado por alto el detalle del parent. Pero aun asi no me la crea, le he puesto unos try except para ver si me entraba bien en el with y parece que si. ¿No tendria que ponerle unas cordenadas o algo asi para decirle donde me tiene que crear el timage? Es que si no no entiendo como no me lo crea. Código:
procedure TForm1.ToolButton20Click(Sender: TObject);
begin
image := timage.Create(form1);
try
begin
with image do
begin
try
image.Picture.LoadFromFile('Z:\Pedro\rave\definitivo\iconos\camera.bmp');
except
showmessage('direccion no');
end;
image.Visible := true;
image.Parent := form1;
end;
end;
except
showmessage('no lo crea');
end;
end;
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|