| Welcome, Guest |
You have to register before you can post on our site.
|
| Online Users |
There are currently 788 online users. » 2 Member(s) | 782 Guest(s) Applebot, Bing, Google, Yandex, b52clubsblog, link88kbetcom1
|
| Latest Threads |
WebApplication.IP change ...
Forum: IntraWeb General Discussion
Last Post: MJS@mjs.us
09-11-2026, 09:49 PM
» Replies: 1
» Views: 308
|
Hook/callback to handle t...
Forum: IntraWeb General Discussion
Last Post: Lenfors
09-08-2026, 09:03 AM
» Replies: 0
» Views: 241
|
Reproducible IIS crash in...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
09-08-2026, 01:48 AM
» Replies: 0
» Views: 262
|
The packages IW16.xx inc...
Forum: IntraWeb General Discussion
Last Post: hsbelli
09-03-2026, 11:46 AM
» Replies: 2
» Views: 571
|
Redirection issues with F...
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 10:03 AM
» Replies: 0
» Views: 311
|
Source Code
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 08:11 AM
» Replies: 3
» Views: 737
|
TContenthandler requires ...
Forum: IntraWeb General Discussion
Last Post: valmeras
08-30-2026, 02:35 AM
» Replies: 0
» Views: 288
|
TIWjQDBGrid erratic behav...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
08-20-2026, 05:12 PM
» Replies: 8
» Views: 2,389
|
Change Language DataTable
Forum: IntraWeb General Discussion
Last Post: Rigoberto Mercedes
08-19-2026, 03:21 PM
» Replies: 1
» Views: 427
|
How to terminate HTTP Thr...
Forum: Indy
Last Post: rlebeau
08-14-2026, 08:01 AM
» Replies: 5
» Views: 1,093
|
|
|
| Error handling |
|
Posted by: SWTwo6 - 10-16-2019, 12:16 PM - Forum: IntraWeb General Discussion
- Replies (3)
|
 |
In IntraWeb XI, I was able to use the URLReposnders to use a self-registered Error page, that I could then run code on. I'm trying to work out the best way to replicate this behaviour in IWXV
I don't want to use a static page or a template, because I want to run my own code on the page. I've tried using a TerminateAndRedirect on the OnException, but it doesn't appear to have any effect (it is being called, but the browser still gets sent to the Intraweb error page)
Can anyone point me in the right direction?
|
|
|
| Minimal SSL TCPClient and server, VCL |
|
Posted by: logihouse - 10-15-2019, 08:48 PM - Forum: Indy
- Replies (6)
|
 |
Minimal SSL TCPServer and client
I am using delphi version 10.3.1 .
No certificate, it is not mandatory.
No errormessages, but only rubbish received in ServerExecute. Works fine when UseSSL = false;
Any ideas?
Place a button on an empty form, and link it to Button1Click.
Code: unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, uIdContext, IdContext,
IdServerIOHandler, IdSSL, IdSSLOpenSSL, IdBaseComponent, IdComponent,
IdCustomTCPServer, IdTCPServer, Vcl.StdCtrls, IdIOHandler, IdIOHandlerSocket,
IdIOHandlerStack, IdTCPConnection, IdTCPClient;
type
TForm1 = class(TForm)
Server: TIdTCPServer;
Client: TIdTCPClient;
cSSL: TIdSSLIOHandlerSocketOpenSSL;
Button1: TButton;
SSL: TIdServerIOHandlerSSLOpenSSL;
procedure Button1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure ServerExecute(AContext: TIdContext);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
const usessl = false;
procedure TForm1.Button1Click(Sender: TObject);
begin
Client.Connect;
Client.IOHandler.WriteLn('test');
Client.Disconnect;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Server:= TIdTCPServer.Create;
Server.DefaultPort := 443;
Client:= TIdTCPClient.Create;
Client.Host := 'Localhost';
Client.Port := 443;
Server.OnExecute := ServerExecute;
if UseSSL then
begin
cSSL:= TIdSSLIOHandlerSocketOpenSSL.Create;
SSL:= TIdServerIOHandlerSSLOpenSSL.Create;
SSL.SSLOptions.Mode := sslmServer;
SSL.SSLOptions.VerifyMode := [];
SSL.SSLOptions.VerifyDepth := 0;
SSL.SSLOptions.SSLVersions := [sslvSSLv2..sslvTLSv1_2];
TIdSSLIOHandlerSocketBase(cSSL).PassThrough := false;
cSSL.SSLOptions.Mode := sslmClient;
cSSL.SSLOptions.VerifyMode := [];
cSSL.SSLOptions.VerifyDepth := 0;
cSSL.SSLOptions.SSLVersions := [sslvSSLv2..sslvTLSv1_2]; // Avoid using SSL}
Server.IOHandler := SSL; // TIdServerIOHandlerSSLOpenSSL
Client.IOHandler := cSSL; // TIdSSLIOHandlerSocketOpenSSL
end;
Server.Active := true;
end;
procedure TForm1.ServerExecute(AContext: TIdContext);
var s : string;
begin
s := aContext.Connection.IOHandler.Alldata;
s := s;
end;
end.
|
|
|
| Warning from Datatables |
|
Posted by: matija - 10-15-2019, 08:53 AM - Forum: IntraWeb General Discussion
- Replies (4)
|
 |
