transparentes bild über form legen und hin und her blenden

[n0b0dy]

hi,

habe mal ein frage undzwar:

ich habe eine form mit einem hintergrund bild.
nun möchte ich das dieses hintergrund mit was transparenten überdeckt wird, was dann nach einer zeit wieder langsam sichtbar wird. und das immer hin und her...

habe leider kA wie ich das anfangen soll. hab hier im forum verschiedenes gesehen, wie man eine form überdeckt, nur leider wird das immer wieder und wieder überdeckt, bis ich nix mehr sehe... aber sichtbar krieg ichs net.

kann mir jemand helfen?

Ciao

[Khabarakh]

Ehrlich gesagt habe ich fast nichts von deinem Post verstanden. Wenn du ein Bild über ein anderes legen willst (also blenden), solltest du dir die GR32-Lib anschauen.

[n0b0dy]

ehm ne sowas net.
hatte mich vllt komisch ausgedrückt, also nochmal:

mein programm hat als hintergrund ein bild. so dieses bild soll die ganze zeit hin und her "faden" (überblenden) also von sichtbar nach unscihtbar und von unsichtbar nach sichtbar....

(hätt ich eigentlich gleich so beschreiben können :D)


hoffe is nun verständlicher.

[Khabarakh]

Zitat:

Zitat von n0b0dy

hoffe is nun verständlicher.

Naja, etwas *g* . Fading ist ja auch nichts anderes als Blending, also brauchst zwei Bilder (Bitmaps, HDCs, ...). Das erste ist ein Hintergrundbild, ok. Aber das zweite :wink: ? Wenn du den Desktop meinst, also das ganze Fenster mit dem Hintergrund blenden willst, musst du TForm.AlphaBlendValue in einem Timer verändern. Wenn du das "Fenster-Grau" (also Bitmap auf die Formcanvas blenden) meinst, würde ich die GR32-Lib dazu nutzen. Du kannst aber auch per Scanline von Hand jedes Pixel mit clBtnFace mischen.

[n0b0dy]

neee auch net *g*

der hintergrund is schwarz und in der mitte ein bild. ein logo gewissermaßen ;)

und dieses logo soll AUF der FORM immer verschwinden und wieder auftauchen....also einmal hab ich eine form die ganz schwarz ist, paar sekunden später eine schwarze form, die ein logo in der mitte hat ;)

das will ich *g*

[ichbins]

wie gesagt: GR32 Download

[n0b0dy]

aha.
hier gibts ja richtig "viel" darüber ^^

gibts da nicht eine methode, die auch so mit delphi geht, ohne zusatzkram?

[Khabarakh]

Gut, das fällt unter Vermutung zwei :wink: . Du brauchst einen Alpha-Wert (Byte), den du in einem Timer immer zwischen 255 und 0 pendeln lässt. Das Logo hast du in einem TBitmap(32), dieses blendest du mit dem Hintergrund auf ein TImage(32).
Drei Ansätze zum Blenden:
- TCanvas.Pixels (langsam)
- TBitmap.Scanline (Pointer :wink: )
- GR32

Pseudocode für 1 und 2:

Delphi-Quellcode:

RGB(Image) = RGB(Bitmap) * Alpha + RGB(Background) * (255 - Alpha)

Nummer drei benötigt etwas Einarbeitung in die Lib, dafür wirds dann ziemlich schnell (vom Code und der Ausführung):

Delphi-Quellcode:

for i := 0 to Image.Height * Image.Width -1 do
  Image.Bits[i] := BlendReg(Alpha shl 24, Bit.Bits[i]);
EMMS;

oder auch

Delphi-Quellcode:

// Bit.DrawMode = dmBlend
Image.Bitmap.Clear(Alpha shl 24);
Image.Bitmap.Draw(0, 0, Bit);

[edit]Zuu langsam :stupid: . Passt trotzdem. [/edit]

[n0b0dy]

ochnä. das is mir nun zuviel arbeit. dachte das könnt ich eben schnell mal machen.

entweder ich lass das sein oder mach eine gifanimation da draus ;)

[Khabarakh]

Wenn man etwas Ahnung hat, geht das ziemlich schnell :P . Außerdem musst du doch mal was Neues lernen :wink: . Oder willst du dich dem Grafik-Bereich für immer verschließen?