<![CDATA[Events dynamisch zuweisen]]>Ich erzeuge zur Laufzeit dynamisch ein neues Tabsheet und CppWebBrowser. Ich würde nun gern den Seitentitel (LocationName) in die Caption des TabSheets schreiben, aber wie? Muss ich dazu das OnTitleChange-Event auch dynamisch erzeugen?

Hier erstmal mein Code:

void __fastcall TForm1::webNewWindow2(TObject *Sender,
      LPDISPATCH *ppDisp, TOLEBOOL *Cancel)
{
TAdvTabSheet *ptrTabSheet;
ptrTabSheet = new TAdvTabSheet(TForm1::AdvPageControl1);

ptrTabSheet->AdvPageControl = AdvPageControl1;
ptrTabSheet->ShowClose=true;

TCppWebBrowser* pwb = new TCppWebBrowser(this);

ptrTabSheet->InsertControl(pwb);

pwb->Align = alClient;
pwb->OnNewWindow2 = web->OnNewWindow2;
pwb->Show();

*ppDisp = pwb->Application;
}
]]>https://www.c-plusplus.net/forum/topic/79452/events-dynamisch-zuweisenRSS for NodeTue, 30 Jun 2026 00:57:57 GMTSun, 11 Jul 2004 15:46:20 GMT60<![CDATA[Reply to Events dynamisch zuweisen on Mon, 12 Jul 2004 02:34:34 GMT]]>Ich erzeuge zur Laufzeit dynamisch ein neues Tabsheet und CppWebBrowser. Ich würde nun gern den Seitentitel (LocationName) in die Caption des TabSheets schreiben, aber wie? Muss ich dazu das OnTitleChange-Event auch dynamisch erzeugen?

Hier erstmal mein Code:

void __fastcall TForm1::webNewWindow2(TObject *Sender,
      LPDISPATCH *ppDisp, TOLEBOOL *Cancel)
{
TAdvTabSheet *ptrTabSheet;
ptrTabSheet = new TAdvTabSheet(TForm1::AdvPageControl1);

ptrTabSheet->AdvPageControl = AdvPageControl1;
ptrTabSheet->ShowClose=true;

TCppWebBrowser* pwb = new TCppWebBrowser(this);

ptrTabSheet->InsertControl(pwb);

pwb->Align = alClient;
pwb->OnNewWindow2 = web->OnNewWindow2;
pwb->Show();

*ppDisp = pwb->Application;
}
]]>https://www.c-plusplus.net/forum/post/558153https://www.c-plusplus.net/forum/post/558153Mon, 12 Jul 2004 02:34:34 GMT<![CDATA[Reply to Events dynamisch zuweisen on Sun, 11 Jul 2004 16:20:38 GMT]]>Warum nicht direkt TTabSheet::Caption zuweisen?

]]>https://www.c-plusplus.net/forum/post/558187https://www.c-plusplus.net/forum/post/558187Sun, 11 Jul 2004 16:20:38 GMT<![CDATA[Reply to Events dynamisch zuweisen on Sun, 11 Jul 2004 16:58:02 GMT]]>Weil LocationName erst später bekannt ist und das Event OnTitleChange auslöst und ich weiss nicht, wie ich einem zur Laufzeit erzeugtem Webbrowser später noch sagen kann, was er dann machen soll

]]>https://www.c-plusplus.net/forum/post/558222https://www.c-plusplus.net/forum/post/558222Sun, 11 Jul 2004 16:58:02 GMT<![CDATA[Reply to Events dynamisch zuweisen on Sun, 11 Jul 2004 23:55:20 GMT]]>RedViper schrieb:

Muss ich dazu das OnTitleChange-Event auch dynamisch erzeugen?

Nicht 'erzeugen' sondern 'zuweisen', genau wie du's mit dem OnNewWindow2 auch machst.
Bin mir allerdings nicht sicher, dass ich deine Erklärungen richtig verstanden habe. 😉

]]>https://www.c-plusplus.net/forum/post/558469https://www.c-plusplus.net/forum/post/558469Sun, 11 Jul 2004 23:55:20 GMT<![CDATA[Reply to Events dynamisch zuweisen on Mon, 12 Jul 2004 02:32:54 GMT]]>Ja, war nicht so ganz fit, als ich das geschrieben habe 😃

Das Problem ist folgendes: Wenn ich dem "dynamischen" Browser das OnTitleChange-Event mittels

pwb->OnTitleChange = web->OnTitleChange;

zuweise, dann wird nur die Caption des ersten Tabsheets (das es schon bei Programmstart gibt) geändert:

void __fastcall TForm1::webTitleChange(TObject *Sender, BSTR URL)
{
AdvTabSheet1->Caption = web->LocationName;
}

... ptrTabSheet und pwb sind hier ja nicht bekannt, deshalb bin ich gerade etwas ratlos.

]]>https://www.c-plusplus.net/forum/post/558482https://www.c-plusplus.net/forum/post/558482Mon, 12 Jul 2004 02:32:54 GMT<![CDATA[Reply to Events dynamisch zuweisen on Mon, 12 Jul 2004 10:07:12 GMT]]>Du darfst halt keine absoluten Namen verwenden.

void __fastcall TForm1::webTitleChange(TObject *Sender, BSTR URL)
{
  ((TAdvTabSheet*)web->Parent)->Caption = web->LocationName;
}

Zu InsertControl lies nochmal in der Hilfe nach.

]]>https://www.c-plusplus.net/forum/post/558681https://www.c-plusplus.net/forum/post/558681Mon, 12 Jul 2004 10:07:12 GMT