Toolbutton grau machen + disable !!!

[s.h.a.r.k]

Zitat von Metallicwar:

ah, danke für die Antwort.
Also wenn ich von meinen Images die Eigenschaft pngGrayscaleOnDisabled auf True setze verändert sich garnichts.
Wenn ich allerdings wie oben geschrieben der Eigenschaft DisabledImages (der Toolbar) meine PNGImageList zuweisen, dann werden die Toolbuttons Disabled angezeigt und in Farbe, wenn es jetzte noch möglich wäre die Farbe abzuschwächen, dann wäre es perfekt

mfg David

Funktioniert doch wunderbar?! Du musst nur die passenden Eigenschaften in der PNGImageList setzen:

• EnabledImages auf True, dann haben die Images die normale Farbe.
• EnabledImages auf False und PngOptions.pngGrayScaleOnDisabled := False -> dann werden die Images abgeschwächt gezeichnet.
• EnabledImages auf False und PngOptions.pngGrayScaleOnDisabled := True -> dann werden die Images ausgegraut gezeichnet.

[Metallicwar]

Danke für die weiteren Antworten. Ich habe es erstmal mit dem Lösungsvorschlag von s.h.a.r.k probiert.
Habe die Eigenschaften wie beschrieben gesetzt.
Die Images in den Toolbuttons werden jetzt nicht komplett grau dargestellt, sondern dunkel und ein wenig Farbe ist zu erkennen. Sooo, aber eines ist glaube ich nicht berücksichtigt worden... Die Buttons sind weiterhin anklickbar, also habe ich die Eigenschaft Enabled der Toolbar auf False gesetzt. Beim Ausführen des Programms, sind die Toolbarbuttons aber wieder komplett disabled.. (also alles grau, so wie die Farbe des Formulars).

Könntest du mal dein Project hochladen, vll habe ich nur irgendwo ne falschen Eigenschaftswert...
Weil ich wollte ja erreichen, dass die Buttons disabled sind und in einer etwas abgeschwächtere Farbe dargestellt werden.... nicht wie momentan, wo die Images sehr dunkel sind und ein wenig Farbe enthalten.

[Metallicwar]

aaarh, ich bin am verzweifeln, da muss es doch einen Weg geben. -.-
Ich sollte vll noch mal den Vorschlag von Progman ausprobieren..

[Lemmy]

Hi,

der Weg der bei mir immer funktioniert hat:

ein entsprechendes disabled Bild in einer zweiten ImageList und die Imagelist der entsprechenden Eigenschaft der Toolbar/Toolbutton zuweisen und fertig!

Grüße

[Metallicwar]

@Lemmy, ja die Idee schwirrte mir auch schon im Kopf rum, wollte eben wissen, ob es nicht doch eine Alternative gibt?

[Metallicwar]

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]

Source dürfte das Bild aus der ersten Imagelist sein, Dest dann die Entsprechung aus der zweiten.