Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Von eingebundener Unit auf Application.Icon zugreifen (https://www.delphipraxis.net/56371-von-eingebundener-unit-auf-application-icon-zugreifen.html)

ichbins 4. Nov 2005 17:02


Von eingebundener Unit auf Application.Icon zugreifen
 
Wäre ja theoretisch ganz einfach.

Aber da ich die Unit auch in nonVCL-Programmen benutzen will, kann ich keine Forms-Unit verwenden.

Außerdem wäre es mit Pointern auch relativ schwer, da ich nicht jedesmal wenn ich die Unit einbinde in der initialization den Pointer setzten will.

In der Unit muss ich aber auf das Application.icon kommen. Geht das irgendwie?

Der_Unwissende 4. Nov 2005 17:16

Re: Von eingebundener Unit auf Application.Icon zugreifen
 
Hi,
du kannst am einfachsten in der .dpr auf Application bzw. das Icon zugreifen. Denn an dieser Stelle ist die Unit Forms denke ich eh eingebunden. Wenn dich nur das Icon interessiert, kannst du hier das Icon an eine eigene Unit übergeben, in der halt nur dieses Icon gespeichert wird. Damit entfällt overhead an anderer Stelle.
Ist vielleicht nicht der schönste Weg, aber der würde mir jetzt einfallen.

Gruß Der Unwissende

ichbins 4. Nov 2005 17:20

Re: Von eingebundener Unit auf Application.Icon zugreifen
 
Zitat:

Zitat von Der Unwissende
[...] Denn an dieser Stelle ist die Unit Forms denke ich eh eingebunden. [...]

nicht bei einem nonVCL-Programm. Außerdem will ich ja innerhalb einer per uses eingebundenen Unit darauf zugreifen... :cry:

Flocke 4. Nov 2005 17:31

Re: Von eingebundener Unit auf Application.Icon zugreifen
 
Das Icon bindet Delphi normalerweise als Ressource mit dem Namen 'MAINICON' ein, du müsstest es also mit einem TIcon laden können (Methode LoadFromResourceName) - oder mit den API-Funktionen
Delphi-Quellcode:
LoadIcon(hInstance, 'MAINICON')
oder
Delphi-Quellcode:
LoadImage(hInstance, 'MAINICON', ...)

ichbins 4. Nov 2005 17:48

Re: Von eingebundener Unit auf Application.Icon zugreifen
 
Danke


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:36 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz