Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.15;
Скачать: CL | DM;

Вниз

Окна в Delphi   Найти похожие ветки 

 
Ренат   (2002-07-03 11:59) [0]

Как под Delphi сделать так чтоб окна были неперетаскиваемые и у них небыло верхней полосы?


 
Игорь Шевченко ©   (2002-07-03 12:02) [1]

Form.BorderStyle := bsNone


 
Ренат   (2002-07-03 13:50) [2]

Да но только в данном случае окно размещаетсяв верхнем левом углу и не передвигается програмно, а нужно чтоб передвигалась...


 
DeMoN-777 ©   (2002-07-03 14:46) [3]

Например так..........
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
const SC_DragMove = $F012;
begin
if button=mbleft then
begin
ReleaseCapture;
perform(WM_SysCommand, SC_DragMove, 0);
end;
end;


 
Игорь Шевченко ©   (2002-07-03 16:36) [4]

Form.Left := xxx
Form.Top := xxx
или установить Position := poDesigned и в design-time расположить форму в любом понравившемся месте



Страницы: 1 вся ветка

Текущий архив: 2002.07.15;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.051 c
8-47609
Саня
2002-02-28 14:00
2002.07.15
Как вырезать кадр из AVI


3-47199
veronika
2002-06-19 12:58
2002.07.15
Округление значений полей.


7-47841
Prince Charming
2002-04-06 23:01
2002.07.15
Подмена кода нажатой клавиши


1-47301
Tahion
2002-06-30 08:42
2002.07.15
Как нарисовать образ окна?


3-47237
ДимкаН
2002-06-20 16:51
2002.07.15
Коллеги, подскажите, пожалуйста.