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

Username
  

Password
  





Search Forums

(Advanced Search)

Forum Statistics
» Members: 89,773
» Latest member: kk999app1
» Forum threads: 2,417
» Forum posts: 11,353

Full Statistics

Online Users
There are currently 444 online users.
» 4 Member(s) | 437 Guest(s)
Applebot, Bing, Google, kk999app1, s8onlll, sunwinwincomco, xoilaczzqqz

Latest Threads
Simply convert PeerIp to ...
Forum: Indy
Last Post: DidierMenant
9 hours ago
» Replies: 2
» Views: 128
New CGDevTools build is a...
Forum: CGDevTools
Last Post: lfeliz
Yesterday, 12:03 AM
» Replies: 2
» Views: 1,321
How to terminate HTTP Thr...
Forum: Indy
Last Post: rlebeau
08-02-2026, 04:21 PM
» Replies: 3
» Views: 126
IW 16.2.0 Missing librari...
Forum: IntraWeb General Discussion
Last Post: JuergenS
07-31-2026, 09:44 AM
» Replies: 6
» Views: 1,207
Datatables question
Forum: IntraWeb General Discussion
Last Post: Alexandre Machado
07-28-2026, 04:34 AM
» Replies: 2
» Views: 209
CSS file not reloading af...
Forum: IntraWeb General Discussion
Last Post: CharlieDunn
07-27-2026, 08:27 PM
» Replies: 1
» Views: 342
Intraweb components missi...
Forum: IntraWeb General Discussion
Last Post: valmeras
07-27-2026, 03:18 PM
» Replies: 3
» Views: 342
Image question on tiwjqdb...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
07-17-2026, 05:18 PM
» Replies: 6
» Views: 4,814
IW 16.1.9 Invalid propert...
Forum: IntraWeb General Discussion
Last Post: Blanca80
07-17-2026, 08:06 AM
» Replies: 7
» Views: 2,344
Bootstrap5
Forum: IntraWeb General Discussion
Last Post: Alexandre Machado
07-17-2026, 03:38 AM
» Replies: 2
» Views: 691

 
  Close form and sqlite
Posted by: softdev85 - 07-08-2020, 11:34 AM - Forum: IntraWeb General Discussion - Replies (2)

Hello,

1/ What is best way for show différent form in intraweb ?
2/ What i must close when i use sqlite, when i close webbrower ?

3/ My problem nos is when i close bowser
and i restart a new session no error but no showing dat of my database

any idea ?

Thank's a lot
best regards

Print this item

  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?

Print this item

  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

Print this item

  CrossTalk 2.0.31 with RAD Studio 10.4 is available
Posted by: Alexandre Machado - 07-07-2020, 10:55 AM - Forum: CrossTalk General Discussion - No Replies

Hi guys,

new CrossTalk version is available. Includes support to RAD Studio 10.4:

https://www.atozed.com/2020/07/crosstalk-2-0-31/

Cheers

Print this item

  idtcpclient EOL Customize
Posted by: Madammar - 07-05-2020, 03:24 PM - Forum: Indy - Replies (1)

Hi, can idtcpclient End of line be customized ?

currently its #13#10 

is there any property to modify that ?

Print this item

  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)....

Print this item

  IntraWeb 15.2.5 is out!
Posted by: Alexandre Machado - 07-05-2020, 06:48 AM - Forum: IntraWeb General Discussion - No Replies

Hi guys,

here is a new update with more exciting stuff:

https://www.atozed.com/2020/07/intraweb-15-2-5/

In this version we are officially releasing our new tool "IntraWeb Certificate Manager". This tool allows you do request and install Let's Encrypt certificates with only a few clicks, create self-signed certificates for development, convert certificates and much more. A new blog post about it coming soon.
Check it out

[Image: IWCertificateManager.png]

Print this item

  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

Print this item

  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 ?

Print this item

  IW 15.2.4 is out
Posted by: Alexandre Machado - 07-02-2020, 11:13 AM - Forum: IntraWeb General Discussion - No Replies

Hi guys,

there is a new update for 15.2, version 15.2.4. Check it out:

https://www.atozed.com/2020/07/intraweb-15-2-4/

enjoy!  Big Grin

Cheers

Print this item