I create my HTML table (datatables.net) include IWLabel raw text
<table id="mytable" class="table table-hover table-striped table-condensed dt-responsive nowrap" width="100%" cellspacing="0">
...
</table>
I have in my HTML template {%mytable%} and this style:
<style>
.sunday {
background-color: red !important;
}
</style>
After view IWLabel send (color row with red which are sunday):
WebApplication.CallBackResponse.AddJavaScriptToExecute
('$(document).ready( function () {'
+ 'var table = $("#mytable").DataTable({'
+ '"createdRow": function(row, data, dataIndex)'
+ '{ if (data[2] == "sun") {$(row).addClass("sunday");} }'
+ '});'
+ '}) ');
After AddJavaScriptToExecute get it:
DataTables warning: Non-table node initialisation (SPAN). For more information about this error, please see http://datatables.net/tn/2
|
|
|
| PReventing a second tab from opening the same session |
|
Posted by: SWTwo6 - 10-14-2019, 11:29 AM - Forum: IntraWeb General Discussion
- Replies (1)
|
 |
How do?
I don't want to use the session ID in the URL, as we want to support users bookmarking the page easily, and we need cookies enabled to allow the back button GlobalIntercept functionality to work as advertised, so I'm unable to use either of the "Mutliple independant sessions" options.
Is there any method by which I can force the session to only be valid in one browser window or tab at a time? Either by preventing a second tab from loading, or disabling the first tab on loading a second?
|
|
|
| TCPClient SSL on Android |
|
Posted by: BartKindt - 10-12-2019, 10:16 PM - Forum: Indy
- Replies (9)
|
 |
I got a debug report from an Android user, where this happened:
The Client receives a "StartTLS" from the IdTCPServer (Part of my code).
The Client responces with a "STARTTLS" back, then does a Sleep(1000) (this solves some timing issues) and then switches the Passthrough to FALSE:
sleep(1000);
IdSSLIOHandlerSocketOpenSSL1.PassThrough := false;
The SSL Negotiating starts, and gets to this:
[S] [06:21:09Z] SSL StatusInfo: SSL status: "before/connect initialization"
[S] [06:21:09Z] SSL StatusInfo: SSL status: "before/connect initialization"
[S] [06:21:09Z] SSL StatusInfo: SSL status: "SSLv3 write client hello A"
[S] [06:21:09Z] SSL StatusInfo: SSL status: "SSLv3 write client hello A"
And then it stops. And there is no Exception raised.
The Internet connection is very unreliable at this point, and I expect there may have been major packet loss.
But the system did not recover from this situation, as there was no exception raised, it just hung there.
Question:
- At which point does the SSL negotiation start: Immediatly after PassThrough := false, OR after the first attempt to send data over the link?
- When the Internet connection fails at this point, (and possibly the *Server* got a TCP Reset) is should there be a time-out exception being raised? Because the actual TCP connection is already established.
Thanks, Bart
|
|
|
| Radio Group Item Index |
|
Posted by: pdinsd - 10-11-2019, 10:19 PM - Forum: IntraWeb General Discussion
- Replies (2)
|
 |
I placed a TWIBSRadioGroup with two Items. I then set the AsyncOnChange to show the itemindex of the new selected button. However, it always says -1. Your IWBSDemo shows it correctly. I'm using the Items List of the TIWBSRadioGroup. The only difference between mine and the demo is that my TIWBSRadioGroup is in a IWBSRegion, and yours is in a Form Group. Not sure if that makes a difference or not. Any suggestions?
|
|
|
|