Merlin’s Delphi Forge

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);

I received tip from Mike Gajewski, one of our readers. This is the code you need to find out if a certain program is running. The IsProcess() routine checks if the specific filename is running. This tip can be useful when your application should or needs some other application running in order to run properly/at [...]