qubits

Cherish both ICS and Indy..

And you could use either to accomplish something..

Something to look over..

A server app with user configurable gui..

Each element represents  a connected clients feature/function..

Clients are ESP32 MCU's, with quite a bit of functionality..

App allows you to control connected clients..

Connected clients can also inter-communicate through the server..

As I'm not expecting thousand of connections, I'm using a DB server backend..

Used Indy for the server here..

Not gonna sugar coat it, it's complicated..

Works good, was driving my bot around with it, ported it to RaspPi..

fun stuff, good luck.. ~q

On 11/9/2023 at 10:52 PM, scamp said:

Do you know what else to install?

Had same issue..

sdkmanager "platform-tools" "platforms;android-33"

this command will install the platform-tools which are also missing..

sdkmanager

pretty sure my issue was due to an older version of java during install, sdkmanager fails to run..

make sure java paths are set for both 32 and 64 bits, i forgot one..

no more compile errors anyways..

thanks!

~q

that's rude and mean!

let there be sounds.. 🙂

put some sound in Space Ballz.

music.mp3 won't play in tmediaplay on windows but does on android.

and does play by clicking on windows, so not sure what gives.

hard to find free game music tracks, this one reminds me of John Carpenter, escape from NY kind of groove.

sounds good on robots.

game on!

~q

lol, small little squiggles, only looked at LUserID, sorry.. 🙂

yeah, input is wrong, should match the encoded, no??

just one more decode and you got it..

or maybe hunt down extra encode..

looking at the pic, looks like LUserID was encoded not decoded, strange..

maybe try saving id into LUserID and Decode LUserID.

not sure..

procedure TMainFrm.Button1Click(Sender: TObject);
var
aStr,eStr,origStr:String;
begin

origStr:='E+C1NU0Z0ikcOdZF158VAypoEl4nc9bTokltVV+PkfPeO3/6pmZTRo3h17SC+x6SdK4qIrNnWv3rd9RGnQ==';
memDisplay.Lines.Insert(0,'Orig:'+origStr);
eStr:=tNetEncoding.URL.Encode(origStr);
memDisplay.Lines.Insert(0,'Encoded:'+eStr);
aStr:=tNetEncoding.URL.Decode(eStr);
memDisplay.Lines.Insert(0,'Decoded:'+aStr);
if aStr=origStr then
  memDisplay.Lines.Insert(0,'Equal')
    else
      memDisplay.Lines.Insert(0,'Differ');

end;

this seems to be equal..

go to the main page, it's was under "my downloads" at the top.

you know, kinds of reminds me of my toilet, which i won't fix as long as i can just wiggle the handle a bit..

so, this works too, until it's fixed by a proper plumber..

unit Unit1;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.TextLayout.GPU;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.fmx}

procedure WiggleHandle;
begin
{$IF RTLVersion111}
TGPUObjectsPool.Instance.Free;
{$ENDIF}
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin

WiggleHandle;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
ReportMemoryLeaksOnShutdown:=true;
end;

end.

7 hours ago, Uwe Raabe said:

four items to the bugs fixed list while actually only fixing one

if i include FMX.TextLayout.GPU in my uses

and add this line to the form.close

TGPUObjectsPool.Instance.Free;

the leak is gone..

should add, also fixes the console sample that was in the qc's.

wrap it up like this maybe, using that cool little if you posted..

{$IF RTLVersion111}

TGPUObjectsPool.Instance.Free;

{$ENDIF}

probably a windows thing..

check inside profiles like, Users\YourUserName\AppData\Local\VirtualStore\Program Files (x86)\

ive seen windows move things..

6 hours ago, Lars Fosdal said:

Are you able to make a minimal project that shows the same leak?

sure, happens on an empty project, just add the check on form create.

5 hours ago, Delphi-Rakka said:

You don't need to. There are already plenty of reports for this issue

sweet, else i would have once someone confirmed it, never know, could be just my install.

not a big leak, just unexpected.

tried to track it down last night, but passed out..

64 bit fmx apps, a bit more..

Now for the really strange..

after compiling with new update, seems like a leak has appeared in all three apps for spaceballz.

not sure what it is yet, tired..

just tried new, blank 3d app, form create ReportMemoryLeaksOnShutDown:=True;

run app, close it, error appears??

also tried blank vcl, no error..

blank fmx app non 3d, error is there..

can anyone else confirm?

1 hour ago, Uwe Raabe said:

Can you find something suspicious in the GetItInstall.log located in $(BDSCOMMONDIR) ?

no sir, not that i see..

