---

Jeg bruger delphi 6 og ved at man kan gøre en form helt eller delvis
gennemsigtig ved hjælp af properties: AlphaBlend, AlphaBlendValue,
TransparentColor og TransparentColorValue. Jeg har forsøgt 10 gange med
forskellige indstillinger, jeg har også direkte brugt et eksempel fra
nettet, men når jeg runner mit program er der sq ikke det mindste
gennemsigtighed at se

Anyone?

--
Leveret af:
http://www.kandu.dk/
"Vejen til en hurtig løsning"

---

>Jeg bruger delphi 6 og ved at man kan gøre en form helt eller delvis
>gennemsigtig ved hjælp af properties ... men når jeg runner
>mit program er der sq ikke det mindste gennemsigtighed at se

Og du kører med Windows 2000 eller bedre?

Mvh, Claus
---
e-mail: cnn@post6.tele.dk
homepage: http://home6.inet.tele.dk/cnn

---

Ladmorillo wrote:
>
> Jeg bruger delphi 6 og ved at man kan gøre en form helt eller delvis
> gennemsigtig ved hjælp af properties: AlphaBlend, AlphaBlendValue,
> TransparentColor og TransparentColorValue. Jeg har forsøgt 10 gange med
> forskellige indstillinger, jeg har også direkte brugt et eksempel fra
> nettet, men når jeg runner mit program er der sq ikke det mindste
> gennemsigtighed at se
>
> Anyone?

Transparency understøttes kun i Windows 2000 og XP(?).
Ellers vil nedenstående kode give din form 50% gennemsigtighed, skrives
i Form.OnCreate-event'et:

begin
Self.AlphaBlend := TRUE;
Self.AplhaBlendValue := 128;
end;

--
Med venlig hilsen,
René Jensen

Once a upon a time a wise man said to me:
"I consider Windows like I consider bad weather ... I accept it and hope
for something better"

---

Tak for svaret René Jensen.
                        

--
Leveret af:
http://www.kandu.dk/
"Vejen til en hurtig løsning"

---

Hi

Dette virker under win98 + Delphi3

procedure TForm1.Button2Click(Sender: TObject);
var
xxx : hrgn;
xxy : hrgn;

begin
xxx := Createrectrgn(0,0,width,height);
xxy := Createrectrgn(0,24,width,height);
combinergn(xxx,xxy,xxx, rgn_xor);
deleteObject(xxy);
SetWindowRgn (handle, xxx, true);
end;

VH Søren Mikkelsen.

"Ladmorillo" <Ladmorillo.news@kandu.dk> skrev i en meddelelse
news:u26i8.703$Z25.68322@news000.worldonline.dk...
> Jeg bruger delphi 6 og ved at man kan gøre en form helt eller delvis
> gennemsigtig ved hjælp af properties: AlphaBlend, AlphaBlendValue,
> TransparentColor og TransparentColorValue. Jeg har forsøgt 10 gange med
> forskellige indstillinger, jeg har også direkte brugt et eksempel fra
> nettet, men når jeg runner mit program er der sq ikke det mindste
> gennemsigtighed at se
>
> Anyone?
>
> --
> Leveret af:
> http://www.kandu.dk/
> "Vejen til en hurtig løsning"
>

---

"Ladmorillo" <Ladmorillo.news@kandu.dk> skrev i en meddelelse news:u26i8.703

> Jeg bruger delphi 6 og ved at man kan gøre en form helt eller delvis
> gennemsigtig ved hjælp af properties: AlphaBlend, AlphaBlendValue,
> TransparentColor og TransparentColorValue. Jeg har forsøgt 10 gange med
> forskellige indstillinger, jeg har også direkte brugt et eksempel fra
> nettet, men når jeg runner mit program er der sq ikke det mindste
> gennemsigtighed at se

AlphaBlend virker ifølge dokumentation ikke på alle OS'er og ældre
computere. I "gamle dage" kunne du gøre en form transparent ved at skrive

brush.style:=bsClear;

if formens OnCreate-event...