Forum for MySQL and Delphi. https://forums.mysql.com/list.php?49 Wed, 15 Apr 2026 22:20:46 +0000 Phorum 5.2.23 https://forums.mysql.com/read.php?49,740771,740771#msg-740771 https://forums.mysql.com/read.php?49,740771,740771#msg-740771
Thanks,
Jim Sawyer]]> Jim Sawyer Delphi Thu, 29 May 2025 19:32:45 +0000 https://forums.mysql.com/read.php?49,711946,711946#msg-711946 https://forums.mysql.com/read.php?49,711946,711946#msg-711946
[FireDAC][Phys][MySQL]-1104. Failed to initialize embedded server. See MySQL log files for details.

I probably need to have

LIBMYSQLD.DLL included somewhere but I don't know where, if this is even the cause of the problem.

Can someone help me please?

Thanks,
Jim Sawyer]]> Jim Sawyer Delphi Mon, 04 Dec 2023 17:39:58 +0000 https://forums.mysql.com/read.php?49,710429,710429#msg-710429 https://forums.mysql.com/read.php?49,710429,710429#msg-710429 The versions 8.00.24 to 8.00.27 are ok. The problem starts with the version 8.00.28 and still remains in the version 8.2 of the connector.]]> Emmanuel Duverney Delphi Tue, 19 Mar 2024 07:26:59 +0000 https://forums.mysql.com/read.php?49,708660,708660#msg-708660 https://forums.mysql.com/read.php?49,708660,708660#msg-708660
...\Project\

directory and after compilint the executable is in the

...\Win64\Debug\

directory. If I want to add a

...\Project\AmeriVet\Current\

directory and put my code in that directory and compile from that directory, how can I make the resulting executable still be in the

...\Win64\Debug\

directory?

Thanks,
Jim Sawyer]]> Jim Sawyer Delphi Wed, 05 Apr 2023 14:31:58 +0000 https://forums.mysql.com/read.php?49,707240,707240#msg-707240 https://forums.mysql.com/read.php?49,707240,707240#msg-707240
function Total_Balance( dDate: TDateTime; nClino: Integer ): Double;
var
aQuery: TFDQuery;
begin
Result := 0;
aQuery := TFDQuery.Create( AConnection );
aQuery.Connection := AConnection;
aQuery.SQL.Text := 'Select Clino, ' +
'Sum( ToBePaid ) as nTotal ' +
'from Invoice ' +
'where Clino = :C';
aQuery.ParamByName('C').AsInteger := nClino;
aQuery.IndexFieldNames := 'Clino';
aQuery.IndexesActive := true;
aQuery.open;
aQuery.Active := true;
end;

I get a message telling me the list contains a nonaggregated column which is uncompatable with only_full_group_by.

What's going on. I used this routine without a problem for months, and now I get it, but only on some computers (same version of MySQL and my software).

Help!

Thanks,
Jim Sawyer]]> Jim Sawyer Delphi Tue, 17 Jan 2023 19:51:38 +0000 https://forums.mysql.com/read.php?49,706831,706831#msg-706831 https://forums.mysql.com/read.php?49,706831,706831#msg-706831
ptQuery := TFDQuery.Create( AConnection );
ptQuery.Connection := AConnection;
ptQuery.SQL.Text := 'Update Patient P ' +
'set P.Active = ' +
'( select R.RecDate from Records R ' +
'where R.Patno = P.Patno and R.RecDate between :Dt1 and :Dt2 ' +
'order by R.RecDate desc limit 1 )';
ptQuery.ParamByName('Dt1').AsDate := DateOf( StrToDate('09/13/1936') );
ptQuery.ParamByName('Dt2').AsDate := DateOf( IncYear( Date, -4 ) );
ptQuery.ExecSQL;

How does it need to be altered to prevent the error?

