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

Grid   Найти похожие ветки 

← →
VIB   (2003-02-21 19:14) [0]

Есть компонент Grid на форме.

Как мне через него узнать Top и Left формы

---

← →
mike-d ©   (2003-02-21 19:20) [1]

мда - хороший вопрос, понимай как хочешь...
у формы есть свои Top и Left - в чем проблема их прочитать?

---

← →
VIB   (2003-02-21 19:24) [2]

Объясняю подробнее.
Есть клас TMDBGrid наследник класа TDBGrid.
В конструкторе этого класса надо создать (динамичеки)
TEdit и поместить его ниже грида.

---

← →
Mike_Goblin ©   (2003-02-21 19:26) [3]

(DBGrid1.Owner as TForm).Top

---

← →
Anatoly Podgoretsky ©   (2003-02-21 19:32) [4]

Ну тогда тебе вообще не нужны координаты формы, достаточно Grid.Top+Grid.Height+Offset

---

← →
VIB   (2003-02-22 10:39) [5]

Я не понял что такое OffSet.
И самое главное мне надо выбрать предка для TEdit
он должен быть таким же и в Gride

---

← →
Anatoly Podgoretsky ©   (2003-02-22 10:59) [6]

1. необходимое тебе смещение
2. У Grid (не знаю только какой у тебя) и TEdit наиболее общий предок TWinControl, только выбирать тебе не придется, не позволено, задано иерархией классов.

---

← →
VIB   (2003-02-22 11:03) [7]

Если я ложу грид непосредственно на форму тогда
все нормально. TEdit выводится там где нужно.
Но когда я ложу грид на TPanel получается неправильно.
Как мне найти контейнер на каком лежит Grid чтобы Parent-ом
его передать TEdit.
Или я чего-то не понимаю.

---

← →
Романов Р.В. ©   (2003-02-22 11:09) [8]

Parent - это то на чем лежит компонент

---

← →
Anatoly Podgoretsky ©   (2003-02-22 11:12) [9]

У Grid есть Parent его и используй.

---

← →
VIB   (2003-02-22 11:17) [10]

Он имеет значение nil

---

← →
Anatoly Podgoretsky ©   (2003-02-22 11:44) [11]

Значит он не видим на форме, ну и какая разница, тоже самое будет и с TEdit.
Нет Parent значит нет.

---

← →
MBo ©   (2003-02-22 11:46) [12]

>Он имеет значение nil
Уверен? Таких контролов ты не увидишь.

---

← →
VIB   (2003-02-22 12:44) [13]

Хорошо пишу кусок кода.

//*************************************************
constructor TMDBGridEh.Create(AOwner : TComponent);
begin
inherited Create(AOwner);
SearchEdit:=TEdit.Create(Self);
SearchEdit.Parent:=Self.Parent;
SearchEdit.Vidible:=True;
end;

После этого я не вижу TEdit что не так.
Спасибо.

---

← →
MBo ©   (2003-02-22 12:53) [14]

попробуй назначить Parent в перекрытом CreateWnd

---

← →
VIB   (2003-02-22 13:02) [15]

Спасибо я уже разобрался.

---

← →
Palladin ©   (2003-02-22 13:02) [16]

дык при создании TMDBGridEh у TMDBGdindEh нету еще Parent

constructor TMDBGridEh.Create(AOwner : TComponent);
begin
inherited Create(AOwner);
SearchEdit:=TEdit.Create(Self);
SearchEdit.Parent:= AOwner;
SearchEdit.Visible:=True;
end;

---

← →
malkolinge ©   (2003-02-24 11:32) [17]

Блин зачем все так усложнять ? задача - то в том чтобы найти топ и лефт формы. Как
запрсто, берем парента, если от TForm тогда все готово, если нет (ну грид на панели к примеру лежит), тогда берем его парента т.д.

VParent:=Grid.Parent
while Assigned(VParent) and not (Vparent is TForm) do
VParent:=Vparent.Parent;

и все по-моему..По крайней мере идею изложил :)

---

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

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



Память: 0.48 MB
Время: 0.011 c