i have build intraweb standalone apllication
i am on windows server 2019 datacenter, with all patch for test
the server is not charged only one or 2 users.
the version is IW 15.2.10
once a day my software shutdown alone, with no reason !
my application is an stand alone .exe application,
start with admin right,
have all right in this directory
my server of test have 16GB memory , on ssd drive
Question,
What is best way for application
1 / standalone .exe
or
2/ service windows
or
3/ isapi solution
I have (finally installed 10.4 Sidney and IW 15.2.10 and have made a simple test project (Stand Alone) to try out the IWJQDBGrid. Apart from putting components onto the unit1.form, the only property I have changed in the default files, is the ComInitalization in ServerController, which I have set to ciMultiTheraded.
On the unit1. form I have added an ADOConnection, an AdoQuery, a Datasource, a IWDBGrid and a IWJQDBGrid. Adoconnection is pointing to a local SQLEXpress database, and the table Varer (Items in Danish). I'v connected all components and added the SQL statement "select varenr, varenavn from varer", and in the forms OnShow event, I execute AdoQuery.Open.
That's all. I'v attached a copy of the result screen (test1.jpg), where the top grid is the IWDBGrid, and the below is the IWJQDBGrid.
I hope someone can tell me what it is I'm missing, since the IWJQDBGrid is just saying Loading, where the IWDBGrid is showing the rows of the table.
I'v attached a zip file with all files in the project, except the exe-file.
I am trying to call a routine that works like windows' MessageDlg. My call to showMsg does not show modal window.
Code:
procedure TIWUserSession.WindowDoOnAsyncClick(Sender: TObject; EventParams: TStringList);
var
BtnCaption: string;
begin
if ModalWin.ButtonIndex >= 0 then begin
BtnCaption := ModalWin.Buttons[ModalWin.ButtonIndex-1];
// First ButtonIndex is 1, not 0
BtnCaption := StringReplace(BtnCaption, '&', '', [rfReplaceAll]);
WebApplication.ShowMessage('You clicked on button: ' + BtnCaption);
end;
end;
Code:
procedure TIWUserSession.ShowRegion(const ATitle: string; ARegion: TIWRegion); // this routine is executed
begin
with UserSession.ModalWin do begin
Reset;
Buttons.CommaText := '&OK,&Cancel';
Title := ATitle;
ContentElement := ARegion;
OnAsyncClick := WindowDoOnAsyncClick;
Show;
end;
end;
