| Welcome, Guest |
You have to register before you can post on our site.
|
| Latest Threads |
Strict CSP Implementation
Forum: IntraWeb General Discussion
Last Post: joelcc
Yesterday, 08:28 PM
» Replies: 1
» Views: 145
|
Form doesn’t resize with ...
Forum: IntraWeb General Discussion
Last Post: BathDragonfly
10-29-2026, 09:48 AM
» Replies: 0
» Views: 114
|
Rerendering CG Tab Contro...
Forum: IntraWeb General Discussion
Last Post: MikeComb
10-29-2026, 07:38 AM
» Replies: 5
» Views: 599
|
Simply replacing the IW i...
Forum: IntraWeb General Discussion
Last Post: DidierMenant
10-28-2026, 10:31 AM
» Replies: 0
» Views: 191
|
Simply replacing the IW i...
Forum: IntraWeb General Discussion
Last Post: DidierMenant
10-28-2026, 10:30 AM
» Replies: 0
» Views: 177
|
IWDevTools
Forum: IntraWeb General Discussion
Last Post: AndreasK
10-26-2026, 01:19 PM
» Replies: 0
» Views: 207
|
SSL Revisited
Forum: IntraWeb General Discussion
Last Post: rlebeau
10-19-2026, 09:24 PM
» Replies: 3
» Views: 806
|
SpinBox Button Size
Forum: IntraWeb General Discussion
Last Post: MikeComb
10-19-2026, 06:12 PM
» Replies: 0
» Views: 308
|
CSS in CGDevTools
Forum: IntraWeb General Discussion
Last Post: MikeComb
10-13-2026, 04:12 PM
» Replies: 2
» Views: 775
|
Help with TIWPaintBox
Forum: IntraWeb General Discussion
Last Post: EmoPal
10-13-2026, 08:44 AM
» Replies: 0
» Views: 430
|
|
|
| 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
|
|
|
| Fast demands gives err 500 |
|
Posted by: ib elfving - 05-28-2019, 03:21 PM - Forum: IntraWeb General Discussion
- Replies (13)
|
 |
Hi,
I have an intraweb application that runs smooth under normal condition, but under fast demands it sends a "internal error 500" to the clients.
The error arises when using a custom handler (e.g. iw.content.xml look alike) after this is called rapidly (Called by an external program, 5 times typically). If the same operation is done one at the time (slow) there is no problem.
I suspect that it might be a memory error, but have no clues.
Is it possible to release the custom handler after use (freeing the memory) or is this done automatically by intraweb?
Will it help to insert a small time delay between each call?
Sorry if this is a bit "fluffy", but i have no idea where to set in for a solution
regards ib
|
|
|
| Some bugs in TIdIMAP4 |
|
Posted by: johnmay - 05-27-2019, 05:38 PM - Forum: Indy
- Replies (3)
|
 |
I use Indy 5499. After installing and compiling it, first thing I noticed is that right clicking on dclIndyCore140.dpk and selecting Install reports an error. This wasn't the case in earlier versions, however, Install on dclIndyProtocols140.dpk works fine. I assume this is some change since earlier release and that it is now enough to install just dclIndyProtocols140.dpk
Anyway, onto the main problem - when downloading message list from IMAP, using UIDRetrieveAllEnvelopes
I get a list which contains subjects like (reply log from server):
Quote:* 1760 FETCH (UID 12777 FLAGS (\Seen) ENVELOPE ("5 May 2019 07:50:59 +0200" "Test \"quoted text\", more text" (("test" NIL "test" "test.com")) (("test" NIL "test" "test.com")) (("test" NIL "test" "test.com")) ((NIL NIL "test2" "test2.com")) NIL NIL NIL "<msgid@test.com>"))
The list is from Gmail if that is of any relevance.
The problem is the \" escaping of quotes - Indy doesn't seem to decode this properly and the text ends up as Test \
It should be decoded as Test "quoted text", more text
Is this a known bug?
|
|
|
| Reset the Tab Order? |
|
Posted by: ioan - 05-27-2019, 01:25 PM - Forum: IntraWeb General Discussion
- Replies (3)
|
 |
