Welcome, Guest
You have to register before you can post on our site.

Username
  

Password
  





Search Forums

(Advanced Search)

Forum Statistics
» Members: 97,257
» Latest member: soicauxsmb24net
» Forum threads: 2,426
» Forum posts: 11,370

Full Statistics

Online Users
There are currently 1415 online users.
» 5 Member(s) | 1405 Guest(s)
Applebot, Bing, Facebook, Google, Yandex, 88vbeticu, 8xbettchat, bet88hicom1, sunwinyorg, vsbet1digital

Latest Threads
WebApplication.IP change ...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
09-09-2026, 03:02 AM
» Replies: 0
» Views: 89
Hook/callback to handle t...
Forum: IntraWeb General Discussion
Last Post: Lenfors
09-08-2026, 09:03 AM
» Replies: 0
» Views: 88
Reproducible IIS crash in...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
09-08-2026, 01:48 AM
» Replies: 0
» Views: 99
The packages IW16.xx inc...
Forum: IntraWeb General Discussion
Last Post: hsbelli
09-03-2026, 11:46 AM
» Replies: 2
» Views: 371
Redirection issues with F...
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 10:03 AM
» Replies: 0
» Views: 189
Source Code
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 08:11 AM
» Replies: 3
» Views: 544
TContenthandler requires ...
Forum: IntraWeb General Discussion
Last Post: valmeras
08-30-2026, 02:35 AM
» Replies: 0
» Views: 177
TIWjQDBGrid erratic behav...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
08-20-2026, 05:12 PM
» Replies: 8
» Views: 2,116
Change Language DataTable
Forum: IntraWeb General Discussion
Last Post: Rigoberto Mercedes
08-19-2026, 03:21 PM
» Replies: 1
» Views: 316
How to terminate HTTP Thr...
Forum: Indy
Last Post: rlebeau
08-14-2026, 08:01 AM
» Replies: 5
» Views: 904

 
  http.sys & ssl on ssllabs get C rating (vulnerable)
Posted by: ioan - 10-16-2018, 07:40 AM - Forum: IntraWeb General Discussion - Replies (7)

After changing one of my applications to use http.sys, the ssllabs rating went from A to C (vulnerable). Any idea why is this and what settings I have to make to get a better rating?

Well, it seems that I always find the answer after I post my question here :-)

This article explains what changes need to be made to get an A rating. You can also run the Powershell script from the article and it does all the changes. Now the mission for A+ rating begins.

Print this item

  IW Bootstrap 4
Posted by: LorenSzendre - 10-16-2018, 12:40 AM - Forum: IntraWeb General Discussion - Replies (3)

Just wanted to give everyone a heads up about the progress on the conversion of Kattunga's IWBootstrap3 components to IWBootstrap4.

I spent enough time in the code to realize where most of the "missing" elements were hiding. For instance, the anchor tag is simply part of the button component. And the DropDown component serves a lot of purposes.

Thus some of my early proposed changes to the IWBS3 code will not be needed. But there are some reasons to have some "stand-alone" versions of certain components, because as a component writer you cannot predict all the ways that users will use your components.

Anyway, here is a sneak preview of IWBoostrap 4.

Enjoy!

   

Print this item

  Could not compile ServerController.pas
Posted by: gerieli7@gmail.com - 10-15-2018, 02:03 PM - Forum: IntraWeb General Discussion - Replies (1)

I am using Delphi 10.2 with IW 14.2.7 /

Don't know what happened when i wanted to recompile any IW program I got this error message:

[dcc32 Error] ServerController.pas(49): E2034 Too many actual parameters.
[dcc32 Fatal Error] Pr_NEW_REQI.dpr(10): F2063 Could not compile used unit 'ServerController.pas'


This error message came to me also when creating new  IW app with nothing inside.
 
I am new to the use of intraweb and I have only one small application.

Hope to get some help here.

Thank in advance.

Eliyahu

Print this item

  Using IdTcpClient for logging data (Lazarus/Fpc)
Posted by: BosseB - 10-13-2018, 07:53 AM - Forum: Indy - No Replies

I need to write a small utility for receiving logging data from an embedded WiFi device.
The device (based on ESP8266) is programmed to work as a TCP<=>Serial bridge for channeling data between a data collection unit and a network connected master (can be a PC program or an Android App using TCP socket communications).
We have problems in certain operating modes with the device and so I need to check the data handled by the device. Dropped bytes is a killer here...

So I added two TCP servers to the device each listening on different ports and dedicated to log data sent to and from the serial port of the device. Every time there is any data in either of these sources it will be sent to the logging client in addition to the relaying destination.

Now I need to add two instances of a "logging client" to my configuration program (written with Lazarus/FPC and using the indylaz package components) and the plan is to do this as follows:

- Write a TCP logging class I can instantiate twice for the two logging directions
- Each class instance shall connect to the server on one of the two ports dedicated for logging
- While connected it shall wait for incoming data and dump all received bytes to a log file.
- The running count of the received bytes shall be reported to the main application for display (event function)

In order to do the above I probably need to use a threaded approach since I must keep the application live and responsive.

But I have not succeeded to find any good example to start from where the TCP client is threaded and does not send anything at all by itself, it shall just receive and write to disk whatever comes along. And generate an event with the current byte count.

Any suggestions on how this can be accomplished?

This is as far as I have come as of now:


Code:
type

  TRxEvent = procedure (const Buffer: TIdBytes) of object;

  { TWiFiCommLogger }

  TWiFiCommLogger = class(TThread)
  private
    FComm: TIdTcpClient;
    FServer: string;
    FPort: TIdPort;
    FTcpConnected: boolean;
    FOnRxData: TRxEvent;
    FBuffer: TIdBytes;
   FActive: boolean;
    procedure OnConnected(Sender: TObject);
    procedure OnDisConnected(Sender: TObject);
  protected
    procedure Execute; override;
  public
    constructor Create;
   destructor Destroy; override;
    procedure Connect(Server: string; Port: word);
   procedure Disconnect;
   property Active: boolean read FActive write FActive;
    property Connected: boolean read FTcpConnected;
    property OnRxData: TRxEvent read FOnRxData write FOnRxData;
  end;

implementation

{ TWiFiCommLogger }

procedure TWiFiCommLogger.OnConnected(Sender: TObject);
begin
  FTcpConnected := true;
end;

procedure TWiFiCommLogger.OnDisConnected(Sender: TObject);
begin
  FTcpConnected := false;
end;

procedure TWiFiCommLogger.Execute;
begin
  while not Terminated do
 begin
   if FActive and FTcpConnected then
    begin
      //What do I put here?
      FComm.IOHandler.ReadBytes(FBuffer, -1, true); //Append indata to buffer
      if Length(FBuffer) > 0 then
        if Assigned(FOnRxData) then
        begin
          FOnRxData(FBuffer); //Data are supposed to be saved in the main thread
          SetLength(FBuffer, 0); //So after executing the evnt procedure, erase existing data
        end;
    end;  
 end; //while
end;

constructor TWiFiCommLogger.Create;
begin
 FActive := false;
  FComm := TIdTCPClient.Create(NIL);
  FComm.IPVersion := Id_IPv4;
  FComm.ReadTimeout := 100;
  FComm.ConnectTimeout := 5000;
  FTcpConnected := false;
  FComm.OnConnected := OnConnected;
  FComm.OnDisconnected := OnDisconnected;
end;

destructor TWiFiCommLogger.Destroy;
begin
  if Connected then
    Disconnect;
  FComm.Free;
  inherited Destroy;
end;

procedure TWiFiCommLogger.Connect(Server: string; Port: word);
begin
  FServer := Server;
  FPort := Port;
  FComm.Connect(FServer, FPort);
end;

procedure TWiFiCommLogger.Disconnect;
begin
  FComm.Disconnect;
end;

Usage in main form:

Code:
procedure TfrmCommTest.FormCreate(Sender: TObject);
begin
  ...
  FLogSS := TWiFiCommLogger.Create;
  FLogSS.OnRxData := OnRxSS;
  ...
end;

procedure TfrmCommTest.btnStartLogClick(Sender: TObject);
begin
  if (FLogSS.Connected and FLogSSM.Connected) then
  begin
    FLogSS.Active := false;
    FLogSS.Disconnect;
    ledLog.Brush.Color := clRed;
    btnStartLog.Caption := 'Start Log';
  end
  else
  begin
    FLogSS.Connect(edAddress.Text, speTcpPort.Value + 10);
    if FLogSS.Connected then
    begin
      ledLog.Brush.Color := clLime;
      btnStartLog.Caption := 'Stop Log';
      FLogSS.Active := true;
    end;
  end;
end;

procedure TfrmCommTest.OnRxSS(const Buf: TBytes);
var
  len, lbuf: integer;
begin
  len := Length(Buf);
  lbuf := Length(FLogBufSS);
  SetLength(FLogBufSS, lbuf + len);
  Move(Buf[0], FLogBufSS[lbuf], len); //Append data to log buffer
 SaveLogFile(Buf); //Append data to file
 SetLength(Buf, 0);  //Clear data after save
  FSSDataRx := true;
end;

The data received (into a TIdBytes container) is sent to the main thread in the event function if defined to be stored into a file (file save not shown above).

Do I need some exception handling inside the Execute method?

Print this item

  TreeView with template
