AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

AlphaBlend verstellen

Ein Thema von S2B · begonnen am 28. Feb 2004 · letzter Beitrag vom 28. Feb 2004
Antwort Antwort
Benutzerbild von S2B
S2B

Registriert seit: 1. Feb 2004
Ort: Aachen
1.268 Beiträge
 
#1

Re: AlphaBlend verstellen

  Alt 28. Feb 2004, 23:32
Hallo,
ich hab nur noch ein kleines Problem mit meinem gebastelten Code(ich weiß, er sieht schrecklich aus und man könnte es auch einfacher schreiben, aber so gut beherrsch ich das noch nicht ):

Delphi-Quellcode:
var
  x: Integer;
  Handle2: DWORD;
 
//irgendwo davor:
  x:=100;

 try
  Repeat
    Handle2:=StrToInt(ListView1.Items.Item[1].Caption);
    SetWindowLong(Handle2, GWL_EXSTYLE, GetWindowLong(Handle2, GWL_EXSTYLE) or WS_EX_LAYERED);
     begin
      try
       repeat
         x:=x-1;
         SetLayeredWindowAttributes(Handle2, 0, trunc((255 * x) / 100), LWA_ALPHA);
       until
         x=0;
      finally
       {--da muss noch etwas rein, um das Fenster zu minimieren--} 
       SetLayeredWindowAttributes(Handle2, 0, trunc((255 * 100) / 100), LWA_ALPHA);
      end;
     end;
    ListView1.Items.Item[1].Delete;
  Until
    ListView1.Items.Count<4;
 finally
    Button3.Enabled:=false;
 end;
Ich habe alle laufenden Fenster in eine ListView geschrieben und lese sie daraus aus. Die Fenster werden dann von 100%Transparenz auf 0% Transparenz "ausgeblendet". Dann werden sie minimiert und die 100% Transparenz wieder eingestellt. Und jetzt kommt mein Problem:
Das zweite Fenster wird von 100% auf 0% "ausgeblendet" und dann wiederholt sich das ständig. Mit den anderen offenen Fenstern passiert gar nix!
Was muss ich ändern, damit das nicht passiert? Ich hoffe, dass mir jemand helfen kann. Es muss ja auch nicht so früh morgens sein !
Ich freue mich über jede Antwort
Man schreibt/liest sich
S2B
Simon Praetorius
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 05:15 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz