| Welcome, Guest |
You have to register before you can post on our site.
|
| Latest Threads |
Reproducible IIS crash in...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
09-21-2026, 05:33 PM
» Replies: 1
» Views: 371
|
WebApplication.IP change ...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
09-21-2026, 05:31 PM
» Replies: 2
» Views: 408
|
Hook/callback to handle t...
Forum: IntraWeb General Discussion
Last Post: Lenfors
09-08-2026, 09:03 AM
» Replies: 0
» Views: 313
|
The packages IW16.xx inc...
Forum: IntraWeb General Discussion
Last Post: hsbelli
09-03-2026, 11:46 AM
» Replies: 2
» Views: 655
|
Redirection issues with F...
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 10:03 AM
» Replies: 0
» Views: 382
|
Source Code
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 08:11 AM
» Replies: 3
» Views: 825
|
TContenthandler requires ...
Forum: IntraWeb General Discussion
Last Post: valmeras
08-30-2026, 02:35 AM
» Replies: 0
» Views: 337
|
TIWjQDBGrid erratic behav...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
08-20-2026, 05:12 PM
» Replies: 8
» Views: 2,530
|
Change Language DataTable
Forum: IntraWeb General Discussion
Last Post: Rigoberto Mercedes
08-19-2026, 03:21 PM
» Replies: 1
» Views: 504
|
How to terminate HTTP Thr...
Forum: Indy
Last Post: rlebeau
08-14-2026, 08:01 AM
» Replies: 5
» Views: 1,228
|
|
|
| Build errors |
|
Posted by: TexasGofer - 07-07-2020, 07:38 PM - Forum: IntraWeb General Discussion
- Replies (5)
|
 |
