| Welcome, Guest |
You have to register before you can post on our site.
|
| Forum Statistics |
» Members: 98,262
» Latest member: King88to
» Forum threads: 2,426
» Forum posts: 11,371
Full Statistics
|
| Latest Threads |
WebApplication.IP change ...
Forum: IntraWeb General Discussion
Last Post: MJS@mjs.us
09-11-2026, 09:49 PM
» Replies: 1
» Views: 206
|
Hook/callback to handle t...
Forum: IntraWeb General Discussion
Last Post: Lenfors
09-08-2026, 09:03 AM
» Replies: 0
» Views: 165
|
Reproducible IIS crash in...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
09-08-2026, 01:48 AM
» Replies: 0
» Views: 177
|
The packages IW16.xx inc...
Forum: IntraWeb General Discussion
Last Post: hsbelli
09-03-2026, 11:46 AM
» Replies: 2
» Views: 485
|
Redirection issues with F...
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 10:03 AM
» Replies: 0
» Views: 248
|
Source Code
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 08:11 AM
» Replies: 3
» Views: 651
|
TContenthandler requires ...
Forum: IntraWeb General Discussion
Last Post: valmeras
08-30-2026, 02:35 AM
» Replies: 0
» Views: 230
|
TIWjQDBGrid erratic behav...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
08-20-2026, 05:12 PM
» Replies: 8
» Views: 2,254
|
Change Language DataTable
Forum: IntraWeb General Discussion
Last Post: Rigoberto Mercedes
08-19-2026, 03:21 PM
» Replies: 1
» Views: 367
|
How to terminate HTTP Thr...
Forum: Indy
Last Post: rlebeau
08-14-2026, 08:01 AM
» Replies: 5
» Views: 989
|
|
|
| Session Timeout Custom HTML page |
|
Posted by: msgopala - 06-12-2019, 08:08 PM - Forum: IntraWeb General Discussion
- Replies (1)
|
 |
Embarcadero® Delphi 10 Seattle Version 23.0.20618.2753
Intraweb 15.0.14
TMS pack Pro
FastReport 5
Followed the Demo CustomizingExceptions\UsingTemplates and created a custom Templates with the IWSessionimeout.html page. My project still timeouts with the generic sessiontimeout page instead of this new page.
Please let me know what I may be missing or doing wrong.
Thanks
|
|
|
| Active sessions problem |
|
Posted by: ioan - 06-12-2019, 07:06 PM - Forum: IntraWeb General Discussion
- Replies (23)
|
 |
I have a problem where from time to time there are thousands of sessions open on the server and every time between 5% and 10% of those are legitimate, the rest... I have no idea how they were created and why.
In my code the sessions that are for the level OPERATOR or ROOT never expire as long as the browser is still connected (the levels will appear in the pastebin and my code bellow). The AGENT level sessions are alive for 15 minutes, the USER level sessions are alive for 10 minutes and if there is no level I time out the session after 1 minute.
This works fine for many hours, but sometimes when I check the active sessions are thousands of them and they never expire:
https://pastebin.com/raw/x0YASKBS
To control the time the sessions stay active I have a timer set for 20 seconds on each form:
Code: procedure TformBalance.HeartbeatTimerAsyncTimer(Sender: TObject; EventParams: TStringList);
begin
StopHeartbeatTimer(HeartbeatTimer);
end;
procedure StopHeartbeatTimer(AHeartbeatTimer: TIWTimer; ACount: integer);
var
iHeartbeats: integer;
begin
if ACount > 0 then
iHeartbeats := ACount
else
// a hearthbeat is every 20 seconds, so the timeout its (iHeartbeats * 20) seconds.
if UserSession.LevelString = 'USER' then
iHeartbeats := 30
else if (UserSession.LevelString = 'AGENT') or
(UserSession.LevelString = 'COMPANY') then
iHeartbeats := 45
else if (UserSession.LevelString = '') then
iHeartbeats := 1
else
Exit; // do not timeout
if AHeartbeatTimer.Tag > iHeartbeats then
AHeartbeatTimer.Enabled := false;
AHeartbeatTimer.Tag := AHeartbeatTimer.Tag + 1;
end;
The ServerController's Session Timeout field value is 1.
Anyone have any idea where are those sessions coming from and why they are not timing out?
Edit: It might be a good idea for me to use the "rubber duck debugging method". Almost every time I post a question here, while I'm explaining what's happening I find the problem. Now I'm not sure if this is the fix, but a better code for the StopHeartbeatTimer procedure would handle all legitimate levels and the last "else" would be for everything else, aka timeout right away.
Code: // a hearthbeat is every 20 seconds, so the timeout its (iHeartbeats * 20) seconds.
if UserSession.LevelString = 'USER' then
iHeartbeats := 30
else if (UserSession.LevelString = 'AGENT') or
(UserSession.LevelString = 'COMPANY') then
iHeartbeats := 45
else if (UserSession.LevelString = 'ROOT') or
(UserSession.LevelString = 'OPERATOR') then
Exit // do not timeout
else
iHeartbeats := 1;
|
|
|
| Debug Failure Between Cosmos and VMWare |
|
Posted by: AwesomeCronk - 06-09-2019, 10:02 PM - Forum: COSMOS
- Replies (13)
|
 |
