10-26-2021, 01:29 AM
Dear sir
Let me see if I understood.
Can I have the following situation Below?
FORM 1:
=====
procedure TIWForm2.IWButton1Click(Sender: TObject);
var
frm: TIWForm3;
begin
frm := TIWForm3.Create(WebApplication);
frm.UserMessage := edtUserMassage.Text;
frm.Show;
end;
FORM 2:
=====
type
TIWForm3 = class(TIWAppForm)
IWButton1: TIWButton;
procedure IWAppFormShow(Sender: TObject);
procedure IWButton1Click(Sender: TObject);
private
FUserMessage: string;
public
property UserMessage: string read FUserMessage write FUserMessage;
end;
implementation
{$R *.dfm}
procedure TIWForm3.IWAppFormShow(Sender: TObject);
begin
WebApplication.ShowNotification(FUserMessage);
end;
QUESTION : The USERMESSAGE property value will only be visible for the current user?
Thanks for your help.
Let me see if I understood.
Can I have the following situation Below?
FORM 1:
=====
procedure TIWForm2.IWButton1Click(Sender: TObject);
var
frm: TIWForm3;
begin
frm := TIWForm3.Create(WebApplication);
frm.UserMessage := edtUserMassage.Text;
frm.Show;
end;
FORM 2:
=====
type
TIWForm3 = class(TIWAppForm)
IWButton1: TIWButton;
procedure IWAppFormShow(Sender: TObject);
procedure IWButton1Click(Sender: TObject);
private
FUserMessage: string;
public
property UserMessage: string read FUserMessage write FUserMessage;
end;
implementation
{$R *.dfm}
procedure TIWForm3.IWAppFormShow(Sender: TObject);
begin
WebApplication.ShowNotification(FUserMessage);
end;
QUESTION : The USERMESSAGE property value will only be visible for the current user?
Thanks for your help.

