Open other Page

[DL4NSC]

Hello kudzu
Thanks.

Yes, I watched the demos.
In the Delphi introduction there is a second page with

TIWForm2.Create (WebApplication) .Show;

opened and displayed.
I have Unit1 and Unit2 with TIWForm1 and TIWForm2 respectively

I integrated Unit2 into Unit1. But none of the spellings lead to any result.

Here is the code
// ------------------------------------------------ ---------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include "Unit2.h"
#include "UserSessionUnit.h"
// ------------------------------------------------ ---------------------------
#pragma package (smart_init)
#pragma link "uLoginDlg"
#pragma link "uSecControl"
#pragma link "IWCompGradButton"
#pragma resource "* .dfm"
// ------------------------------------------------ ---------------------------
__fastcall TIWForm1 :: TIWForm1 (TComponent * Owner)
: TIWAppForm (Owner)
{
}
// ------------------------------------------------ ---------------------------
void setAsMainForm () {
TIWForm1 :: SetAsMainForm ();
}
#pragma startup setAsMainForm

void __fastcall TIWForm1 :: IWGradButton1Click (TObject * Sender)
{
TIWForm1-> Show ();
}
// ------------------------------------------------ ---------------------------