Dynamiczne tworzenie komponentów na dynamicznie utworzonym..

[marekgajewski]

Witam!
Chciałem się dowiedzieć, czy jest możliwe dynamiczne tworzenie komponentów na dynamicznie utworzonym formularzu?

[Cyfrowy Baron]

Jest możliwe. Uprzedzając ewentualne pytanie - nic się nie zmienia w kwestii dynamicznego tworzenia komponentów dla dynamicznego formularza, ale trzeba zawsze mieć na uwadze, że dynamiczny obiekt można umieścić na dynamicznym formularzy dopiero gdy ten zostanie utworzony.

[marekgajewski]

A czy mógłbym prosić o jakiś kawałek kodu, który zobrazowałby mi jak tego dokonać?

[Cyfrowy Baron]

Teraz to już Ciebie nie rozumiem. Chcesz tworzyć obiekty dynamicznie, a nie wiesz jak to robić?!

Kod: Zaznacz cały


TForm2 *MyForm = new TForm2(NULL);
MyForm->Name = "MyForm"; // dla bezpieczeństwa
MyButton->Show();

TButton *MyButton = new TButton(MyForm);
MyButton->Name = "MyButton"; // dla bezpieczeństwa
MyButton->Parent = MyForm;
MyButton->Visible = true;
MyButtton->Left = 8;
MyButton->Top = 8;

/* należy zachować kolejność usuwania obiektów, albo usuwasz formularz i nie martwisz się o obiekty
- system sobie poradzi, albo najpierw usuwasz obiekty a dopiero potem formularz na którym się one znajdują */

delete MyButton;
delete MyForm;
 

[marekgajewski]

Dzięki. Jesteś wielki Nawet nie spodziewałem się że to będzie takie proste

[usermaw]

I jeszcze moja sugestia. Niektóre kontrolki nie są widoczne po dynamicznym utworzeniu na dynamicznej formie.
Jeśli tak się stanie, trzeba odświeżać formę po "postawieniu na nogi" dynamicznego komponentu;

FormaDynamiczna->Refresh();

[Cyfrowy Baron]

To może wynikać tylko z jakiegoś systemowego błędu z odświeżaniem.

[unloco]

Jak do tej pory temat ten bardzo mi pomógł. Czy mogę prosić o informację, jak na nowo utworzonym TImage [nazwanym jak u twórcy tematu] zmusić, aby po naciśnięciu go LKM wykonany został kod:

Kod: Zaznacz cały

zmienna = 50;
Form2->ShowModal();


Umiem to zrobić 'ręcznie' tzn podczas tworzenia aplikacji wklepać ten kod (umiem też wyświetlać kolejne formularze/formatki/jakkolwiek się to nazywa ale podczas tworzenia). Ale jak to zrobić gdy obiekt jest stworzony dynamicznie?

EDIT już po napisaniu tego posta:

Warto jednak poszperać samemu. Udało mi się napisać rozwiązanie:

W Unit1.cpp stworzyłem:

Kod: Zaznacz cały

void __fastcall TForm1::ButonKlik(TObject *Sender)
{
// tutaj co się ma dziać
}


A w Unit1.h:

Kod: Zaznacz cały

void __fastcall TForm1::ButonKlik(TObject *Sender);


I zdarzenie wykonuje się poleceniem:

Kod: Zaznacz cały

DynamicznieUtworzonyObiekt->OnClick = &ButonKlik;


[Mironas]

1. Robisz taką samą funkcję obsługi zdarzenia jak na statycznie tworzonym formularzu - czyli:
w pliku *.hpp w sekcji __published:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

__published:    // IDE-managed Components
  void __fastcall Image1Click(TObject *Sender);
 

a w pliku *.cpp:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

void __fastcall TForm15::Image1Click(TObject *Sender)
{
  zmienna = 50;
  Form2->ShowModal();
}
//---------------------------------------------------------------------------

2. Tam gdzie tworzysz dynamicznie Image dodajesz wiersz:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

  Image1->OnClick = Image1Click;

[unloco]

Mironas, uprzedziłeś mnie, napisałeś odpowiedź zanim zaktualizowałem swoją poprzednią wypowiedź . Ale dzięki również za wysiłek.

[Mironas]

Nic prostszego. Robisz kilka różnych zdarzeń, np MyImageClick1, MyImageClick2, MyImageClick3 i dla każdego tworzonego Image przypinasz inne zdarzenie - np tak:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

if ( i == 1)
  MyImage->OnClick = MyImageClick1;
else if ( i == 2)
  MyImage->OnClick = MyImageClick2;
else if ( i == 3)
  MyImage->OnClick = MyImageClick3;
 

[Mironas]

To coś źle powiązałeś. Pokaż kod.