Zoom em SpeedButton

[robinhocne]

Pessoal tem como dar zoom (aumentar o tamanho) de um botão ao passar o mouse em cima dele, mas também redimensionar a imagem dele.....ou dá para fazer algo parecido? não necessário com speedbutto!

estilo o rocketdock do seven, que quando passa o mouse os icones aumenta ...

[Jhonas]

experimente usar as propriedades Heigth e Width do componente e tambem a procedure ScaleBy(M,D) ... veja no help do delphi

abraço

[Ace Stryker™]

Isto é só um esboço, veja o que você pode fazer:

var
Mouse : TPoint;
begin
GetCursosPos(Mouse);
if (Mouse.X = 50) and (Mouse.Y = 60) then //coloque as coordenadas do button
SpeedButton1.Heigh := SpeedButton1.Heigh + 20
SpeedButton1.Width := SpeedButton1.Width + 20;
end;

Editado Agosto 16, 2011 por Ace Stryker™