Liebe Delphier,
ich würde gerne um das Bild eines TImage einen hellen Schein zeichnen/setzen, sodass der Anwender merkt das er dieses Bild gerade fokusiert hat. Derzeit ändere ich immer de Helligkeit des Bildes, aber ic finde das nicht so eine gute Lösung.

Kannst du ja mit Canvas machen!
Ich bin nicht so gut mit Canvas, jedoch habe ich mal einen Code für dich geschrieben, welcher einen Kreis um das Bild zeichnet!

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm2.Image1Click(Sender: TObject);
var r : Trect;
begin
//Tag 0 -> Nicht markiert, Tag 3 -> Markiert
if(Sender AS TImage).Tag = 0 then begin
r := (Sender AS Timage).BoundsRect;
//Erfassen von den Größen
r.Left := r.Left -5;
r.Top := r.Top - 5;
r.Right := r.Right + 5;
r.Bottom := r.Bottom + 5;
//Farbe einstellen
Canvas.Brush.Color := clCream;
Canvas.Pen.Style := psClear;
//Kreis zeichnen
Canvas.Ellipse(r);
//Die Grafik des Images malen
//Sonst währe Sie im Hintergrund
Canvas.Draw(r.Left+5,r.Top+5,(Sender As TImage).Picture.Graphic);
//Markiert
(Sender AS TImage).Tag := 3;
end else begin
//Erfassen von den Größen
r := (Sender AS Timage).BoundsRect;
r.Left := r.Left -5;
r.Top := r.Top - 5;
r.Right := r.Right + 5;
r.Bottom := r.Bottom + 5;
//Farbe einstellen(Hintergrund-Farbe)
Canvas.Brush.Color := Form2.Color;
Canvas.Pen.Style := psClear;
//Zeichnen
Canvas.Rectangle(r);
//Grafik neu zeichnen, sodass diese wieder zu sehen ist
Canvas.Draw(r.Left+5,r.Top+5,(Sender As TImage).Picture.Graphic);
//Nicht markiert
(Sender AS TImage).Tag := 0;
end;
end;

lg

Danke für deine Antwort, aber das ist nicht so wirklich die Lösung wpnach ich suche, denn wenn das Bild keinen Hintergrund hat und z.B. ein S ist dann ist das S ja in einem Kreis, ich möchte aber nur so einen Leichten schein um das S bekommen

Zeig doch mal ein Screenshoot und skizziere dein Anliegen etwas genauer

http://img3.imagebanana.com/img/3wyzcsvn/screen.jpg

Link:
http://img3.imagebanana.com/view/3wyzcsvn/screen.jpg

Dann erzeuge dir eine Maske für den sichtbaren Teil

Eine Maske?
Also in der Suche finde ich nur ein Ovales Fenster?!?

Geht das so:
http://swissdelphicenter.ch/de/showcode.php?id=582

??

Wenn sich das "sichtbare" Bild mit einer geometrischen Form abgrenzen lässt, umso besser.

Joa also ich abe das jetzt mal hingedeichselt
Ich habe nun einen Button in "S" Form , aber nun fehlt noch dieser leichte Schein darüber. Meine Methode die Helligkeit zu ändern fande ich persönlich jetzt nicht so brickend:
http://www.delphi-treff.de/tipps/grafik/tipp/540/

-Anhebung Helligkeit
-2.Bild
-2.Bild per Transparenz