Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.029 c