Although Delphi’s StretchDraw() function should work for icons it doesn’t
The way to get round this is to use the Windows API DrawIconEx() function.
(* iNewWidth - (Integer) New icon width ** iNewHeight - (Integer) New icon height *) DrawIconEx(Canvas.Handle, 0, 0, Icon.Handle, iNewWidth, iNewHeight, 0, 0, DI_NORMAL);
Tags: api, canvas, code, Delphi, icon, image, new icon, object pascal, open source, routine, size, source, source code, strech, tip, trick, windows, windows api
Merlin’s Delphi Forge
Leave a comment