Hallöchen ^all
Ich versuche ein Personalisiertes Startmenü mit ein paar Grafikeffekten zu erstellen.
Bedingung: Es soll Transparent sein. 100% sind nicht nötig 20% so in der drehe denke ich mir.
Die Images (die als Icons dienen) dürfen aber nicht Transparent sein.
So entschloss ich mich zu
Code:
Form2.Brush.Style := bsclear
Dahinter startet eine weitere Form mit
Code:
Form2BG.Alphablend :=true;
Form2BG.AlphablendValue := 130;
AlphablendValue ist über einen Slider einstellbar.
Bild p1.jpg
Was jetzt schon auffällt, die transparenten Images werden hier wieder schwarz gezeichnet. Dies ging ab einer Menge von 30 Images los.
Verschiebe ich ein Image, geschieht folgendes -> p2.jpg.
Dieses Problem könnte ich lösen, wenn ich vor dem Verschieben auf
Code:
form2.Brush.Style := bsSolid;
form2.Color := clblack;
schreibe. ->p3.jpg
und danach wieder auf
Code:
form2.Brush.Style := bsClear;
Schalte ich nu ein zweites mal auf bsSolid ist das Fenster allerdings weiss. -> siehe p4.jpg
Hat wer noch ein paar Ideen dazu ??