Yesterday I started having issues with testing my Cosmos code. Whenever I click the "Cosmos" button at the top of Visual Studio, It goes through the normal build and debug procedure, but when VMWare starts, I don't see my OS(named 'Experiment One'). I see:
Code: ISOLINUX 6.03 2014-10-06 ETCD Copyright (C) 1994-2014 H. Peter Anvin et al
Loading Experiment... failed!
No files found!
boot: _
The first line is normal, but lines two and three seem to tell that the failure was due to an absence of some file. The underscore is a cursor. If I type "Experiment One" after the boot: statement, it gives me the failure message and the boot statement again.
Maybe related: If I open VMWare standalone, I can see a library of virtual machines. I right-clicked the one labeled "Cosmos" and clicked "Delete from disk" before all this chaos happened. Is there a way to fix this?
EDIT: I tried again with another project, received an error: 'Unable to use the previously selected debugger. Please select another one. I am going to try and reinstall VMWare.
|
|
|
| Request to update the documentation |
|
Posted by: AwesomeCronk - 06-06-2019, 09:09 PM - Forum: COSMOS
- Replies (7)
|
 |
I downloaded Visual Studio 2019 last night(love it!) and got the user kit this morning(6-6-19). I completed a simple OS, tested in VMWare, and tried to make an ISO file to boot it from USB on an old laptop. I found that the documentation for this references many things which(I guess) no longer exist.
|
|
|
| Problems with modal dialogs with frames |
|
Posted by: Francesco - 06-05-2019, 07:51 AM - Forum: IntraWeb General Discussion
- Replies (4)
|
 |
