How to use variable declared on uniMainModule in uniEdit.keydown

[irigsoft]

Hello.

I need to read (and use) value in MyVariable declared as public on uniMainModule 

I have uniEdit.ClientEvents.ExtEvents  keydown and I want to show alert with MyVariable value, is it possible to do it?

function keydown is hardcoded on uniEdit, so is not possible to use it when form is created.

[Sherzod]

4 hours ago, irigsoft said:

I have uniEdit.ClientEvents.ExtEvents  keydown and I want to show alert with MyVariable value, is it possible to do it?

function keydown is hardcoded on uniEdit, so is not possible to use it when form is created.

Hello, 

Can you please explain in more detail? 

[irigsoft]

5 hours ago, Sherzod said:

Hello, 

Can you please explain in more detail? 

Hi.

uniMainMOdule

public

ReplacePswCnt : Integer;
 

 

1. FormCreate

ReplacePswCnt := 5;
 

2. uniEdit.ClientEvents.ExtEvents.Values ['keydown']

 

3. I enter some key and result must be (ReplacePswCnt + 5) = 10:

alert ('key=10');

 

4. result

nothing is happening  !

 

 

[Sherzod]

11 minutes ago, irigsoft said:

4. result

nothing is happening  !

Well, the replacePswCnt variable was not found on the client side...

[irigsoft]

6 minutes ago, Sherzod said:

Well, the replacePswCnt variable was not found on the client side...

Yes.

How to use it on uniEdit.ClientEvents.ExtEvents ['keydown'] ?

[Sherzod]

Using custom property for example...

[irigsoft]

3 minutes ago, Sherzod said:

Using custom property for example...

is possible to give me some kind of code example ?

[Sherzod]

10 hours ago, irigsoft said:

is possible to give me some kind of code example ?

Sorry for late response.

One possible solution:

1. UniEdit1...

function keydown(sender, e, eOpts)
{
    var customVar = ajaxRequest(sender, 'getCVar', {}, false).responseText;
    alert(parseInt(customVar) + 5);
}

2. 

procedure TMainForm.UniEdit1AjaxEvent(Sender: TComponent; EventName: string;
  Params: TUniStrings);
begin
  if EventName = 'getCVar' then
  begin
    // Instead of 10, "any variable"...
    UniSession.SendResponse(10.ToString());
  end;

end;

 

[irigsoft]

1 minute ago, Sherzod said:

Sorry for late response.

One possible solution:

1. UniEdit1...

function keydown(sender, e, eOpts)
{
    var customVar = ajaxRequest(sender, 'getCVar', {}, false).responseText;
    alert(parseInt(customVar) + 5);
}

2. 

procedure TMainForm.UniEdit1AjaxEvent(Sender: TComponent; EventName: string;
  Params: TUniStrings);
begin
  if EventName = 'getCVar' then
  begin
    // Instead of 10, "any variable"...
    UniSession.SendResponse(10.ToString());
  end;

end;

 

Thanks I will try it.