🚀 go-pugleaf

Returning to Borland Owl 4.5 & in deep trouble.
Why please does the following code not send a message(compiles OK).
The two dialogues are property tab type within a dialogue main window.
My simple aim is to display in the 'TDdit control BrokerNameEdit ' of
dialogue DlgTransact  the text from the extern structure member
valuin_user.label1.
This text is entered into valuin_user.label1 by selecting the radiobuttton
in dialogue TDlgLfuser.
Switching from one tab to the other does not call the constructor
or setupwindow function of the selected dialogue.
I need  the AskOfferFn() to be called when the dialogue is tab switched from
TDlgLfuser to  DlgTransact. I assume that sending a message from TDlgLfuser
to
DlgTransact is the way to accomplish it.
The following code is only a preliminary test version to sendmessage()
which does not work but ultimately I need to send dialogue to dialogue of
course.
note: using EV_MESSAGE(...) in place of EV_COMMAND(USER_MESSAGE,USerMessage)
brings up the following compile error.(Help???)
"Could not find a match I32_U_I32_Sig(void(TDlgLfuser::*)())"
....................................................................
module1.h
class TDlgLfuser : public TPropertyPage
{ public:
 TDlgLfuser(TResId res);
......
protected:
......
 TRadioButton *UserDef1;
 void Def1RbFn();
 void USerMessage();
 DECLARE_RESPONSE_TABLE(TDlgLfuser);
};
///////////////////////////
module1.cpp
#include "mudule2.h"
#define USER_MESSAGE WM_USER+1
DEFINE_RESPONSE_TABLE1(TDlgLfuser, TPropertyPage)
.........
 EV_COMMAND(USERDEF1_RB,Def1RbFn),EV_COMMAND(USER_MESSAGE,USerMessage),
 END_RESPONSE_TABLE;
 void TDlgLfuser::USerMessage()
 {MessageBox("Pac Message Recieved","Message2"); }
 void TDlgLfuser::Def1RbFn()
{  .....;  TDlgLfuser::SendMessage(USER_MESSAGE,0,0); }
///////////////////////////////////
mudule2.h
class DlgTransact : public TPropertyPage {
public:
 DlgTransact(TResId res);
protected:
 TEdit *BrokerNameEdit;
 void AskOfferFn();
 };
/////////////////////////////////
  Module2.cpp
#include "mudule2.h"
DlgTransact::DlgTransact(TResId res ):TPropertyPage(res)
{ ...;  BrokerNameEdit = new TEdit(this,BROKER_NAME);}
void DlgTransact::AskOfferFn()
{BrokerNameEdit->SetText(valuin_user.label1);}//valuin_user extern struct