Hi, I'm attempting to show alternatively two modal dialogs using two TIWFrame and TIWModalWindows.
In IWAppFormCreate event I have added this code to create the frames:
// Create first frame
FFrameInput:=TIWFrameInput.Create(WebApplication);
FFrameInput.Name:='FrameInput';
FFrameInput.Top := 0;
FFrameInput.Left := 0;
FFrameInput.IWFrameRegion.Parent:=Self;
FFrameInput.IWFrameRegion.Visible:=False;
// Create second frame
FFrameFilter:=TIWFrameFilter.Create(Self);
FFrameFilter.Name:='FrameFilter';
FFrameFilter.Top := 0;
FFrameFilter.Left := 0;;
FFrameFilter.IWFrameRegion.Parent:=Self;
FFrameFilter.IWFrameRegion.Visible:=False;
Then I attempt to display the FFrameFilter using TIWModalWindows with this code when I press a button in main form:
RenderInvisibleControls:=True;
with IWModalWindow1 do
begin
Reset;
Buttons.CommaText := '&Ok,&Cancel';
Title := 'Filter';
ContentElement :=FFrameFilter.IWFrameRegion;
OnAsyncClick := FrameFiltroDoOnAsyncClick;
Show;
end;
But instead the FFrameFilter the system displays the other one, the FFrameInput !
I assign to ContentElement the FFFrameFilter.IWFrameRegion and it display the FFrameInput.IWFrameRegion !!!
If in IWAppFormCreate I remove the code for creating the FFrameInput leaving only this code:
// Create only the second frame
FFrameFilter:=TIWFrameFilter.Create(Self);
FFrameFilter.Name:='FrameFilter';
FFrameFilter.Top := 0;
FFrameFilter.Left := 0;;
FFrameFilter.IWFrameRegion.Parent:=Self;
FFrameFilter.IWFrameRegion.Visible:=False;
the system display correctly the dialog...
How it's possible ? Any idea to solve the issue ?
Francesco
|
|
|
| How fix Money values with iwdbedit before save |
|
Posted by: cprmlao@hotmail.com - 06-01-2019, 05:53 PM - Forum: IntraWeb General Discussion
- Replies (3)
|
 |
Hi,
I need to fix money values of a IWDBEDIT before save it to a firebird DB table.
I use a MaskMoney JS plugin to format the money entry data.
Alter I enter data, my front end shows for sample: "$ 10,00". Next, I call an AsyncClick of a Button as:
Code: procedure TMyform.BtnSaveAsyncClick(Sender: TObject; EventParams: TStringList);
begin
// Here I´d like to fix the currency format before save to DB
// But, is too late. An error occur saying my entry field "$ 10,00" is not a format valid
end;
I could fix it in the front end, before call the async click. But, the field will shows in wrong format in browser.
How could I fix it on back end before save the record?
Regards,
Luiz
|
|
|
| Critical section problem: new problem on old code |
|
Posted by: drueter - 06-01-2019, 01:50 AM - Forum: IntraWeb General Discussion
- Replies (3)
|
 |
Hi, all. I have an IW10 stand-alone app packaged as a Windows service compiled with Delphi XE that continues to run great. Except, that on one customer server (Win Server 2012 Datacenter) the service has begun crashing periodically. The same .EXE doesn't seem to have this problem elsewhere.
In any case, the error logged in the Windows Event Log is Exception 0xc0000264 ... which pertains to critical section not owned.
I understand what that means, and am aware of fixes for some historical bugs. (For example my project does use the IWRtlFix unit.)
I also understand that threading race conditions can be tricky, and can be masked until one day they appear.
So my question is: Are there known Delphi or IW bugs discovered in the past few years that would impact IW10 on XE that are related to critical sections?
I've reviewed the code, and it seems to be OK. But something (like a fairly recent Windows update) has caused the previously-stable service to crash. This article seems relevant though: https://docs.microsoft.com/en-us/windows...on-objects ...but that specific change was some time ago (before I began having problems).
Any ideas?
|
|
|
| iwfileuploader max file size |
|
Posted by: PDSBILL - 05-31-2019, 08:59 PM - Forum: IntraWeb General Discussion
- Replies (1)
|
 |
*** Problem Solved ***
Had to change <requestLimits maxAllowedContentLength /> setting in IIS
I created a simple ISAPI (.dll) and standalone (.exe) app with just a IWFileUploader on a blank form. I am not saving the file or have any events defined
I am getting error "UNKNOWN" when attempting to upload a file of size 39 meg when my intraweb app is run as ISAPI dll.
MaxFileSize is set to 90971520 (90 meg)
I can upload 19 meg file in both.
I can upload 39 meg file only in .exe app ISAPI app shows uploading to 99% but then goes RED with hint saying "Unknown"
I have tried building in Delphi RIO with Intraweb 15.? and Delphi Tokyo 14.?
Is there a hard internal limit to the max size of a file that can be uploaded?
Bill B
|
|
|
|