Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 05-12-2003
NuncaMas NuncaMas is offline
Miembro
 
Registrado: oct 2003
Posts: 70
Poder: 21
NuncaMas Va por buen camino
Borde de un Timage

Estoy haciendo un juego, y el tablero son un monton de TImage, como puedo hacer para que cuando se pincha en uno de ellos se "iluminen" sus bordes.??
Responder Con Cita
  #2  
Antiguo 05-12-2003
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.932
Poder: 26
delphi.com.ar Va por buen camino
Una solución sencilla, puede ser poner estos TImages sobre TPanels, y jugar con los bordes de estos últimos.
Otra solución puede ser modificar la imagen con Canvas.DrawFocusRect ó Canvas.FrameRect ó DrawEdge(Canvas.Handle, ....)

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
  #3  
Antiguo 06-12-2003
madriles madriles is offline
Miembro
 
Registrado: may 2003
Ubicación: madrid
Posts: 93
Poder: 21
madriles Va por buen camino
otra solucion sencilla puede ser el crear un TShape poniendo
TShape.Brush.Style:=bsClear; y en el codigo

procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Shape1.Left:=(Sender as TImage).Left - 3;
Shape1.Top:=(Sender as TImage).Top - 3;
end;

para todos los controles TImage.
el tres que aparece es el valor que le adjudico a
TShape.Pen.Width := 3;

el TShape tiene que tener el ancho y alto el tamaño del TImage mas el doble del valor de pen.width
aparte de esto tendrias que poner segun tus necesidades el Tshape.visible a True False.
espero que quede claro y que te sirva, es una solucion sencilla pero efectiva y que casi o usa recursos, por cierto si le pones un color al TShape $32EDF4 , por ejemplo resalta muy bien.
por ultimo no te olvides que Thape.Enabled:=False;
un saludo
Responder Con Cita
Respuesta



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 00:15:13.


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
Copyright 1996-2007 Club Delphi