Thanks,
Jim Sawyer]]> Jim Sawyer Delphi Sat, 26 Nov 2022 02:42:50 +0000 https://forums.mysql.com/read.php?49,705420,705420#msg-705420 https://forums.mysql.com/read.php?49,705420,705420#msg-705420 So deleted .29 server and workbench install and installed .27 server and workbench. Now that install is identical (as far as I know) to the one on my first server. Have identical libmysql.dll in app folder on new server as is on old server. Still get the error - "libmysql.dll found, but could not be loaded. Check compile-target and library compatibility." Everything is the same! What could be causing this issue? What is the compile-target? The Delphi application and how it was compiled? Or is it a 64bit vs 32bit issue?

Any help would be appreciated.]]> Doug Munday Delphi Sun, 24 Jul 2022 22:08:07 +0000 https://forums.mysql.com/read.php?49,702857,702857#msg-702857 https://forums.mysql.com/read.php?49,702857,702857#msg-702857
the one thing I am missing, looking at the grid
and clicking on a row is how to get the row record id.

everything else is ok,
but I need the id of that record,
and I am missing the simple clue as to how to get it.
titles and columns are easy. record, not so much.

thanks for any help.]]> bob crownfield Delphi Mon, 07 Feb 2022 17:42:46 +0000 https://forums.mysql.com/read.php?49,699932,699932#msg-699932 https://forums.mysql.com/read.php?49,699932,699932#msg-699932
Rad Studio 11.0 Alexandria support added.
This release also includes improvements and bug fixes.

Full changelog:

[!] Rad Studio 11.0 Alexandria support added
[-] "TMysqlResult leak when SQL is incorrect" bug fixed (Thanks to Nicholas Ring)
[-] "Range overflow during SSL library initialization" bug fixed
[-] "TMySQLUpdateSQL returns incorrect LAST_INSERT_ID" bug fixed

You’re welcome to download the DAC for MySQL v3.3.2 right now at:
http://microolap.com/products/connectivity/mysqldac/download/,
or login to your personal area on our site at
http://microolap.com/my/downloads/

Please direct questions or report bugs at support@microolap.com.]]> Aleksandr Andreev Delphi Mon, 29 Nov 2021 07:59:02 +0000 https://forums.mysql.com/read.php?49,695908,695908#msg-695908 https://forums.mysql.com/read.php?49,695908,695908#msg-695908
In Rad Studio (Delphi) before i try and change a ROW value i use this code:

try
tCustomer.Edit;
except on E: EDAError do
begin
if e.ErrorCode = 1205 then Showmessage('Record in Use');
end;

This part works flawlessly as the MYDAC TMyTable or TMyQuery returns the 1205 error code indicating the current record/row is locked by another user. But if that user has walked away from their desk to go to lunch or if they're on the phone i want the second user who needs to get access to the record to at least know WHICH user has the record locked.

My Tables use Pessemistic locking. My database uses READ COMMITTED for the isolation level and i set the innodb_lock_wait_timeout to 1 for these specific operations in my client session so they will immediately get acknowledgement that the record they are attemtping to EDIT is in use by another user.

I'm wondering if after determining the record is 'in-use' is there some other Server side stored procedure or sql command the client connection can run to determine which MySQL connection_ID or user has the record locked?


Is something like this possible?

I know you can query CONNECTION_ID() or CURRENT_USER() but that is for the current client. I need a way to get at which CONNECTION_id or User OR WINDOWS LOGIN ACCOUNT is is.

Thanks in advance.]]> Michael Britt Delphi Thu, 15 Apr 2021 02:37:44 +0000 https://forums.mysql.com/read.php?49,695025,695025#msg-695025 https://forums.mysql.com/read.php?49,695025,695025#msg-695025 This release includes improvements and bug fixes.

Full changelog:

[-] "The SplitStr function doesn't work properly sometimes" bug fixed
[-] "Incorrect getting string non-unicode values cause an AV" bug fixed
[-] "Incorrect buffer accessing" bug fixed
[-] "Non-Unicode BLOB fields are being written incorrectly" bug fixed
[-] "AV during LOAD DATA LOCAL INFILE statement execution" bug fixed
[-] "M_BOOL_AS_INT compiler directive doesn't work with prepared datasets" bug fixed
[-] "Corruption during BLOB field saving in MySQL without utf8 support" bug fixed
[-] "Range checking error may occur with the DISTINCT statement" bug fixed
[-] "Prepared statement doesn't work correctly with BLOB field" bug fixed
[-] "Special Unicode characters like "üäö" in a column name lead to an error" bug fixed