I know this is a pretty simple question but I'm a pretty simple guy.
I am attempting to use a "trial" of IW 15.n to do a test app to evaluate the result.
I have built a simple two "form" app with the data VCL's embedded on the "UserSession" unit.
At design time when I reference a data VCL from the "main" form everything is fine. But when I attempt to build the app the references are not recognized by the build (compiler?) process and throw a reference error.
IE:
With IWUserSession Do
begin
Query1.Close;
Query1.SQL[0] := 'SELECT * FROM `members` ' +
'WHERE `LastName` LIKE("' + IWEdit1.Text + '%")';
Query1.Open;
end;
result:
Compiling USSVI.dproj (Debug, Win32)
[dcc32 Error] Unit1.pas(34): E2003 Undeclared identifier: 'Query1'
.
.
[dcc32 Error] Unit1.pas(32): E2003 Undeclared identifier: 'IWUserSession'
...
Any hints?
|
|
|
| problem firedac sqlite |
|
Posted by: softdev85 - 07-07-2020, 05:25 PM - Forum: IntraWeb General Discussion
- Replies (5)
|
|
Hi,
i have developped an intraweb application in delphi, with intraweb 15, with delphi 10.3.3 with firedac and sqlite database , intraweb applicaton is standalone
when i start my exe every thing is ready, that work in web navigation.
when i close web browser , is ok
when i want new session i have an error
if i use another web browser the first time that work well just one time
after i close web browser if i want start new sessio i have problem
Have you any idea ?
thank's a lot for your help
best regards
Patrice
|
|
|
|
| Porting old Delphi2007 application using TServerSocket.... |
|
Posted by: BosseB - 07-05-2020, 01:08 PM - Forum: Indy
- Replies (24)
|
|
So I have this old service application written in Delphi7 and maintained in Delphi2007 until about 2012.
Now it won't run anymore in Windows10 and I have decided to try a port to FreePascal so it can run on Linux.
The Indy10 suite is available in Lazarus as a package via Online Package Manager.
The server uses a TCP socket connection for user interaction (mainly configuration and data retrieval) and it was implemented at the time using TServerSocket that came with Delphi.
This won't obviously port so I thought that I could use Indy10 instead for that interface.
TIdTcpServer seems to be a natural replacement except for the fact that the TServerSocket is event driven...
The existing structure is a TService descendant which implements the Windows service. I know how to handle conversion to Linux for that.
But I would like some help into how I can port the communications between the remote client and the server using TidTcpServer.
This server uses TServerSocket in order to handle the communications and it implements the following event procedures:
Code: sckServer: TServerSocket;
....
procedure sckClientConnect(Sender: TObject; Socket: TCustomWinSocket);
procedure sckClientDisconnect(Sender: TObject; Socket: TCustomWinSocket);
procedure sckClientRead(Sender: TObject; Socket: TCustomWinSocket);
procedure sckClientError(Sender: TObject; Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer);
The sckClientConnect procedure handles the client connection and incoming commands as follows:
Code: procedure TSuperStingRemoteServer.sckClientConnect(Sender: TObject; Socket: TCustomWinSocket);
{Create the remote handler and assign the communication to it}
var
SSRC: TSSRemoteClientComm; //The communications object
i: integer;
begin
try
FActivityTime := Now;
i := sckServer.Socket.ActiveConnections;
Log3RServer.StdLog('Active clients = ' + IntToStr(i));
if i > 1 then
begin
Log3RServer.StdLog('Only one active client allowed!');
Socket.Close;
Exit;
end;
Log3RServer.StdLog('SSRemote - Client connect, IP=' + Socket.RemoteAddress + ' Host=' + Socket.RemoteHost);
SSRC := TSSRemoteClientComm.Create(Socket, FRemoteServer);
Socket.Data := SSRC; {Keep pointer to handler with socket}
SSRC.Log := Log3RComm;
FRemoteServer.ClientCallback := SSRC.ClientCallback;
Log3RServer.StdLog('SSRemote - initializing new SSRemote Client');
SSRC.Initialize;
SSRC.Log.StdLog('Socket communication channel opened to ' + Socket.RemoteAddress + ' Host=' + Socket.RemoteHost);
except
on E: Exception do
begin
Log3RServer.ErrLog('Exception during client connect: ' + E.Message);
end;
end;
end;
procedure TSuperStingRemoteServer.sckClientDisconnect(Sender: TObject; Socket: TCustomWinSocket);
begin
FRemoteServer.ClientCallback := NIL;
LogStd('Client disconnect ' + Socket.RemoteAddress);
FActivityTime := Now;
if Socket.Data <> NIL then
begin
TSSRemoteClientComm(Socket.Data).OnDisconnect(Socket);
TSSRemoteClientComm(Socket.Data).Free;
end;
end;
procedure TSuperStingRemoteServer.sckClientRead(Sender: TObject; Socket: TCustomWinSocket);
var
RdData: string;
begin
{Implement the socket data flow here by using the Data pointer to the handling object}
RdData := Socket.ReceiveText;
FActivityTime := Now;
if Socket.Data <> NIL then
TSSRemoteClientComm(Socket.Data).OnDataRead(RdData);
end;
procedure TSuperStingRemoteServer.sckClientError(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer);
begin
{Implement the socket error handling here}
LogErr('Socket error detected, code: ' + IntToStr(ErrorCode));
ErrorCode := 0; {To stop the socket from generating pop-up errors}
end;
So this system acts really just like a pass-through to the real communications object class dealing with all of the messaging and data transfers etc using the supplied socket when it was created.
Since Indy does not use events, how can I adapt this from TServerSocket to TidTcpServer?
Hopefully I will not have to modify too much inside the handler itself provided the network interface shown above is ported with the messaging in mind...
Note that the sckClientRead retrieves the client command text and just shuffles it over to the handler's OnDatRead method that takes the text as parameter, so it should really be decently simple provided one can get the receive text event off of the TidTcpServer object....
Grateful for any suggestions, it was quite a while since I wrote this application (started in 2004)....
|
|
|
|
| JQGrid |
|
Posted by: Alain.verdier - 07-03-2020, 01:18 PM - Forum: IntraWeb General Discussion
- Replies (2)
|
|
Hello,
I have a static website (no internet access) and wonder what I need to download in order to use TIWJQGrid.
I did a search on the web, but it seems to me that the versions are paid
thank you
Have a good day
|
|
|
|
| Style transform property |
|
Posted by: valmeras - 07-02-2020, 05:43 PM - Forum: IntraWeb General Discussion
- Replies (1)
|
|
I am using Intraweb 14.2.7 with Rad Studio (C++ Builder) 10.2.3
I am trying to shrink a IWRegion using transform: scale. But it does not work:
document.getElementById("IWREGION1").style.transform = "scale(0.5,0.5)";
But it does not work. Nothinh happen.
Is it normal ?
|
|
|
|
|
![[Image: IWCertificateManager.png]](http://downloads.atozed.com/intraweb/images/IWCertificateManager.png)
![[Image: IWCrash.png]](http://www.vfsoft.de/aw/IWCrash.png)