I'm redesigning some IW forms using Bootstrap and I couldn't figure out yet how to reset the Tab Order. I assigned at design time a certain Tab Order for each form input in the old design and now, using Bootstrap the Tab Order needs to be changed. Being lazy (and in the same time wanting to keep the old design working), I'm trying to modify all the controls on all the forms in code, depending of what style I'm using and loading the corresponding template for each style. I tried setting Tab Order to 0 and to -1 when I load the BS design, but it seems that the old Tab Order is still there, any idea why and how to fix this?
Here is my code that deals with changing the components style at run time:
Code: procedure ApplyBSStyle(AForm: TIWAppForm);
var
sLst: TStringList;
begin
if (UserSession.LevelString <> 'USER') and
(UserSession.ReceivedLevelString <> 'USER')
then
Exit;
if (not UserSession.IsMobile) and (not UserSession.IsNewDesign) then
Exit;
sLst := TStringList.Create; // get a list of all controls, we might need to create the template
try
with AForm do
begin
for var i := 0 to AForm.ComponentCount - 1 do
begin
if Components[i] is TIWCustomControl then
begin
var curCtrl := Components[i] as TIWCustomControl;
sLst.Add('{%'+curCtrl.Name+'%}');
curCtrl.StyleRenderOptions.RenderSize := false;
curCtrl.StyleRenderOptions.RenderPosition := false;
curCtrl.StyleRenderOptions.RenderFont := false;
curCtrl.StyleRenderOptions.RenderVisibility := false;
// seems that RenderStatus is required for BS to work
//curCtrl.StyleRenderOptions.RenderStatus := false;
curCtrl.StyleRenderOptions.RenderAbsolute := false;
curCtrl.StyleRenderOptions.RenderZIndex := false;
curCtrl.StyleRenderOptions.RenderPadding := false;
curCtrl.StyleRenderOptions.RenderBorder := false;
// TabOrder doesn't seem to work...
curCtrl.TabOrder := 0; //<--???
if curCtrl is TIWButton then
begin
// first digit is the btn style and the second digit is 1 = btn-block, 0=none
var first_digit := StrToIntDef(curCtrl.Tag.ToString[1], 0);
var second_digit := StrToIntDef(curCtrl.Tag.ToString[2], 0);
case first_digit of
1: curCtrl.Css := 'btn';
2: curCtrl.Css := 'btn btn-default';
3: curCtrl.Css := 'btn btn-primary';
4: curCtrl.Css := 'btn btn-success';
5: curCtrl.Css := 'btn btn-info';
6: curCtrl.Css := 'btn btn-warning';
7: curCtrl.Css := 'btn btn-danger';
else
curCtrl.Css := 'btn btn-primary'
end;
if second_digit = 1 then
curCtrl.Css := curCtrl.Css + ' btn-block';
end
else if curCtrl is TIWLabel then
curCtrl.Css := 'control-label'
else if curCtrl is TIWComboBox then
curCtrl.Css := 'form-control'
else if curCtrl is TIWEdit then
curCtrl.Css := 'form-control'
else if curCtrl is TIWText then
curCtrl.Css := 'form-control'
else if curCtrl is TIWMemo then
curCtrl.Css := 'form-control'
else if curCtrl is TIWCheckBox then
curCtrl.Css := 'checkbox-inline'
else if curCtrl is TIWRadioGroup then
curCtrl.Css := 'radio'
else if curCtrl is TIWRadioButton then
curCtrl.Css := 'radio'
else if curCtrl is TIWListbox then
curCtrl.Css := 'form-control'
else if curCtrl is TIWImageFile then
curCtrl.Css := 'img-responsive'
else if curCtrl is TIWDBGrid then
curCtrl.Css := 'table-hover table-striped table-bordered';
end
else if Components[i] is TIWTemplateProcessorHTML then
begin
// for now, keep the jQueryMobile style for the mobile version of the page
if UserSession.IsMobile then
begin
(Components[i] as TIWTemplateProcessorHTML).Templates.Default := 'mobi'+AForm.Name+'.htm';
StyleSheet.Filename := '';
end
// use the BS style if the user wants the new design
else if UserSession.IsNewDesign then
begin
(Components[i] as TIWTemplateProcessorHTML).Templates.Default := 'BS'+AForm.Name+'.htm';
StyleSheet.Filename := '';
end;
(Components[i] as TIWTemplateProcessorHTML).RenderStyles := false;
(Components[i] as TIWTemplateProcessorHTML).Enabled := true;
end;
end;
end;
// if there isn't already a template for this page, save all the controls into a text file
// with the name of the expected template to which the BS head can be added
if not FileExists(WebApplication.ApplicationPath + 'Templates' + PathDelim + 'BS'+AForm.Name+'.htm') then
sLst.SaveToFile(WebApplication.ApplicationPath + 'Templates' + PathDelim + 'BS'+AForm.Name+'.htm');
finally
sLst.Free;
end;
end;
|
|
|
| HTTPS with Intraweb |
|
Posted by: Orpair - 05-23-2019, 10:27 AM - Forum: IntraWeb General Discussion
- Replies (16)
|
 |
Hi,
I recently make a web application with Intraweb and deploy it as a Windows Service on a server.
Now I want to install SSL to have a HTTPS access.
I look at this project : https://github.com/Atozed/IntraWeb/tree/...ndAloneSSL to see how it works but
the secured link didn't work. (Chrome : This page of the site ... was not found /This site is inaccessible Exception message : Secure mode is required for this form).
I add libeay32.dll and ssleay32.dll on the project folder and I use their .pem files to test their application.
I test on 127.0.0.1 and I install it as a windows service to test with IP of my server too.
I'm on Delphi 10.2 and Intraweb 15.0.15.
Does anyone knows what is wrong ?
Thanks.
|
|
|
| cannot started service after deploy http.sys application |
|
Posted by: Stéphane - 05-22-2019, 08:01 AM - Forum: IntraWeb General Discussion
- Replies (4)
|
 |
i try to test Http.sys application sample "HttpSysDemo" with Intraweb 15.0.17
in DPR file :
TIWStartHSys.Execute(False);
then i deploy then HttpSysDemo1.exe as service with cmd run as administrator :
sc create HSysApp1 binPath="C:\PROJETS\\Intraweb\Samples\15\Delphi\HttpSysDemo\App1\Win32\Debug\HttpSysDemo1.exe"
When i try to start the service in the previous cmd windows with :
net start HSysApp1
the result is :
Le service HSysApp1 démarre........ (i.e. HSysApp1 service starts......)
Le service HSysApp1 n’a pas pu être lancé. (i.e. HSysApp1 service cannot be started)
why ? i don't find any detail about this failure.
Any idea please ?
|
|
|
|