Заказ звонка

Закрыть

*
*
*

Отображение DModule на форме

Страницы: 1
RSS
Отображение DModule на форме, Не работает код по примеру
Пытаюсь отобразить на форме справочник пользователей с помощью IDModule.Show() выдает Access Violation. Подскажите где грабли ?

На форме панель1 присутсвует.

Код
procedure TForm2.FormActivate(Sender: TObject);
var
  TcsObj: CSDN_TLB.TCS;
  App: CSDN_TLB.Tcs_Application;
  UsrForm : TCsdnAxForm;
  Usr : CSDN_TLB.IDmodule;
begin
  TcsObj := CoTCS.Create();
  App:= TcsObj.Login;

  UsrForm := TCsdnAxForm.Create(self);
  UsrForm.Parent:= Panel1;
  UsrForm.Align:= alClient;

  Usr:= APP.Users as IDModule;
  Usr.Hide;
  Usr.Show(UsrForm.ControlInterface);
end;


Проект прилагаю.
123.rar (261.43 КБ) [ Скачать ]
Изменено: dms - 05.12.2008 13:14:57
Вопрос решен... ошибка была глупейшая... отображение происходит уже после того как процедура выполнилась по сему интерфейсы созданные как локальные переменные уже не существовали.
Страницы: 1
Читают тему (гостей: 1, пользователей: 0, из них скрытых: 0)