|
|
|
|
Одной строкой
Как сделать прозрачную форму
|
procedure TForm1.FormCreate(Sender: TObject); begin Form1.Brush.Style := bsClear;
Form1.BorderStyle := bsNone
end;
|
Прислал Alexander Vozny. [000460]
|
|
|
|
|
 |
| |
|
|
|
|
|
|
|
| |
|
|
|
|
|
|
|
|
|
Одной строкой
|
procedure TForm1.FormCreate(Sender: TObject); begin Form1.Brush.Style := bsClear;
Form1.BorderStyle := bsNone
end;
|
Прислал Alexander Vozny. [000460]
|
|
|
|
|