Botón con imagen por encima del borde del control

[cmfab]

Buenas tardes a todos. Por alguna casualidad alguien sabe si se puede poner una imagen en la parte derecha de un botón y que esta no quede totalmente dentro del área del botón sino que sobresalga por encima del borde de éste. me hago explicar ?.

Gracias de antemano por sus atenciones

[duilioisola]

Mira este hilo de yusnerqui (http://www.clubdelphi.com/foros/member.php?u=2483): http://www.clubdelphi.com/foros/showthread.php?t=27064
Supongo que una vez que averigues la posición donde quieres dibujar con lo que allí dicen te podrás salir con la tuya.


var
x, y : word;
begin
// Obtengo corrdenadas para dibujar a derecha del boton
PosicionConRespectoAlBoton(Boton1, x, y);

with TCanvas.Create do
begin
try
Handle := GetDC(0);
Draw(x, y, Image1.Picture.Bitmap);
finally
Free;
end;
end;
end;

[cmfab]

Gracias por la respuesta, voy a revisar el código y el hilo que me enviaste. Saludos !