Ver Mensaje Individual
  #1  
Antiguo 28-07-2007
xaguilars xaguilars is offline
Miembro
 
Registrado: jul 2007
Posts: 22
Reputación: 0
xaguilars Va por buen camino
Borrar la imagen de un TImage

Una vez estuve haciendo una base de datos que contenía una imagen que tenía la opcion de borrado, pero no sabía como borrar la imagen después de haber añadido una antes, ya que el objeto parece que no tiene nada para hacer esa tarea... Pero es tan fácil como poner .Picture a nil.
Código Delphi [-]
function ClearImage (Image:TImage):boolean;
begin
  If Image.Picture=nil then
  begin
    result:=false;
    exit;
  end;
  Image.Picture:=nil;
  result:=true;
end;
Responder Con Cita