• Исходники
  • Исходники - CyberGuru.ru - все об IT и программировании

Как сделать прозрачную форму

procedure TForm1.FormCreate(Sender: TObject);
begin

Form1.Brush.Style := bsClear;
Form1.BorderStyle := bsNone
end;