tmssoftware.com

TWebMessageDIg Delphi Compiler error

WEB TMS WEB Core
#1

VAR
mr: TModalResult;
begin
copied from help document
mr := await(TModalResult, WebMessageDlgl.ShowDialog('Do you like
TMS WEB Core?', WEBLib.Dialogs.mtConfirmation,[mbYes, mbNo]));
This gives Compiler error saying that a "("is missing

I tried instead
mr := await(TModalResult(WebMessageDlgl.ShowDialog('Do you like TMS WEB Core?',
mtConfirmation, [mbYes, mbNo])));
But it also give compilererror saying
E2251 Ambiguous overload call to ShowDialog

What to do

#2

Did you decorate the method from where you call this with the async attribute?

#3

How to dot hat

#4

Please see

or PDF developers guide p125

#5

I'm sorry but I did not find the anwer ther
so how to make the sample code from p 266 to work
VAR
mr: TModalResult;
begin
mr := await(TModalResult, WebMessageDlgl.ShowDialog('Do you like
TMS WEB Core?', WEBLib.Dialogs.mtConfirmation,[mbYes, mbNo]));

#6

Please read the article, use the decorator async attribute

TForm1 = class(TWebForm)
--> [async] <---
procedure WebButton1Click(Sender: TObject);
end;

© tmssoftware.com