Текущий архив: 2004.05.30;
Скачать: CL | DM;
Вниз
TForm Найти похожие ветки
← →
FireMan_Alexey © (2004-05-18 15:10) [0]Ув. Мастера!
Когда я создаю ручками форму то она может перемещатся только в пределах моей формы, а как сделать чтобы ее можно было перемещать за пределы формы?
← →
MU © (2004-05-18 15:17) [1]Как создаете?
← →
FireMan_Alexey © (2004-05-18 15:22) [2]Form2:=TForm.CreateParented(Form1.Handle);
Form2.Left:=1;
Form2.Top:=1;
Form2.Width:=240;
Form2.Height:=180;
Form2.Caption:="1";
Form2.Repaint;
// Form2.Canvas.Ellipse(400,400,480,480);
Form2.BorderIcons:=[{biMinimize,}biSystemMenu];
Form2.BorderStyle:=bsSingle;
Form2.Color:=clBtnFace;
Form2.FormStyle:=fsNormal;
Form2.WindowState:=wsNormal;
Form2.Show;
← →
MU © (2004-05-18 15:24) [3]Form2:=TForm.CreateParented(Form1.Handle);
Поэтому и создается!!!!
Пишите
Form2:=TForm.Create(Form1);
Страницы: 1 вся ветка
Текущий архив: 2004.05.30;
Скачать: CL | DM;
Память: 0.44 MB
Время: 0.035 c
