Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.10.10;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.04 c
14-1095829330
YurikGL
2004-09-22 09:02
2004.10.10
1С и сеть


4-1094710880
turich
2004-09-09 10:21
2004.10.10
Помогите с диалап соединением


3-1092807793
TeNY
2004-08-18 09:43
2004.10.10
Как создать независимую базу данных


3-1094817179
mouse_web
2004-09-10 15:52
2004.10.10
Компонент соединения с базой Firebird


14-1095754445
_User_
2004-09-21 12:14
2004.10.10
OpenSource проект на Delphi (WinAPI)