You're welcome to download the DAC for MySQL v3.3.1 right now at: http://microolap.com/products/connectivity/mysqldac/download/ ,
or login to your personal area on our site at http://microolap.com/my/downloads/

Please don't hesitate to ask any questions or report bugs at support@microolap.com.]]> Aleksandr Andreev Delphi Thu, 25 Feb 2021 08:13:15 +0000 https://forums.mysql.com/read.php?49,690760,690760#msg-690760 https://forums.mysql.com/read.php?49,690760,690760#msg-690760
Jim Sawyer]]> Jim Sawyer Delphi Thu, 25 Feb 2021 15:07:41 +0000 https://forums.mysql.com/read.php?49,690378,690378#msg-690378 https://forums.mysql.com/read.php?49,690378,690378#msg-690378
ihQuery.SQL.Clear;
ihQuery.SQL.Add( 'drop index patno if exists on records' );
ihQuery.ExecSQL;]]> Jim Sawyer Delphi Sat, 03 Oct 2020 19:03:05 +0000 https://forums.mysql.com/read.php?49,689495,689495#msg-689495 https://forums.mysql.com/read.php?49,689495,689495#msg-689495
Thanks.]]> Jim Sawyer Delphi Fri, 14 Aug 2020 19:39:54 +0000 https://forums.mysql.com/read.php?49,685429,685429#msg-685429 https://forums.mysql.com/read.php?49,685429,685429#msg-685429
What is "plan B" if it is not? There are lots of 32-bit legacy apps out there (both Delphi and other languages) that need to be supported beyond end-of-life for 5.7.

Please tell me it's there and I just can't find it...]]> Lhomond Jones Delphi Wed, 25 Mar 2020 18:19:46 +0000 https://forums.mysql.com/read.php?49,683425,683425#msg-683425 https://forums.mysql.com/read.php?49,683425,683425#msg-683425
sha256_password

authentication error. What is the problem and how do I fix it. We use MySQL 8.0.

Thanks,
Jim Sawyer]]> Jim Sawyer Delphi Sat, 04 Jan 2020 22:05:17 +0000 https://forums.mysql.com/read.php?49,679328,679328#msg-679328 https://forums.mysql.com/read.php?49,679328,679328#msg-679328
dQuery := TFDQuery.Create( AConnection );
with dQuery do
begin
Connection := AConnection;
SQL.Add( 'Select * from MyTable' );
Open;
end;

This query may or may not have been opened at at time when I want to exit a procedure. If it has been created I want to

dQuery.Free;

However, if it has not been created, this last command will bomb.

Is there a procedure something like

if dQuery exists
dQuery.Free;

Please tell me what I need to replace the "if dQuery exists" with inorder to make "dQuery.Free" conditional on whether it exists or not.

Thank you,
Jim Sawyer]]> Jim Sawyer Delphi Wed, 20 Nov 2019 14:35:42 +0000 https://forums.mysql.com/read.php?49,678998,678998#msg-678998 https://forums.mysql.com/read.php?49,678998,678998#msg-678998
Thanks,
Jim Sawyer]]> Jim Sawyer Delphi Fri, 14 Aug 2020 17:58:11 +0000 https://forums.mysql.com/read.php?49,671188,671188#msg-671188 https://forums.mysql.com/read.php?49,671188,671188#msg-671188
The routine is:

// patient
pQuery := TFDQuery.Create( AConnection );
with pQuery do
begin
Connection := AConnection;
SQL.Add( 'Select Patno, TargSel from Patient where TargSel = true' );
Open;
while not EOF do
begin
// targservice
tsQuery := TFDQuery.Create( AConnection );
with tsQuery do
begin
Connection := AConnection;
SQL.Add( 'Select * from TargService where Targno = :T and AllIn = true' );
ParamByName('T').AsInteger := HotTargno;
Open;
while not EOF do
begin
// records
lAllIn := true;
rQuery := TFDQuery.Create( AConnection );
with rQuery do
begin
Connection := AConnection;
SQL.Add( 'Select Servno from Records where Servno = :S and SSDO = true and RecDate between :St and :E' );
ParamByName('S').AsInteger := tsQuery.FieldValues['Servno'];
ParamByName('St').AsDate := dStart;
ParamByName('E').AsDate := dEnd;
IndexFieldNames := 'Servno';
IndexesActive := true;
Open;
if EOF then
lAllIn := false;
end;
Next;
if not lAllIn then
Break;
end;
if not lAllIn then
AConnection.ExecSQL( 'Update Patient set TargSel = false where Patno = :P',
[pQuery.FieldValues['Patno']] );
end;
Next;
end;
Free;
end;

Thank you.
Jim Sawyer]]> Jim Sawyer Delphi Wed, 05 Dec 2018 19:09:39 +0000 https://forums.mysql.com/read.php?49,670448,670448#msg-670448 https://forums.mysql.com/read.php?49,670448,670448#msg-670448
1. How does one install it?
2. How does one use it?

I need as much detail as possible on these topics. I've tried to install it using the same installer that I used for installing Server, but no luck. I've spent several days pouring over the googled topics and the MySQL documentation with little good clear information.

Thanks,
Jim Sawyer]]> Jim Sawyer Delphi Mon, 12 Nov 2018 03:21:12 +0000 https://forums.mysql.com/read.php?49,669048,669048#msg-669048 https://forums.mysql.com/read.php?49,669048,669048#msg-669048
I have my own MySQL client developed in Delphi to connect to the MySQL server. I like my own client, since I want to offer a one file .exe program to my users for portable working.

Until now, everything worked fine - but now I have to generate the new password encoding. As far as I understood I have to do this with SHA 256 - and Delphi offers inside the unit Hash the THashSHA2 record to do this.

But there are some things I don't understand: How do I handle the RSA Public Key received from the MySQL server inside the hash function. And how do I handle the auth-plugin-data received from the MySQL server?

With the "old" password encoding I had this code:
sha1_reset(sha1_context);
//* stage 1: hash Password */
sha1_input(sha1_context, Password, AnsiStrings.StrLen(Password));
sha1_result(sha1_context, @hash_stage1[0]);
//* stage 2: hash stage 1; note that hash_stage2 is stored in the database */
sha1_reset(sha1_context);
sha1_input(sha1_context, @hash_stage1[0], SCRAMBLE_LENGTH);
sha1_result(sha1_context, @hash_stage2[0]);
//* create crypt AnsiString as sha1(message, hash_stage2) */;
sha1_reset(sha1_context);
sha1_input(sha1_context, PAnsiChar(Salt), SCRAMBLE_LENGTH);
sha1_input(sha1_context, @hash_stage2[0], SCRAMBLE_LENGTH);
//* xor allows 'from' and 'to' overlap: lets take advantage of it */
sha1_result(sha1_context, @scramled);

for I := 0 to SCRAMBLE_LENGTH - 1 do
Scramled := AnsiChar(Byte(Scramled) xor Byte(hash_stage1));

Now I have to write my new code for the new password encoding. Can somebody assist me?]]> Nils Hoyer Delphi Wed, 19 Sep 2018 05:53:17 +0000 https://forums.mysql.com/read.php?49,666729,666729#msg-666729 https://forums.mysql.com/read.php?49,666729,666729#msg-666729
Thanks,
Jim Sawyer]]> Jim Sawyer Delphi Tue, 05 Jun 2018 14:39:39 +0000 https://forums.mysql.com/read.php?49,666534,666534#msg-666534 https://forums.mysql.com/read.php?49,666534,666534#msg-666534
There is MySQL database with table:

