Forms Delphi

Title: How to make a form transparent
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