Robert Gilland

I am using Delphi 10.2 with FastMM5 I am getting lots of memory leaks reported with no reference to an actual line of code. I have put an example below, Where should I look to removed these leakkages? Kind Regards, Robert. --------------------------------2025-07-03 13:59:58-------------------------------- A memory block has been leaked. The size is: 24 This block was allocated by thread 0x6F18, and the stack trace (return addresses) at the time was: 004239D2 [FastMM5.pas][FastMM5][FastMM_DebugGetMem$qqri][7651] 004074CA [System.pas][System][@GetMem$qqri][4749] 0040C257 [System.pas][System][@NewUnicodeString$qqri][24629] 0040C488 [System.pas][System][@UStrFromPWCharLen$qqrr20System.UnicodeStringpbi][25307] 0040C55F [System.pas][System][InternalUStrFromPCharLen$qqrr20System.UnicodeStringpcii][25484] 750A9F4B [Unknown function at ] 771AA57D [Unknown function at LdrLoadAlternateResourceModuleEx] 771C1C11 [RtlLoadString] 771A672F [LdrpResGetMappingSize] 771E9558 [Unknown function at RtlRcuSynchronize] 771AAA68 [Unknown function at RtlPcToFileHeader] 771A672F [LdrpResGetMappingSize] 771E9558 [Unknown function at RtlRcuSynchronize] 771AAA68 [Unknown function at RtlPcToFileHeader] 750A9F4B [Unknown function at ] 771AA57D [Unknown function at LdrLoadAlternateResourceModuleEx] 771AEDC7 [Unknown function at RtlReleaseSRWLockShared] 771AF1F8 [Unknown function at RtlReleaseSRWLockShared] 74EC2F2E [GetUserOverrideWord] 74EC7494 [GetLocaleInfoHelper] The block is currently used for an object of class: UnicodeString The allocation number is: 576361 Current memory dump of 32 bytes starting at pointer address 13FE1540: B0 04 02 00 01 00 00 00 05 00 00 00 43 00 4F 00 53 00 53 00 4D 00 00 00 F3 2A A1 88 D2 39 42 00 . . . . . . . . . . . . C . O . S . S . M . . . . * . . . 9 B .

Can I passing an SQL (select Statement )into a REST Request to a Rest Server , and receive a result in a JSON Dataset? Can I pass an INSERT/UPDATE/DELETE Statement into a Rest Request?

Yes I did that.

By sheer exasperation, I removed the conditionals for FASTMM4 LogMemoryLeakDetailToFile and FullDebugMode. And then GetDeviceCaps worked, no idea why. Another day of banging my head against the wall ends miraculously, Thank God.

I borrowed the below function from jclPrint.pas using Delphi 10.4.2 When function is called the entire process fails. What could be wrong. function GetPrinterResolution: TPoint; begin Result.X := GetDeviceCaps(Printer.Handle, LogPixelsX); Result.Y := GetDeviceCaps(Printer.Handle, LogPixelsY); end;

I am using the have an Interbase database with an Interbase2020 server. I have a table with a field of TYPE CHAR(6) DOMAIN CALLED INVOICECODE in it's primary key I call ALTER DOMAIN INVOICECODE TYPE CHAR(10) I get "unsuccessful metadata update MODIFY RDB$FIELDS failed action cancelled by trigger (1) to preserve data integrity RDB$TRIGGER_39 Cannot update index segment used by an Integrity Constraint" What can I do?

I am trying the same and with TNetHttpClient and getting an error: Error adding header: (87) The parameter is incorrect when I have an authorization header.

I have been given this system to look at in order to place a Delphi app inside a web browser: https://thinfinity-vui-v3-docs.cybelesoft.com/ Has anyone else tried to do this? Has anyone tried to use thinfinity?

I am using Delphi 10.2. How do I define an array of records in the type library editor?

I have a ALL.groupproj file, and I want to rearrage the order of the projects contained within, how do I do that? Using Delpho 10.2

I cannot understate the necessity to handle TLS1.3!

Previous code was procedure Tdtmdl.CheckDatabaseExists; var EmptyDB: string; begin if not FileExists(DBPath) then begin EmptyDB := DocumentsFolderPath + 'empty.sqlite'; TFile.Copy(EmptyDB, DBPath); end; end; procedure Tdtmdl.ConfigureDatabaseAndTable; var SQL: string; SL: TStringList; begin // if fActiveApp = TActiveApp.aaNone then exit; cnctnDB.Params.Values['Database'] := DBPath; CheckDatabaseExists; try cnctnDB.Connected := true; except on e:Exception do begin end; end;

We are trying to run this code as a linux service and the service is freezing. Can this code work under linux service conditions?

Victory: I created an empty file fist by this method and then all good: lsDBPath := DBPath; if( not FileExists(lsDBPAth))then begin lhandle := System.SysUtils.FileCreate(lsDBPath); System.SysUtils.FileClose(lhandle); end; cnctnDB.Params.Values['Database'] := lsDBPath; cnctnDB.Params.Values['SQLiteAdvanced'] := 'page_size=4096'; cnctnDB.Params.Values['OpenMode'] := 'ReadWrite';

I am having real trouble trying to create an SQLLite Database at runtime in Android. Does anyone know how to do this?