Re: [fpc-pascal] String literals and code page of .pas source file

2020-09-06 Thread LacaK via fpc-pascal
Hello Jonas, attached simple Lazarus compilable project (one Form). ... type   String1250 = type AnsiString(1250); const   c2: AnsiString = 'áéíóčž';   c3: WideString = 'áéíóčž';   c4: String1250 = 'áéíóčž'; { TForm1 } procedure TForm1.FormShow(Sender: TObject); begin   label1.Caption:='áéíóč

Re: [fpc-pascal] TFPObjectlist example

2020-09-06 Thread Ryan Joseph via fpc-pascal
> On Sep 7, 2020, at 6:07 AM, James Richters via fpc-pascal > wrote: > > Does anyone have an example of how to use TFPObjectlist? It just frees objects that are removed from the list (or when the list is freed). list:= TFPObjectlist.Create; list.Add(TObject.Create); list.Free; in that ex

Re: [fpc-pascal] Ethernet Relays

2020-09-06 Thread James Richters via fpc-pascal
Thanks Michael, I'll give it a try James -Original Message- From: fpc-pascal On Behalf Of Michael Van Canneyt via fpc-pascal Sent: Sunday, September 6, 2020 11:12 AM To: James Richters ; FPC-Pascal users discussions Cc: Michael Van Canneyt Subject: Re: [fpc-pascal] Ethernet Relays

[fpc-pascal] TFPObjectlist example

2020-09-06 Thread James Richters via fpc-pascal
Am I correct that TFPObjectlist is kind of like Tstringlist, except instead of creating and array of strings, it creates an array of objects? I'm wanting to do something like that but I don't know how to define the object.. I'm guessing it would be something like a record I'm wanting to end up

Re: [fpc-pascal] Thread problem

2020-09-06 Thread Travis Siegel via fpc-pascal
I'm not sure it works properly on windows. When I modify this to start two threads, and print out messages based on their start/stop times, as well as a message inside the thread, I get both ending messages before I get only a single printout from within the threaded function.  This seems to i

[fpc-pascal] Thread problem

2020-09-06 Thread Paul Renaud via fpc-pascal
IHello, I'm having a problem with the OS/2 version of the compiler. This simplified version of my program keeps generating an exception when compiled and run in EComStation 1.2, OS/2 versions 4.5 and 4 but runs fine when compiled for Windows. Program Test1( Input, Output ); {$S+}   Const    

Re: [fpc-pascal] Ethernet Relays

2020-09-06 Thread Michael Van Canneyt via fpc-pascal
On Sun, 6 Sep 2020, James Richters via fpc-pascal wrote: I've been using simpleget to control ethernet relays like this: S:=TFPHTTPCLIENT.SIMPLEGET('http://10.10.01.01/3/15'); But if the IP address does not exist on the network I get this error: An unhandled exception occurred at $00

Re: [fpc-pascal] Ethernet Relays

2020-09-06 Thread James Richters via fpc-pascal
I've been using simpleget to control ethernet relays like this: S:=TFPHTTPCLIENT.SIMPLEGET('http://10.10.01.01/3/15'); But if the IP address does not exist on the network I get this error: An unhandled exception occurred at $000100032A4A: ESocketError: Connection to 10.10.01.01:80 timed o