CREATE TABLE `objects` (
`uniq_id` int(11) NOT NULL,
`dt` datetime NOT NULL,
`valid` tinyint(1) NOT NULL,
`id` int(11) NOT NULL,
`ip` varchar(50) NOT NULL,
PRIMARY KEY (`uniq_id`)
) ENGINE=InnoDB DEFAULT CHARSET=utf8;

I'm using ADO components and MySQL ODBC Connector to access database and have a problem when debug application.

Error occure when I assign sql query with parameter. You can see it below.
Error message: "Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another"


ADOConnection1.ConnectionString := 'Provider=MSDASQL.1;Password=root;Persist Security Info=True;User ID=root;Data Source=MyDataSource;Initial Catalog=test_db';

GetLocksQuery.Close();
GetLocksQuery.SQL.Text :=
'select o.* from objects o '+
'INNER JOIN '+
'(SELECT id, MAX(DT) AS MAX_DT FROM objects GROUP BY id) oo '+
'ON (oo.id = o.id) AND (oo.MAX_DT = o.DT) '+
'WHERE valid = 1 and o.ip = :object_ip '; // HERE ERROR!

GetLocksQuery.Parameters.ParamByName('object_ip').Value := '127.0.0.1';
GetLocksQuery.Open();
if not GetLocksQuery.Eof then
begin
Caption := GetLocksQuery.FieldByName('id').AsString;
end;
GetLocksQuery.Close();

Error appears in Delphi/Builder of all edition (6,7,RAD)

When starting program without debuger - all is OK!

I try reinstall ODBC connector - without changes]]> Lev Amelin Delphi Fri, 25 May 2018 06:55:42 +0000 https://forums.mysql.com/read.php?49,666067,666067#msg-666067 https://forums.mysql.com/read.php?49,666067,666067#msg-666067 Damon Theis Delphi Wed, 02 May 2018 16:02:43 +0000 https://forums.mysql.com/read.php?49,665914,665914#msg-665914 https://forums.mysql.com/read.php?49,665914,665914#msg-665914 I'm trying to create a SQL statement as follows:
Select Length(LastName) as LongLastName
from Accounts
where Length(LastName) > 10

I tried Len and Length, but thee error states "operation not supported"
I have obviously got the wrong keyword for paradox and MySQL

any help would be appreciated
thx]]> James Caravan Delphi Wed, 02 May 2018 15:56:35 +0000 https://forums.mysql.com/read.php?49,662727,662727#msg-662727 https://forums.mysql.com/read.php?49,662727,662727#msg-662727

CREATE TABLE IF NOT EXISTS `t1`
(
`ID` int(11) NOT NULL AUTO_INCREMENT,
`CODE_T2` char(5) COLLATE utf8_slovenian_ci DEFAULT NULL,
`CODE_T3` char(5) COLLATE utf8_slovenian_ci DEFAULT NULL,
`SOMEDATA1` char(20) COLLATE utf8_slovenian_ci DEFAULT NULL,
`SOMEDATA2` char(20) COLLATE utf8_slovenian_ci DEFAULT NULL,
`EDITDATE` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP,
PRIMARY KEY (`ID`)
)
ENGINE=InnoDB DEFAULT CHARSET=utf8 COLLATE=utf8_slovenian_ci;

CREATE TABLE IF NOT EXISTS `t2`
(
`ID` int(11) NOT NULL AUTO_INCREMENT,
`CODE` char(5) COLLATE utf8_slovenian_ci DEFAULT NULL,
`NAME` char(100) COLLATE utf8_slovenian_ci DEFAULT NULL,
`EDITDATE` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP,
PRIMARY KEY (`ID`),
UNIQUE KEY `CODE` (`CODE`),
KEY `NAME` (`NAME`)
)
ENGINE=InnoDB DEFAULT CHARSET=utf8 COLLATE=utf8_slovenian_ci;

CREATE TABLE IF NOT EXISTS `t3`
(
`ID` int(11) NOT NULL AUTO_INCREMENT,
`CODE` char(5) COLLATE utf8_slovenian_ci DEFAULT NULL,
`NAME` char(100) COLLATE utf8_slovenian_ci DEFAULT NULL,
`EDITDATE` timestamp NOT NULL DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP,
PRIMARY KEY (`ID`),
UNIQUE KEY `CODE` (`CODE`),
KEY `NAME` (`NAME`)
)
ENGINE=InnoDB DEFAULT CHARSET=utf8 COLLATE=utf8_slovenian_ci;


