Создание компонентов на форме библиотеки

Автор prog1, 05.03.09, 11:46:03

« назад - далее »

0 Пользователи и 1 гость просматривают эту тему.

prog1

var
  Form2: TForm2;
  E1:Tedit;

procedure TForm2.Button1Click(Sender: TObject);
begin
E1:=TEdit.Create(Form2);
E1.parent:=Form2;
E1.Left:=30;
E1.top:=45;
E1.Text:='RRRRRRRR';
E1.Visible:=True;
E1.Color:=clRed;
end;
-----------------------------------
    Почему-то не создаётся компонент на форме в библиотечн. модуле. В exe - нормально все создаются.
Подскажите, пожалуйста, в чём может быть дело!!!
На Делфи. (на си отрабатывает норм.)


prog1

Готовый пример ГАЙКА использую - на форме GaykaDialog пытаюсь создать по Button1Click:  компонент Е1 существует, к его свойствам можно обратиться, но на форме не отображаеся?!

Andreych

На Delphi этот пример тоже работает.
Я взял ваш код для создания компонента Е1, и он создался на форме, красненький, с буквами RRRRR :)

prog1

Спасибо, Вы заставили меня всё же найти ошибку!!!
Делаю по Богуславскому: в процедуре  вызова Showmodal:
               var dlg : TGaykaDialog;
    dlg:= TGaykaDialog.Create( Application );
    dlg.ShowModal;
А Надо:
     dlg вообще не нужен
     GaykaDialog:= TGaykaDialog.Create( Application );
     GaykaDialog.ShowModal;
Теперь даже на гайке Богуславского можно программно добавить компонент.
Кстати, на гайке в SDK вроде всЁ нормально описано.
ЕЩё раз спасибо!
-----------------------------------------
(Администратору) тема закрыта