Search results for 'DrawIcon'. 1 post(s) found.
2007/09/11 07:49
Extract an icon from an Windows application and paint on a Form
2007/09/11 07:49 in Delphi
This tip shows how to extract the associated icon and draw it into a small area of the form (e.g. Notepad icon)?
procedure TForm1.Button1Click(Sender: TObject) ;
var
IconIndex : word;
h : hIcon;
begin
IconIndex := 0;
h:=ExtractAssociatedIcon(hInstance,'C:\WINDOWS\NOTEPAD.EXE', IconIndex) ;
DrawIcon(Form1.Canvas.Handle, 10, 10, h) ;
end;
var
IconIndex : word;
h : hIcon;
begin
IconIndex := 0;
h:=ExtractAssociatedIcon(hInstance,'C:\WINDOWS\NOTEPAD.EXE', IconIndex) ;
DrawIcon(Form1.Canvas.Handle, 10, 10, h) ;
end;
Another posts included in "Delphi"
| How to convert HIcon to TIcon ? (0) | 2007/09/11 |
| Get Cursor Image (draw it on a Canvas) (0) | 2007/09/11 |
| Grayscaling a bitmap ? (0) | 2007/09/11 |
| How to draw transparent text on Windows Desktop (0) | 2007/09/11 |
| How to draw rotated text (0) | 2007/09/11 |
| How to convert an ICO to a BMP (0) | 2007/09/11 |
| How to Convert Pixels to Millimeters (0) | 2007/09/11 |
| How to capture Windows Desktop to Bitmap (0) | 2007/09/11 |
Trackback : Cannot send a trackbact to this post.
-
Subject different money making ideas
2010/01/29 02:54
moneyideas
-
Subject different money making ideas
2010/01/29 11:25
moneyideas
-
Subject different money making ideas
2010/01/31 16:39
moneyideas
Prev
Rss Feed