Forum: Object-Pascal / Delphi-Language
by David Martens,
10. Feb 2011
@Thom: und das Ganze funktioniert auch noch mit TImageList?
Forum: Object-Pascal / Delphi-Language
by David Martens,
10. Feb 2011
Also ich hab folgendes probiert, aber geht noch nicht:
Image := TPngImage.Create;
Image.Transparent := true;
Image := GetPNG('ABC');
if Image <> nil then
begin
if Color <> clNone then
Forum: Object-Pascal / Delphi-Language
by David Martens,
10. Feb 2011
Danke erstmal an alle.
Ich habe es fast hinbekommen. Die TToolButtons haben nicht mehr hingehauen, aber das konnte ich mit dem TAdvDockPanel von TMS erschlagen. ABER
Ich habe Text auf einige Bilder geschrieben:
Image.Canvas.Brush.Style := bsClear;
Image.Canvas.Font. Name := 'Small Fonts';
Image.Canvas.Font. Size := 5;
Forum: Object-Pascal / Delphi-Language
by David Martens,
10. Feb 2011
Wir haben auf Delphi XE umgestellt. Leider habe ich das Problem der Transparenz von PNGs in Imagelisten.
Folgende Situation:
PNGs sind in einer ImageDLL gespeichert:
Auszug auf der rc Datei:
cut RCDATA "cut.png"