4'eren, åhh ja. Den berygtede version ... Den var faktisk ikke så dårlig endda, men enkelt smutter gav versionen et dårligt ry.
Du leder altså efter en metode til at gøre formen gennemsigtig á la den som Winamp har. Den bedste løsning er at komme op på en nyere version af Delphi, men jeg har fundet følgende kode på den anbefalelsesværdige side
www.about.com (under delphi):
OnCreate-eventen:
var
FullRgn, ClientRgn, ButtonRgn: THandle;
Margin, X, Y: Integer;
begin
Margin := (Width - ClientWidth) shr 1;
FullRgn := CreateRectRgn(0, 0, Width, Height);
X := Margin; Y := Height - ClientHeight - Margin;
ClientRgn := CreateRectRgn(X, Y, X + ClientWidth, Y + ClientHeight);
CombineRgn(FullRgn, FullRgn, ClientRgn, RGN_DIFF) ;
inc(X,Button1.Left); inc(Y,Button1.Top);
ButtonRgn := CreateRectRgn(X, Y, X + Button1.Width, Y + Button1.Height);
CombineRgn(FullRgn, FullRgn, ButtonRgn, RGN_OR);
SetWindowRgn(Handle, FullRgn, True);
end;
Koden gør formens (ikke overskriften) helt gennemsigtig, mens knappen vises normalt. Bemærk i øvrigt at du kan klikke på de links der ligger under formen. Hvad man skal bruge det til er en anden sag og eksemplet kan heller ikke vise grader af gennemsigtighed.
Se i øvrigt (du skal have en nyere version):
http://delphi.about.com/library/weekly/aa022202a.htm