Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Toolbutton grau machen + disable !!! (https://www.delphipraxis.net/157214-toolbutton-grau-machen-disable.html)

Metallicwar 25. Jan 2011 08:09

AW: Toolbutton grau machen + disable !!!
 
guten morgen, kann mich mal wieder mit diesem Thema beschäftigen.
Ich bin gerade dabei, den Code von Progman zu verwenden.
Delphi-Quellcode:
procedure MakeImageHalfTransparent(Source, Dest: TPNGObject);
var
  i, j: Integer;
begin
  Dest.Assign(Source);
  Dest.CreateAlpha;
  if (Dest.Header.ColorType <> COLOR_PALETTE) then
    for j := 0 to Source.Height - 1 do
      for i := 0 to Source.Width - 1 do
        Dest.AlphaScanline[j]^[i] := Dest.AlphaScanline[j]^[i] div 3;
end;
im Form.OnShow möchte ich dann die Funktion anwenden.

Delphi-Quellcode:
procedure TForm1.FormShow(Sender: TObject);
begin
  MakeImageHalfTransparent(Toolbutton1, TToolbutton);
end;
Nur weiß ich leider nicht, was ich als Source, bzw. Dest. angeben soll.
Momentan erhalte ich die Fehlermeldung Inkompatible Typen TPNGObject und TToolButton.
Ich verwende eine Toolbar mit entsprechenden Toolbuttons und weiße diesen Images einer ImageList zu.

DeddyH 25. Jan 2011 08:14

AW: Toolbutton grau machen + disable !!!
 
Source dürfte das Bild aus der ersten Imagelist sein, Dest dann die Entsprechung aus der zweiten.

Metallicwar 25. Jan 2011 08:32

AW: Toolbutton grau machen + disable !!!
 
Zitat:

Zitat von DeddyH (Beitrag 1077103)
Source dürfte das Bild aus der ersten Imagelist sein, Dest dann die Entsprechung aus der zweiten.

Hi,
habe ich da etwas falsch verstanden?
Wenn ich 2 Imagelist brauche, dann kann ich mir in der zweiten ImageList auch gleich die PNG's in abgeschwächter Farbe speichern und bei Bedarf den Toolbuttons zuweisen.
Ich habe gedacht, dass mit Hilfe dieser procedure die Farbe des PNG's, welches dem Toolbutton zugewiesen ist, abgeschwäch wird.

DeddyH 25. Jan 2011 08:37

AW: Toolbutton grau machen + disable !!!
 
Ich hatte mich auf Lemmys Vorschlag bezogen. Ansonsten müsstest Du halt das PNGObject, das dem Button zugewiesen ist, mit dem Code bearbeiten, aber das dürfte nur umständlich bis schwer wieder rückgängig zu machen sein.

Metallicwar 25. Jan 2011 08:44

AW: Toolbutton grau machen + disable !!!
 
also die einfachste Methode um das Image farblich abzuschwächen wäre eine zweite Imagelist in der ich die PNG's in abgeschwächter Farbe speicher und dann der Eigenschaft Toolbar.DisabledImages diese Imagelist zuweise.

Jetzte stellt sich für mich die Frage, mit welchem Tool, Programm es am einfach möglich ist, die Farbe der PNG's abzuschwächen.

mfg David

DeddyH 25. Jan 2011 08:53

AW: Toolbutton grau machen + disable !!!
 
Ich denke, mit GIMP oder IrfanView dürfte das gehen. Ansonsten selber machen, den Code hast Du ja ;)


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:44 Uhr.
Seite 2 von 2     12   

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