Hello again,
After reading and searching further about promise, I managed to find a solution to my problem with await call back function. But there must be a way to extract [[PromiseResult]] value from promise object, but how?
type
TForm1 = class( TWebForm )
[ async ]
function Promise_02(): JSValue; assembler;
// ******************************
function TForm1.Promise_02: JSValue;
asm
function promiseFunc() {
var promise = new Promise( (resolve, reject) => {
if (Math.random() >= 0.1) {
let result = 'You WIN';
resolve(result)
}else {
let result = 'You lost your money';;
reject(result);
}
})
return promise;
}
let result_as_value = promiseFunc()
.then(result => (result_as_value = result))
.catch(result => (result_as_value = result));
return result_as_value;
end;
// ******************************
procedure TForm1.WebButton1Click( Sender: TObject );
var
aVal: JSValue;
begin
console.log( ' 1: Asynchronous JavaScript' );
console.log( ' 2: Before call promise');
aVal := await(Promise_02);
console.log('3: Next Line should be aVal');
console.log(aVal);
end;
// ******************************
output:
1: Asynchronous JavaScript
2: Before call promise
3: Next Line should be aVal
You WIN
1: Asynchronous JavaScript
2: Before call promise
3: Next Line should be aVal
You lost your money