Einzelnen Beitrag anzeigen

Benutzerbild von 3_of_8
3_of_8

Registriert seit: 22. Mär 2005
Ort: Dingolfing
4.129 Beiträge
 
Turbo Delphi für Win32
 
#17

Re: Transparenz wie bei Vista

  Alt 24. Aug 2006, 01:32
Na gut, ihr habt Recht. Ich hätte schwören können, dass das früher nicht so war, ich verwechsle wohl irgendwie immer Transparent und AlphaBlend und so weiter.

@alias: Die DP Bar ist natürlich auf der USS Delphi-PRAXiS. Aber du kriegst nix, nur Daniel G hab ich nen Drink versprochen.

@Jason: Man könnte auf die Form zeichnen, was eigentlich hinter der Form sein sollte, allerdings nicht komplett das, was dahinter sein sollte, sondern einen Mischwert aus Farbe hinter der Form und Farbe auf der Form.

Also in etwa so:

Delphi-Quellcode:
Repaint;
for I:=0 to topborder-1 do
  for J:=0 to width-1 do
    canvas.pixels[i, j]:=canvas.pixels[i, j] or bgcolor;
for I:=height-bottomborder-1 to height-1 do
  for J:=0 to width-1 do
    canvas.pixels[i, j]:=canvas.pixels[i, j] or bgcolor;
for topborder to height-bottomborder-1 do
  for J:=0 to leftborder-1 do
    canvas.pixels[i, j]:=canvas.pixels[i, j] or bgcolor;
for topborder to height-bottomborder-1 do
  for J:=width-rightborder to width-1 do
    canvas.pixels[i, j]:=canvas.pixels[i, j] or bgcolor;
Das ganze ist jetzt nur mal so schnell dahingetippt, ich erhebe keinen Anspruch darauf, dass das funktioniert. Aber aus dem Prinzip könnte man was machen.
Manuel Eberl
„The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“
- Terry Pratchett
  Mit Zitat antworten Zitat