[2021-12-13 15:46:52] [INFO ] Installing "Help Files Enterprise"...
[2021-12-13 15:46:52] [INFO ] Adding value "Dinkumware Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE Code Examples Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE Data Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE FireMonkey Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE Libraries Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE System Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE Topics Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "Indy Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE Vcl Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "Dinkumware Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE Code Examples Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE Data Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE FireMonkey Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE Libraries Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE System Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE Topics Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "Indy Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Adding value "IDE Vcl Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2021-12-13 15:46:52] [INFO ] Executing command "pushd "c:\program files (x86)\embarcadero\studio\22.0\Redist\" & "c:\program files (x86)\embarcadero\studio\22.0\Redist\redistsetup.bat" default    & popd"...
[2021-12-13 15:46:54] [INFO ] Installation of "Help Files Enterprise" completed with success.

lol, sorry big ass log file..

[2022-03-17 11:10:53] [INFO ] Installing "Help Files Enterprise"...
[2022-03-17 11:10:54] [INFO ] Adding value "Dinkumware Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE Code Examples Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE Data Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE FireMonkey Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE Libraries Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE System Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE Topics Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "Indy Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE Vcl Help" to registry path "HKEY_CURRENT_USER\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "Dinkumware Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE Code Examples Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE Data Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE FireMonkey Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE Libraries Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE System Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE Topics Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "Indy Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Adding value "IDE Vcl Help" to registry path "HKEY_LOCAL_MACHINE\Software\Embarcadero\BDS\22.0\Help\HtmlHelp1Files"...
[2022-03-17 11:10:54] [INFO ] Executing command "pushd "c:\program files (x86)\embarcadero\studio\22.0\Redist\" & "c:\program files (x86)\embarcadero\studio\22.0\Redist\redistsetup.bat" default    & popd"...
[2022-03-17 11:10:56] [INFO ] Installation of "Help Files Enterprise" completed with success.

still don't notice anything funny though, sorry..

looking deeper into the CatalogRepository

Feature.json dated 3/8/2022

{"Features":[{"Name":"HelpFiles","FileName":"HelpFiles.7z","Checksum":"4c512e59a31268539831ec14323a59c3","FileSize":243769107,"FileInflateSize":247881716}]}   

The GetItInstall.dat dated 3/17/2022

4c:\program files (x86)\embarcadero\studio\22.0\Help\8c:\program files (x86)\embarcadero\studio\22.0\Help\Doc\Hc:\program files (x86)\embarcadero\studio\22.0\Help\Doc\codeexamples.chm@c:\program files (x86)\embarcadero\studio\22.0\Help\Doc\data.chm?c:\program files (x86)\embarcadero\studio\22.0\Help\Doc\fmx.chmEc:\program files (x86)\embarcadero\studio\22.0\Help\Doc\libraries.chmBc:\program files (x86)\embarcadero\studio\22.0\Help\Doc\system.chmBc:\program files (x86)\embarcadero\studio\22.0\Help\Doc\topics.chm?c:\program files (x86)\embarcadero\studio\22.0\Help\Doc\vcl.chm

only thing i see, is what i don't see, which is the indy help..

reg value is added, so just dropping the missing files and it works.

10 minutes ago, Tom F said:

That folder contains lots of chm files, but nothing for Indy on my clean 11.1 install. 😞

don't be sad..

Help file for Indy

found it in my berlin install, copied it to my 22.0\help\Doc

now it shows..

Well, not lying..

was there, now it's not..

sorry, just noticed my Indy help is gone, use to be under Third-Party Help, which is now empty??

google this "emails go to iPhones the PDF shows as an attachment to the email but cannot be opened"

thinking, probably not Indy to blame.

Web install, took about 45 mins.

Dark theme still working.

SpaceBallz and Tournament servers compiled.

Looks good!!

Thank you for the updates!!

~q

Using TEvent to pause thread execution.

Seems to work ok.

maybe there's something else i'm missing though, sorry..

maybe s needs to be encoded to utf-8??

seems to be lot's of routines for that..

more fun stuff..

just added another tournament server, this one built with Indy under the hood.

runs on robots.

SpaceBallz

i see there's an update for d..

hope it don't break me ballz.. 😛

have fun!!

~q

flipped it around just now..

with this..

function SwapBytes(Value: LongWord): LongWord;
type
  Bytes = packed array[0..3] of Byte;

begin
  Bytes(Result)[0]:= Bytes(Value)[3];
  Bytes(Result)[1]:= Bytes(Value)[2];
  Bytes(Result)[2]:= Bytes(Value)[1];
  Bytes(Result)[3]:= Bytes(Value)[0];
end;

    info := fWifiManager.getConnectionInfo;
    lw:=info.getIpAddress;
    lw:=SwapBytes(lw);
    ip := MakeDWordIntoIPv4Address(lw);
    fIp:=ip;

fixed me up nicely..

i have already seen that getting ip from wifimanager is no longer appreciated..

so yes, i'll give that example a testing too, thanks!!

Indy Packet Server - work in progress

~q