|
...make a form transparent?
|
| Autor:
TanLU |
| [ Print tip
] | | |
{
Suppose you have one form named Form1, and a button1 on Form1,
On Form1's OnCreate event write these code:
}
procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong(Form1.Handle, GWL_EXSTYLE,
(GetWindowLong(Form1.Handle, GWL_EXSTYLE) or WS_WX_TRANSPARENT));
end;
{
Only the button can be seen, but form cannot.
Works on Windows 98/2000
}
|
