How get all parameters if you click button? My code get only first paramater!
javascript:
var index1 = 0;
var index2 = 1;
function SelectIndex1() {
return index1.toString();
}
function SelectIndex2() {
return index2.toString();
}
code:
procedure MyButtontAsyncClick ...
begin
AddToInitProc('ajaxCall("ReceiveIndex1", "&ID=" + SelectIndex1();');
RegisterCallBack('ReceiveIndex1',
procedure (aParams: TStrings)
begin
MapIndex:= StrToIntDef(aParams.Values['ID'],0);
AddToInitProc('GetMap(' + MapIndex +')');
end
);
AddToInitProc('ajaxCall("ReceiveIndex2", "&ID=" + SelectIndex2();');
RegisterCallBack('ReceiveIndex2',
procedure (aParams: TStrings)
begin
ListIndex:= StrToIntDef(aParams.Values['ID'],0);
AddToInitProc('GetList(' + ListIndex +')');
end
);
end;
javascript:
var index1 = 0;
var index2 = 1;
function SelectIndex1() {
return index1.toString();
}
function SelectIndex2() {
return index2.toString();
}
code:
procedure MyButtontAsyncClick ...
begin
AddToInitProc('ajaxCall("ReceiveIndex1", "&ID=" + SelectIndex1();');
RegisterCallBack('ReceiveIndex1',
procedure (aParams: TStrings)
begin
MapIndex:= StrToIntDef(aParams.Values['ID'],0);
AddToInitProc('GetMap(' + MapIndex +')');
end
);
AddToInitProc('ajaxCall("ReceiveIndex2", "&ID=" + SelectIndex2();');
RegisterCallBack('ReceiveIndex2',
procedure (aParams: TStrings)
begin
ListIndex:= StrToIntDef(aParams.Values['ID'],0);
AddToInitProc('GetList(' + ListIndex +')');
end
);
end;