Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Gráficos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 20-05-2004
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.966
Poder: 29
delphi.com.ar Va camino a la fama
Cita:
Empezado por Metralla
¿No tendria que ponerle unas cordenadas o algo asi para decirle donde me tiene que crear el timage?
Sería lo correcto si quieres ubicar tu imagen en algún sitio en particular.
Recuerda que el Parent es el control donde se ubicará el tuyo, supongamos: si Form1 tiene un panel con alineación alClient, es probable que tu imagen no se vea porque quede debajo de este panel. En este caso deberías escoger otro control para ubicar la imagen.

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
  #2  
Antiguo 20-05-2004
sanxpue sanxpue is offline
Miembro
 
Registrado: jul 2003
Posts: 196
Poder: 24
sanxpue Va por buen camino
Talking Haber si te funciona con esto

Primero si vas a usar with quitale Image. a las propiedades que le
pertenezca o de plano no uses with

Segundo hay que ver si Z no es una unidad de red por que luego cuesta
trabajo llamarlas por que el servidor puede estar trabajando en otro proceso

Si hasta ahi vamos bien entonces

Código Delphi [-]
procedure TForm1.ToolButton20Click(Sender: TObject);
begin
  image := timage.Create(form1);
  try
    begin
       with image do
       begin
         try
           Picture.LoadFromFile('Z:\Pedro\rave\definitivo\iconos\camera.bmp');
         except
           showmessage('direccion no');
         end;
         
           Parent := Self;
           Visible := true;
           Stretch := True; //para que se acode el image por que puedes
                             //andar creando pero su tamaño puede ser width = 0 y 
                            //height = 0
           
       end;
    end;
  except
    showmessage('no lo crea');
  end;
end;
__________________
saludos desde Puebla Mexico..
[email protected]
"como siempre a sus ordenes y siempre con buena cara"
'lolita me excitas, perversa piel de melocotón'
Responder Con Cita
  #3  
Antiguo 21-05-2004
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.966
Poder: 29
delphi.com.ar Va camino a la fama
Cita:
Empezado por sanxpue
Segundo hay que ver si Z no es una unidad de red por que luego cuesta trabajo llamarlas por que el servidor puede estar trabajando en otro proceso
Si hay algún problema para ubicar o cargar el archivo, la llamada LoadFormFile producirá un error. No creo que este sea el problema.
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
  #4  
Antiguo 21-05-2004
Amilius Amilius is offline
No confirmado
 
Registrado: ene 2004
Posts: 138
Poder: 0
Amilius Va por buen camino
Código Delphi [-]
   function CrearBitmapDeArchivo(const filename:string):Tbitmap;
   begin
     try
         result:=Tbitmap.create;
         with result do
         begin
           HandleType:=bmDib;/* "Device Independet Bitmap", si quieres hacer tratamiento de imagen. */
           LoadFromFile(filename);
           PixelFormat:=pf24bit;  // Si quieres tratar la imagen.
           dormant;{ Opcional para reducir consumo de recursos de GDI y recomendado para tratamiento de imágenes }
        end;
     except
         result:=nil;
     end;
   end;
   
   ...
   imagen:Tbitmap;
   ...
   imagen:=CrearBitmapDeArchivo('logo.bmp');
   ...
 imagen.free; (* " freenil(imagen) " si es posible que se llame con la referencia imagen al destructor del objeto más de una vez. *)
   ...

Última edición por Amilius fecha: 22-05-2004 a las 18:59:32.
Responder Con Cita
  #5  
Antiguo 21-05-2004
Metralla Metralla is offline
Miembro
 
Registrado: may 2004
Ubicación: Palma de Mallorca
Posts: 17
Poder: 0
Metralla Va por buen camino
Gracias a todos

El codigo me funciona desde el principio lo he probado en un formulario a parte y va bien.
Código:
  image := timage.Create(form1);
  try
	begin
	   with image do
	   begin
		 try
		   Picture.LoadFromFile('Z:\Pedro\rave\definitivo\iconos\camera.bmp');
		 except
		   showmessage('direccion no');
		 end;
		   Parent := Self;
		   Visible := true;
		   Stretch := True; //para que se acode el image por que puedes
							 //andar creando pero su tamaño puede ser width = 0 y
							//height = 0
	   end;
	end;
  except
	showmessage('no lo crea');
  end;
Pero en el que tenia antes no me imagino que se debe crear pero no se donde.
Mirare de descubrirlo .Gracias a todos por la ayuda.
El codigo de arriba funciona perfectamente.
Cuando descubra porque no funciona en mi aplicacion ya lo pondre.
Responder Con Cita
  #6  
Antiguo 21-05-2004
Metralla Metralla is offline
Miembro
 
Registrado: may 2004
Ubicación: Palma de Mallorca
Posts: 17
Poder: 0
Metralla Va por buen camino
ya esta

Pese a que la respuesta a mi problema es muy humillante la pondre.
Se me creaba todo el rato pero como no le decia donde, se creaba en la esquina superior izquierda, pero ahi tengo un canvas con pestañas y un toolbar y claro se creaba debajo y no la veia.
Creo que me ire a dar una vuelta.
Gracias a todos
Responder Con Cita
  #7  
Antiguo 21-05-2004
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.966
Poder: 29
delphi.com.ar Va camino a la fama
Cita:
Empezado por Metralla
Se me creaba todo el rato pero como no le decia donde, se creaba en la esquina superior izquierda, pero ahi tengo un canvas con pestañas y un toolbar y claro se creaba debajo y no la veia.
Eso me suponía cuando suponía:
Cita:
Empezado por Delphi.com.ar
...si Form1 tiene un panel con alineación alClient, es probable que tu imagen no se vea porque quede debajo de este panel. En este caso deberías escoger otro control para ubicar la imagen.


Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 16:27:16.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi