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

Форма "Прыгает" не в тему!   Найти похожие ветки 

← →
][ncognito   (2004-09-28 00:22) [0]

Здравствуйте, уважаемые госпада!

Нид Хелп!
Я замучался - не могу понять в чём проблема.
Вот (http://Alex.Antipin.com/prog.zip - 7 Кб.) рафинированный проект для Д6. Описывать долго, кто скачает - сам всё поймёт.

Короче, при нажатии на красную кнопку "+" Форма начинает "прыгать". Хотя, с чего её прыгать, там нигде не изменяются её координаты, ни ширина, ни высота.... Бред.

---

← →
Palladin ©   (2004-09-28 00:30) [1]

в самом первом методе

if RowCount < MaxSize then
  begin
  Top:=cFieldBorderV;
  for j:=1 to RowCount do Top := Top + cHeigth + cDeltaV;
  RowCount:=RowCount+1;
  Left:=cFieldBorderH;
  for j:=1 to ColCount do
      begin
      Field[RowCount,j]:=TEdit.Create(Self);
      Field[RowCount,j].Visible:=false;
      Field[RowCount,j].Parent:=gboxMain;
      Field[RowCount,j].Top:=Top;
      Field[RowCount,j].Left:=Left;
      Field[RowCount,j].Height:=cHeigth;
      Field[RowCount,j].Width:=cWidth;
      Field[RowCount,j].Visible:=true;
      Left:=Left + cWidth + cDeltaH;
      end;
  end;

---

← →
][ncognito   (2004-09-28 00:34) [2]

И что в этом (выделенным полужирным) не так???? Я не пойму

---

← →
Palladin ©   (2004-09-28 00:36) [3]

как что? обращение к координатам формы!

---

← →
][ncognito   (2004-09-28 00:41) [4]

Top и Left - это мои локальные переменные. Даже если их обозвать по другому, ничего не изменится :(((

---

← →
][ncognito   (2004-09-28 00:44) [5]

А всё, понял. Не туда посмотрел. Точно. Вы были правы! Огромное спасибо!!!!!!!!!!

---

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

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



Память: 0.46 MB
Время: 0.025 c