Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by turboPASCAL,
13. Jul 2006
DrawIconEx(Canvas.Handle, 0, 0, Application.Icon.Handle,
16,16, 0, 0, DI_NORMAL);
Ist das was ich suchte.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by turboPASCAL,
13. Jul 2006
Hi,
Mal 'ne Frage, ich möchte ein Applocation.Icon mit StretchDraw in einen best. Bereich darstellen.
Doch mit:
//...
Canvas.StretchDraw(RECT(0, 0, 16, 16), Application.Icon);wird das Icon in voller Grösse (32x32) dargestellt.
Ich wollte es vermeiden das ich noch extra ein Bitmap für das Icon anlegen muss.
Ich möchte nur das kleine 16x16 Icon des Applications Icons.
ExtractIconEx ist...