For view and edit data query like this is used:

select `t1`.*, `t2`.NAME NAME_T2, `t3`.NAME NAME_T3
from `t1`
left outer join `t2` on `t2`.CODE = `t1`.CODE_T2
left outer join `t3` on `t3`.CODE = `t1`.CODE_T3;

When there is need to change/edit some data in `t1` and after posting changed data to database table cursor should stay at same place. It behaved properly in MySQL version 5.5.28, but at some MySQL version 5.5.xx database no longer return autoincrement value from `t1`, therefore data access component used in aplication no longer can return to proper position in table after editing or inserting any value.

It happens only when more than one additional table is joined trough query. If only one table is joined it behave properly, so bug might be left unnoticed.

However, even if only one join table is used, but with additional sort from that joined table, autoincrement field is also not properly returned. For example in query like this:

select `t1`.*, `t2`.NAME NAME_T2
from `t1`
left outer join `t2` on `t2`.CODE = `t1`.CODE_T2
order by `t2`.NAME, `t1`.SOMEDATA1 ;

In cases like that, autoincrement value is not returned and table cursor is moved to first position after editing data.]]> Krunoslav Farkas Delphi Wed, 29 Nov 2017 15:47:28 +0000 https://forums.mysql.com/read.php?49,650284,650284#msg-650284 https://forums.mysql.com/read.php?49,650284,650284#msg-650284 Luthando Madubedube Delphi Sat, 10 Sep 2016 18:18:19 +0000 https://forums.mysql.com/read.php?49,650247,650247#msg-650247 https://forums.mysql.com/read.php?49,650247,650247#msg-650247
VirtualQuery. The TVirtualQuery component is used to retrieve data with SQL queries from sources, that are any TDataSet descendants. Due to this, you can build complex SQL queries to in-memory data (data sources are TVirtualTable, TVirtualDataSet or another TVirtualQuery) or to data stored in different RDBMS'es.

VirtualTable. The TVirtualTable component represents an in-memory data storage that does not have linked data files. TVirtualTable allows to load data from a XML or CSV file, or from an existing dataset, and then process the data in the usual way, as in any TDataSet descendant.

VirtualDataSet. The TVirtualDataSet component is data wrapper that doesn't store data in memory and interacts with data using event handlers. It allows to represent arbitrary data (arrays, lists, objects, etc.) as TDataSet descendants and link it with any DB-aware components to display data or modify it.

DACs updated too. The rest of the DAC products are also updated. In this version UniDAC 6.4 got the new component - TVirtualQuery. And the TVirtualDataSet component was added to all the DAC products.

Learn more about Virtual Data Access Components at https://http://www.devart.com/virtualdac/]]> Dmitry Nikolaenko Delphi Fri, 09 Sep 2016 12:22:03 +0000 https://forums.mysql.com/read.php?49,648775,648775#msg-648775 https://forums.mysql.com/read.php?49,648775,648775#msg-648775
I would like to embedded a stand lone database in both iOS and Android devices for my apps.

when I compile my delphi project for android I get an error comming up that says I need a libmysqld.so (iOS it qould be libmysqld.mydll) but I cannot find any information on how to generate the .so file or where to deploy it to in my device.

1. Can I create a Embedded server for my devices?

2. If so how do I do it?

3. Then where do I deploy it to.]]> Daniel Rogers Delphi Tue, 02 Aug 2016 13:28:01 +0000 https://forums.mysql.com/read.php?49,647427,647427#msg-647427 https://forums.mysql.com/read.php?49,647427,647427#msg-647427 I would like to retrieve the emp_id ( int datatype ) and its emp_image(blob) into a file structure ?

How do I that using mysql stored procedures? . Thanks in advance.]]> Zahir Mohideen Delphi Wed, 29 Jun 2016 12:27:00 +0000