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

Username
  

Password
  





Search Forums

(Advanced Search)

Forum Statistics
» Members: 82,363
» Latest member: handtrantomchick1985
» Forum threads: 2,408
» Forum posts: 11,315

Full Statistics

Online Users
There are currently 441 online users.
» 6 Member(s) | 432 Guest(s)
Applebot, Bing, Google, florenciolee, g88brcom, handtrantomchick1985, happari, jili365betnet, m88actor

Latest Threads
IW 16.2.0 Missing librari...
Forum: IntraWeb General Discussion
Last Post: Gregory_Twedt
06-24-2026, 04:40 AM
» Replies: 5
» Views: 629
VCL conversion
Forum: Delphi General Discussion
Last Post: tobenschain
06-20-2026, 05:00 AM
» Replies: 0
» Views: 74
TIWjQDBGrid changing UI
Forum: IntraWeb General Discussion
Last Post: BoostedCruiser
06-08-2026, 02:02 AM
» Replies: 36
» Views: 70,362
TIWjQDBGrid erratic behav...
Forum: IntraWeb General Discussion
Last Post: Fabrizio Conti
06-04-2026, 09:14 AM
» Replies: 3
» Views: 473
Access Violation When Val...
Forum: IntraWeb General Discussion
Last Post: Alexandre Machado
06-03-2026, 08:47 AM
» Replies: 2
» Views: 517
Bootstrap5
Forum: IntraWeb General Discussion
Last Post: geraldtatum
06-02-2026, 06:24 AM
» Replies: 1
» Views: 413
weakpackageunit contains ...
Forum: IntraWeb General Discussion
Last Post: rlebeau
05-26-2026, 04:56 PM
» Replies: 4
» Views: 533
Custom 404 handler
Forum: IntraWeb General Discussion
Last Post: CfawesDwale
05-21-2026, 08:02 AM
» Replies: 0
» Views: 256
PopUp Menu
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
05-13-2026, 04:35 AM
» Replies: 4
» Views: 8,207
Image question on tiwjqdb...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
05-13-2026, 03:32 AM
» Replies: 3
» Views: 4,124

 
  Make my own modal window
Posted by: davenovo - 03-19-2018, 09:24 PM - Forum: IntraWeb General Discussion - Replies (15)

Is there a way that I can make my own IWForm, and do something like I would do in Delphi, i.e. just call Form.ShowModal.

I have found the IWModalWindow component, but the annoying thing about it is that if I want to do something fancy, I put it on a region, and set the IWModalWindow.ContentElement.

That is simple, but it means that on my main form, I have all the stuff for my main form, then I also have a region that contains the components for the modal window. So the form has tons of components on it. I would like to move the components I need for the modal window onto a separate modal window to not clutter up my main form. Especially if the main form can launch 5 or 6 modal windows it would get crazy.

Can I make a new IWFrame and put the IWFrame as the ContentElement?

Print this item

  How to close modal window when clicking on the background form
Posted by: davenovo - 03-19-2018, 05:58 PM - Forum: IntraWeb General Discussion - Replies (1)

Hello,

Making a modal window is quite straightforward as per your demo. Quick question. I have seen several websites where clicking on the non-modal part of the web page is effectively doing a cancel on the modal form. Is there an easy way to accomplish this in intraweb?

Print this item

  sending stringlist as chunks
Posted by: Madammar - 03-18-2018, 11:11 AM - Forum: Indy - Replies (2)

i have got tstringlist with 1000 lines that i want to send its text from idtcpserver to a clientside

i did not want to send this stringlist as memorystream i want to avoid using memorystream at all i will use writeln to write this stringlist.text

but i am trying to find a way to separate this string list and send it content separately

as example sending each 100 lines until i reach the end of lines

but couldn't figure out a way in coding to do this purpose

Print this item

  Issue installing Indy10 with Delphi 7 and Windows 7
Posted by: Carlos - 03-16-2018, 06:09 PM - Forum: Indy - No Replies

I'm installing Delphi 7 and some components, as Indy 10, from an old computer to a new one. Manually, I mean.
In the old computer dclIndycore70 and dclIndyProtocols70 packages are installed, so I first tried to install dclIndycore70  package in the new computer.
At some point, it tries to process IndySystem70 package, the editor window appears for it, with the line "IdWship6 in 'IdWship6.pas';" signaled (or selected) as an error but no message error appears. 'IdWship6.pas' file is in "C:\Delphi7-Componentes\Indy10_5422\Lib\System" folder as IndySystem70  package is, so I suppose the error is not "file not found".

The Search Path used is:
C:\Delphi7-Componentes\Indy10_5422\Lib\Core;C:\Delphi7-Componentes\Indy10_5422\Lib\System;C:\Delphi7-Componentes\Indy10_5422\Lib\Protocols

I'd appreciate some help. I'm really stuck. Thank you.
Carlos


Just posted the message, I found the answer.... in the Indy 10 installation Instructions. So I'm very sorry for having skipped this step.
If someone feels the need to skip the installation documentation, the packages to install are, for Delphi 7:
IndySystem70, IndyCore70, IndyProtocols70, dclIndyCore70, dclIndyProtocols70
So have a look at: http://www.indyproject.org/Sockets/Docs/...on.EN.aspx

Thank you, anyway
Carlos

Print this item

  Reading returned data via TIdTcpClient?
Posted by: BosseB - 03-15-2018, 06:53 PM - Forum: Indy - Replies (1)

I am always struggling with this whenever I try to throw together a TCP client application...
I can easily send commands to the server (in this case a WiFi IoT module.
I know it responds to the command but for the life of me I cannot get the reply.
The platform I use is 64 bit FreePascal 3.0.4 + Lazarus 1.8.0 with the IndyLaz package installed


THe function that fails to work as I hoped looks like this (FComm is a TIdTcpClient object):


Code:
function TConfigCommHandler.GetItem(Cmd: TIdBytes; var Data: TIdBytes): boolean;
begin
  Result := false;
  SetLength(Cmd, Length(Cmd) + 1);
  Cmd[Length(Cmd)-1] := ETX;
  FComm.IOHandler.ReadTimeout := 2000;
  try
    FComm.IOHandler.Write(Cmd);
    SetLength(Data, 0);
    FComm.IOHandler.ReadBytes(Data, -1, false); //<== Is this way correct?
    Result := Length(Data) > 0;
    if Result then
    begin
      if Data[Length(Data)-1] <> ETX then //Received packet should end in ETX...
      begin
        FLastError := 'Terminating ETX missing!';
        Result := false;
      end
      else
        SetLength(Data, Length(Data) -1); //Remove trailing ETX
    end
    else
      FLastError := 'No data received within timeout!';
  except
    on E: Exception do
    begin
      Result := false;
      FLastError := 'Exception: ' + E.Message;
      Exit;
    end;
  end;
end;
For example what happens if this ReadBytes function does not get all of the incoming bytes?
I try to detect it via the ETX check but since the data is only at maximum some 25-40 bytes (not possible to know beforehand) I thought it highly unlikely it would be split between packets...

I found the cause regarding this specific problem:
The server did not add the trailing ETX to replies, so all of them were thrown away.
I modified the server code to always add the ETX to all outgoing messages.
But I have a follow-up question:
How can the PC application be made such that it will catch and display all incoming data without first sending a command?
For example spontaneous messages from the device are also interesting...

Print this item

  Validating files before upload
Posted by: davenovo - 03-14-2018, 11:13 PM - Forum: IntraWeb General Discussion - Replies (10)

Hello,

How do I validate files before they are uploaded. i.e. if I want to only allow files that have the word 'banana' somewhere in the filename, how do I check that before all the files are uploaded?

If the validation fails, how do I then cancel the upload? If multiple files are selected, and only one fails validation, can I just abort the upload of that one file?

Print this item

  TIWFileUploader OnAsyncUploadCompleted question
Posted by: davenovo - 03-14-2018, 11:07 PM - Forum: IntraWeb General Discussion - Replies (2)

In the documentation at http://docs.atozed.com/docs.dll/controls...oader.html, it says for OnAsyncUploadCompleted it says


Quote:This event is triggered when the file upload completes, BEFORE it is processed or saved by IntraWeb core. You should use this event to save the file to a different location, under a different name, or save it to a blob field in a TDataSet component

The method signatures make perfect sense, but there is no mention how I would grab the uploaded file stream to save it to a blob field before saving it to disk.

Print this item

  Historic IW Forum Content
Posted by: DanBarclay - 03-14-2018, 06:52 PM - Forum: IntraWeb General Discussion - Replies (10)

It's a shame we can't maintain/move the content from the EMB IW forum.  There are a lot of very helpful threads (google search works even if EMB search doesn't <g>).

FWIW, I still use that information, and when first starting with IW I probably would have given up without it.  Other new users will face the same issues since documentation doesn't (can't) keep up.

I can write something that crawls the forum (relatively straightforward compared to some things I've done), but I'm not going to launch into something like that without permission to use the content.   OTOH, if they would give permission to use the content then they could probably extract it from their server database pretty easily.

What are the options for retaining that info?

Other thoughts?

Dan

Print this item

  New Forums!
Posted by: kudzu - 03-13-2018, 02:29 PM - Forum: COSMOS - Replies (6)

Welcome to our new forums! As they are brand new, do not be startled by lack of posts. We are here and waiting for users to migrate from the chat and github tracker, so feel free to post away.

Print this item

  Novos fóruns de IntraWeb!
Posted by: kudzu - 03-12-2018, 10:06 PM - Forum: IntraWeb Dúvidas Gerais - Replies (1)

Como os fóruns do Embarcadero não são confiáveis e muitas vezes são desconectados por longos períodos de tempo, criamos fóruns na web para a IntraWeb.

Sinta-se livre para se juntar a nós e espalhar a palavra.

Print this item