Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

In this Discussion

TLMDButton.Glyph

Ich habe gerade von der 2018 auf die 2019 umgestellt und dabei folgendes Problem festgestellt.
Das setzen von Glyph wird in der aktuellen Version ignoriert. Bei der Zuweisung im OI als auch zur Laufzeit wird Glyph in:
procedure TLMDCustomButton.UpdateGlyphFromIML;
var
  tmp:TBitmap;
begin
  if FGlyphKind <> gkCustom then
    Exit;

  FGlyphUpdating := True;
  try
    if not IMLEmpty then
    begin
      tmp:=TBitmap.Create;
      try
        LMDIMLItemBitmap(ImageList, ListIndex, ImageIndex, tmp);
        TLMDGlyph(FGlyph).Glyph := tmp;
      finally
        tmp.Free;
      end;
    end
    else
     TLMDGlyph(FGlyph).Glyph := nil;
  finally
    FGlyphUpdating := False;
  end;
end;



immer auf nil gesetzt. Glyph kann nur noch per Images zugewiesen werden.

Gruß Bernd

Comments

Sign In or Register to comment.