Brian Evans

I would suggest switching to using cached updates on the TFDQuery instead of using ClientDataSet.

https://docwiki.embarcadero.com/RADStudio/Sydney/en/Caching_Updates_(FireDAC)

I think you would benefit from taking a break and acquiring some Delphi custom component development and debugging skills. Impatience to do something when you have not yet acquired the necessary skills and knowledge usually leads to frustration. The basics of component development and debugging have not changed much so even older books/guides are still useful.  Ray Konopka wrote some early books on Delphi component development any which would be a good resource if you can get your hands on one. 

You can compress floating values in a small range into an integer evenly.

AnInteger = N - RangeStart * (IntegerRange / (RangeEnd - RangeStart))

N = (AnInteger /  (IntegerRange / (RangeEnd - RangeStart))) + RangeStart

For two byte unsigned integers this only gives ~344 divisions between the whole numbers in your 30-220 range so not quite 3 decimal places.

Your problem.  Exception objects are not thread safe so accessing them from two different threads when one is about to destroy it anyway is never going to end well.

Also it is totally pointless - any threading so writes don't block should be done in the logging library itself not every place that logs something. 

The error message shows a colon at the start of the path\file. 

":C:\Prog2\employee.fdb"

Your code shows signs of leftovers from trying different things. Make a NEW project and get a connection working with as little as possible. Once done clean up the old code to match. 

The file has a definition of EMPLOYEE not C:\Prog2\employee.fdb.

What is the definition/settings for Convert.FDConnection1?

Type the constant by replacing 1 with UInt64(1) in your bit() function. Works in 32 and 64 bit targets.

 Result := ((Uint64(1) shl idx) and value) <> 0;

The reason is bit shifts are modulo the size of the type of the arguments. So no error and you get short shifted when one argument is 32 bits which is the default for integer constants.  

Basically it provides database neutral full text indexing to Delphi database applications and comes with components and examples to make it easier. I used Rubicon over a decade ago at work. Was fast and easy to use back then and I imagine it still is. They have a web site that allows searching of Delphi related newsgroups as a demonstration (Code News Fast: Search Delphi and CPPBuilder Newsgroups). 

If you want a console application then create a console application. 

Quote

I am using FMX because some of the dlls are used by an FMX gui App)

Not sure the reason behind this statement - what does it matter what else is using a DLL/library?

1 hour ago, Incus J said:

Any tips for using the FileManager API directly?  Never tried to call macOS/Cocoa directly from Delphi.  Does the RTL include functions to help with that?  I'm guessing converting parameter types from Cocoa to Delphi and back again might be tricky.

There is some code / interfaces in Macapi.foundation including one for NSFileManager, at least in Delphi 11.1.  Used by TPath.InternalGetMACOSPath in System.IOUtils when {$IFDEF MACOS} which you can look at to get some ideas at least.

22 hours ago, Attila Kovacs said:

I don't believe you. There was no bookmark in Delphi 1. Just tested with Devart's UniQuery, I can close the dataset and open it again, the bookmark is still valid.

Maybe you are referring to some old BDE component or some other 3rd party which is for some reason saves an instance pointer/memory address too, instead of just key-field values. But I have never seen that before.

 

 

There certainly was GetBookmark/GotoBookMark()/FreeBookMark() in Delphi 1. Attached is an image of the Delphi 1 help topic for GetBookmark, notice what the "Note:" at the bottom says:

14 hours ago, Piotr0603 said:

I did read and have no idea what I did wrong

Did you notice the target shown as assets\internal in the help section linked? Try it with just what the help suggests to start with. Usually prefer .\ vs an empty directory string as well. 

Microsoft has in the past put large amounts of resources into the 'next big thing' followed by it being abandoned. Chasing them is a path to ruin for any smaller companies. Even good products get poor support when they decide to chase something else. Windows Phone 7, 8 and 10, and Windows RT all on ARM and all now deprecated dead ends for example. Or the whole UWP / UWA mess where it seems to be on the way out then comes back. Not a very stable base for third party support. 

Not sure it is worth chasing ARM64 yet. 

Gave up on this decades ago and used FlashFiler then NexusDB instead.  Mainly for the ease of going from single user embedded to multi-user client/server without licensing issues. 

Note for single user applications higher editions of Delphi come with redistribution rights for IBLite and IBToGo. It's only multiuser that needs server licensing that can cause issues for some sales models like yours. 

I would not have PAServer accessible on a public IP. 

Since you are already connecting by SSH I would suggest a SSH tunnel which redirects a local port to a remote port over a SSH connection. 

The zip file came from another computer (the Internet) and is probably marked as such. Perhaps some copied files are getting the flag set in some circumstances? Try checking the unblock checkbox before extracting/copying.

FireDac has Local SQL (FDLocalSQL) which can be used to run SQL against TDataSets. Uses SQLite underneath the hood with some extra bits. Using with some FDMemTable components would keep it all in memory.

Local SQL (FireDAC) - RAD Studio (embarcadero.com)

There is no built-in query editor in Delphi for TDataSet descendants. Some third party components provide them and some include being able to run the query. One example is FireDac where it accessed by double left clicking or right clicking the component. The dbGo components provide no such editor.  

A lot  of SQL is executed with parameters which would be a much easier to use form of the data than logs containing SQL with values inline. It also reduces clutter as static values show up as such vs looking the same as a parameter that might change. Where are these logs coming from? Can they be updated to log SQL + parameter value list?  

Likely the reconnect failed and latter on after the error dialog is closed the connection gets opened again and the application continues on.

A FDConnection has some events to give you a chance to handle exceptions or log what is happening: OnError, OnLogin, OnLost, OnRecover and OnRestored.  If you add some logging to OnLost with a timestamp you should be able to tell what is going on and when. 

A quick look at the file (searched Bing for the 2022VAERSDATA.csv) and it looks like double quotes within a string field are escaped with a double quote.  As well only string fields that contain commas or double quotes appear to be enclosed in double quotes. Will take a more detailed look when I get a chance. 

LOAD DATA local INFILE 'c:/programdata/mysql/mysql server 8.0/uploads/2022VAERSDATA.csv'
INTO TABLE data
CHARACTER SET latin1  FIELDS TERMINATED BY ','  OPTIONALLY ENCLOSED BY '"' ESCAPED BY '"'
IGNORE 1 LINES

The MySQL LOAD DATA statement can certainly handle all of that not sure why you think otherwise? 

MySQL :: MySQL 5.7 Reference Manual :: 13.2.6 LOAD DATA Statement

The [{FIELDS | COLUMNS} [TERMINATED BY 'string'] [[OPTIONALLY] ENCLOSED BY 'char'] [ESCAPED BY 'char'] can handle double quotes. 

The SET col_name={expr | DEFAULT}  section can be used for date, Boolean or other field conversions as needed.

I tend to move it all into a DataModule (one per thread type/definition) so it ends up under an instance variable for that namespace wise.