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

как определить имя child формы   Найти похожие ветки 

← →
DKalinin ©   (2002-11-01 13:46) [0]

Есть TableEditForm.
При нажатии нужной кнопки на MainForm создается MDIChild
и у него меняется имя.

На show дочернего окна пытаюсь определить его имя
Self.Name но оно почему-торавно TableEditForm.

что я делаю не так?

---

← →
Андрей Прокофьев ©   (2002-11-01 13:50) [1]

Помоему MDIСhildren" ам делается Visible еще в конструкторе
те OnShow работает еще до изменения имени

---

← →
DKalinin ©   (2002-11-01 13:51) [2]

так я Name меняю сразу после Create

---

← →
Андрей Прокофьев ©   (2002-11-01 13:52) [3]

поставьте breakpoints в OnShow и посмотрите

---

← →
DKalinin ©   (2002-11-01 14:04) [4]

посмотрел

show происходит сразу после create

если смотреть self.caption
то оно равно имени родителя, а меняется потом,
когда форма уже показана.

в on show имя тоже такое же(как у родителя)
что я не так делаю?

---

← →
DKalinin ©   (2002-11-01 14:19) [5]

в таком случае как создать потомка с заранее заданным именем,
отличным от родительского?

---

← →
Андрей Прокофьев ©   (2002-11-01 14:22) [6]

Объясните, в чем проблема?
Может, есть другие решения.

---

← →
DKalinin ©   (2002-11-01 14:26) [7]

Есть форма, от которой я порождаю потомков.
(редактирование данных в таблицах БД в ней реализовано)
Потомков порождаю для разных таблиц. соответственно одним из параметров для Query, которые лежат на этой форме является таблица, которую надо редактировать.

в OnShow хотелось бы сформировать запрос в зависимости от того, для редактирования какой таблицы потомок породился и забрать данные с сервера.

---

← →
Андрей Прокофьев ©   (2002-11-01 14:32) [8]

переопределите конструктор MDIChid формы
TForm2 = class(TForm)
private
{ Private declarations }
FTableName : String;
public
{ Public declarations }
constructor Create(AOwner: TComponent; TableName : String); reintroduce; overload;
end;

implementation

constructor TForm2.Create(AOwner: TComponent; TableName : String);
begin
inherited Create(AOwner);
FTableName := TableName;
end;

и используйте это FtableName как угодно

---

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

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



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