| Welcome, Guest |
You have to register before you can post on our site.
|
| Latest Threads |
WebApplication.IP change ...
Forum: IntraWeb General Discussion
Last Post: MJS@mjs.us
09-11-2026, 09:49 PM
» Replies: 1
» Views: 280
|
Hook/callback to handle t...
Forum: IntraWeb General Discussion
Last Post: Lenfors
09-08-2026, 09:03 AM
» Replies: 0
» Views: 215
|
Reproducible IIS crash in...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
09-08-2026, 01:48 AM
» Replies: 0
» Views: 237
|
The packages IW16.xx inc...
Forum: IntraWeb General Discussion
Last Post: hsbelli
09-03-2026, 11:46 AM
» Replies: 2
» Views: 539
|
Redirection issues with F...
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 10:03 AM
» Replies: 0
» Views: 287
|
Source Code
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 08:11 AM
» Replies: 3
» Views: 711
|
TContenthandler requires ...
Forum: IntraWeb General Discussion
Last Post: valmeras
08-30-2026, 02:35 AM
» Replies: 0
» Views: 262
|
TIWjQDBGrid erratic behav...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
08-20-2026, 05:12 PM
» Replies: 8
» Views: 2,341
|
Change Language DataTable
Forum: IntraWeb General Discussion
Last Post: Rigoberto Mercedes
08-19-2026, 03:21 PM
» Replies: 1
» Views: 399
|
How to terminate HTTP Thr...
Forum: Indy
Last Post: rlebeau
08-14-2026, 08:01 AM
» Replies: 5
» Views: 1,053
|
|
|
| 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 ?
|
|
|
| Hide/Visible IWButton with template |
|
Posted by: matija - 05-21-2019, 06:58 AM - Forum: IntraWeb General Discussion
- Replies (5)
|
 |
I have IWButton in my Form with RenderVisibility=true.
This button i have defined in HTML template {%IWButton%}.
I want one time hide button in another time visible this button with Event.
IWButton.Visible:=false / IWButton.Visible:=true;
Change other property? Why not work?!
|
|
|
| Encoding problems |
|
Posted by: MikaK - 05-19-2019, 10:59 AM - Forum: IntraWeb General Discussion
- Replies (10)
|
 |
Hi,
I'm migraring on of our vcl apps to intraweb and run to exception "No mapping for the Unicode character exists in the target multi-byte code page".
I understand that it something to with encoding, but how I do encode data when it comes directly from dataset trough datasource?
I'm using Delphi 10.3.1 and IW 15.0.21. At form I have tiwdbedits, tiwdbgrids
Characters are special characters like ä and ö (iso-8859-15)
thanks
mika
|
|
|
|