Posted by: Alain - 10-12-2018, 11:43 AM - Forum: IntraWeb General Discussion - No Replies

   
Bonjour,

I use a treeview, which is displayed correctly if I do not use an HTML template (see image Sceancewithouttemplate)

If I use a template, the treeview is not displayed as it should, (see Sceancewithtemplate image)

I use boostrap, I have attached the HTML files, if you have an idea, I'm interested

Sincerely

Alain Verdier



Attached Files Thumbnail(s)
   

.html   IWEditSceanceFrm.html (Size: 720 bytes / Downloads: 3)
.html   IWMasterTemplate.html (Size: 2.77 KB / Downloads: 2)
Print this item

  TIdFTP.ConnectTimeout
Posted by: rhcarpenter - 10-11-2018, 01:38 AM - Forum: Indy - Replies (3)

I recently upgraded my Indy components to Indy v10.6.2.0.

Since installing Indy v 10.6.2.0 I am receiving the following when attempting to open a new form on which I have dropped a TIdFTP component.

    ERROR: Error reading FTPClient.ConnectTimeout:  Property ConnectTimeout does not exist

yet when I look in the object inspector, ConnectTimeout is a valid property set to zero.

I was told I probably have multiple Indy versions installed on my machine.  How do I determine if this is the case and if so, how do I fix it?

Your help will be appreciated. 

Thanks,
Randall H. Carpenter

Print this item

  Confirm Bug in IWBootstrap
Posted by: LorenSzendre - 10-10-2018, 10:32 PM - Forum: IntraWeb General Discussion - No Replies

Could a few of youz check IWBSCommon around line 563 and see if this isn't a massive bug:

if LT > LF then

The code is indented as if the author intended the next block to be scoped, and not just the next line.

I think there is a begin missing here.

Print this item

  Enforce session timeout without user interaction
Posted by: rchristi12 - 10-10-2018, 08:57 PM - Forum: IntraWeb General Discussion - Replies (1)

I am using Delphi 10.1 Berlin with IntraWeb 14.2.3.  We have an application running as as ISAPI dll in IIS.  We are using the session timeout value (15 minutes) in the Server Controller which works, however it requires user action to trigger it.  In other words if the session times out and a user tries to do something they are redirected to a static html page indicating that their session has timed out and that they are required to log back in.  We really need the session timeout enforced and page redirect to occur even if no user activity occurs during the timeout period.  This is required for security purposes.  I have tried using the TIWTimer control with the onTimer event, however I don't know how to reset it if the user takes action on the screen such as clicking buttons.  It seems to start the timer when the form is first loaded.  Does anyone know how to address this situation?  Is there another option in IntraWeb 15?  Also we have hundreds of forms so even if the timer option works it is not ideal since we would need to modify every form and add the timer functionality to it.  Thanks.

Print this item

  IW 15 - URL Parameters
Posted by: AngelicTech - 10-09-2018, 12:44 PM - Forum: IntraWeb General Discussion - No Replies

Hello,

I am trying to retrieve url parameters from a form.

I have no problem when a form is first accessed, but if the page is currently displayed then I do not get the new parameters.

ie. http://localhost/page?param=value1      and I get value1 when I access the param.   If I then immediately go to http://localhost/page?param=value2 I still get value1 from the param.

However if I go to http://localhost/page2 before going to http://localhost/page?param=value2 I will get the value2 value in the param.

What would be the best way to do this?

Thanks

Print this item

  Session error after upgrade to 15.0.13
Posted by: Davide - 10-09-2018, 08:51 AM - Forum: IntraWeb General Discussion - Replies (1)

Hello,

I recompiled an ISAPI project with the new IW 15.0.13 installed.
The previous release was compiled with IW 15.0.6 or IW 15.0.7 and worked fine.

The project include the frame navigation and some controls from CGDevTools.

When I try the 15.0.13 ISAPI dll on the server I get the following error:

Error message: The IP you are using is different than the one that initiated the session. 

Security check failed. Please restart the application. 



In order to restart the application, please click the link below: 

Click here to restart Agenti 

Please note that depending on the actual exception that occured, restarting the application might not be possible. If this is the case, please report the error message to the administrator. 



Error details:
Exception message : The IP you are using is different than the one that initiated the session.
Exception class : EIWSecurityException
Exception address : 0F184B76
Exception Time : 2018-10-09 10:47:11.721
------------------------------------------------------------------------------------------------------------------------
Client IP address : 217.141.31.210
Request PathInfo : /$/callback
Request Method : POST
Request User Agent : Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/69.0.3497.100 Safari/537.36
Cookies Count : 1
---------------------------------



I encountered this kind of error some yeras ago on another application.
I remeber that could be related to some properties of the server controller but I remeber which?
Could you help me to solve this problem.

Thank you,
Davide

Print this item