gkobler

Solved in build 26: Now you can setup the settings

We are pleased to present the new version 2 of the Firebird Monitor with “Trace and Audit”. We are currently offering a 10% discount on the purchase of a license until the end of June 2024. The coupon code is "Discount10". With “Trace and Audit”, they are able to record and evaluate every single event in the database. Visit our homepage and download the demo version. https://fbm.gksoft.ch

It's on my todo list. 😉

Sometimes scale settings more than 100% makes problems. Try it with 100%

Does anyone have the same problem as me when selecting several components (visible as well as non-visible) on a form in the IDE. Either by Ctrl-clicking or just with the mouse and then pressing Ctrl-C, the CPU output of the BDE.exe task goes up and the IDE is blocked/freezing. You can then only end the task and have to restart the IDE. The problem has existed for some time, but since D11, D12 and D12.1 it happens more and more frequently.

Have installed Parnassus Navigator, will try to deinstall them.

this is what process explorer shows when the IDE hangs

Good sugestion, will try it. You can wait for hours.. the IDE still hangs

After Install D12.1 it looks like ok, but all win64 path settings are lost 😞 Hade to reinstall my 3-party components

New version 1.0.5.B25 are available. At the moment just for D12

OK, I have also seen that the registry is updated immediately. I was of the opinion that this only happens when the IDE is closed. So I can insert a refresh button.

i told you there are some event from the ToolsAPI where i can update the list

But the registry is only updated/written when Delphi is closed, so you have no change while Delphi is running.

I don't really understand your question. Because when the IDE is started, the registry is read out, then every change is recorded via an event and updated in the rescent files. Therefore a refresh of the registry is not necessary.

I have installed FB3 as a service. FB2.5, 4.0 and 5.0 are also installed, but i run these version not as a service it runs as program with different port configuration. So i can run different FB-Server versions at the same time. Port 3040: FB2.5 3050: FB3.0 (default) 3060: FB4.0 3070: FB5.0 The follow code runs PROCEDURE TForm1.Button3Click(Sender: TObject); VAR FDIBInfo: TFDIBInfo; AVersion: TIBInfo.TVersion; BEGIN FDPhysFBDriverLink1.VendorLib := 'D:\Temp\fbclient32_500.dll'; FDIBInfo := TFDIBInfo.Create(Self); FDIBInfo.Protocol:= ipLocal; FDIBInfo.DriverLink:= FDPhysFBDriverLink1; FDIBInfo.UserName:='SYSDBA'; FDIBInfo.Password:='masterkey'; FDIBInfo.Port:= 3070; FDIBInfo.GetVersion(AVersion); ShowMessage(AVersion.FServerStr); END; But it detects the wrong Server version, the result are allways the follow WI-V3.0.11.33703 Firebird 3.0 The code line FDIBInfo.Port:= 3070; has no influence on the execution. Is this possibly an error or is generally only the FB version of the installed Windows service queried? Are there a better way to detect the FB-Server version? I use Delphi 12.0.1

In the meantime, I have come up with a solution. I have debugged something in the library. I found out that if the protocol is set to "ipLocal", the port is not taken into account. You have to change the protocol to "ipTCPIP" and set the host to "localhost", then it works. Follow the final code FUNCTION TfrmMain.GetFirebirdServerInfo: boolean; VAR FDIBInfo: TFDIBInfo; AVersion: TIBInfo.TVersion; AConfig: TIBInfo.TConfig; BEGIN Result := False; IF (teFirebirdInstallPath.Text = '') AND (teFirebirdVersion.Text = '') THEN BEGIN FDIBInfo := TFDIBInfo.Create(Self); TRY FDPhysFBDriverLink.VendorLib := teVendorLibrary.Text; FDIBInfo.Protocol := ipTCPIP; FDIBInfo.DriverLink := FDPhysFBDriverLink; FDIBInfo.Host := 'localhost'; FDIBInfo.Port := spePort.Value; FDIBInfo.UserName := teUsername.Text; FDIBInfo.Password := tePassword.Text; FDIBInfo.GetVersion(AVersion); teFirebirdVersion.Text := AVersion.FServerStr; FDIBInfo.UserName := teUsername.Text; FDIBInfo.Password := tePassword.Text; FDIBInfo.GetConfig(AConfig); teFirebirdInstallPath.Text := AConfig.FServerPath; Result := True; FINALLY FDIBInfo.Free; END; END ELSE BEGIN Result := True; END; END;

I use the FB5 dll 32bit version. FDPhysFBDriverLink1.VendorLib := 'D:\Temp\fbclient32_500.dll'; FB3 would be the follow FDPhysFBDriverLink1.VendorLib := 'D:\Temp\fbclient32_311.dll'; I renamed the dll as follow FB3.0.11 32/64bit -> fbclient32_311.dll / fbclient64_311.dll FB4.0.4 32/64bit -> fbclient32_404.dll / fbclient64_404.dll FB5.0.0 32/64bit -> fbclient32_500.dll / fbclient64_500.dll

Stupid... the other solution would basically work, but it doesn't pay attention to the port

How can i use this without to connect to a specify database?

Thanks for that hint. Have change it, now all version runs a service But unfortunately it still doesn't solve my problem

A new version is available V1.6.1.171. Support for FB5 and HDPI. Visit our Homepage and download the Trialversion: https://fbm.gksoft.ch

Did you have a task called "adb.exe"? When yes kill it? I had the same problem in the past. Although I had only worked on one VCL project. I don't remember which Delphi version the problem occurred with.

I'm migration a project from FB4 to FB5, i use a TFDQuery and a TFDUpdateSQL component. My project runs without any problems. I have updated the database from FB4 to FB5 now. Now i got a problem, when i update a Field in my table. The follow exception are rises Im Projekt Project2.exe ist eine Exception der Klasse EFDDBEngineException mit der Meldung '[FireDAC][Phys][FB]-312. Genau update affected [0] Zeilen, [1] wurden angefordert' aufgetreten. and Im Projekt Project2.exe ist eine Exception der Klasse EFDException mit der Meldung '[FireDAC][DApt]-400. Update-Anweisung updated [0] anstelle von [1] Datensatz. Mögliche Ursachen: Aktualisierungstabelle hat keinen Primärschlüssel oder Zeilenbezeichner, Datensatz wurde von einem anderen Benutzer geändert/gelöscht' aufgetreten. The data field are not updated. When i now set the property UpdateOptions.CountUpdateRecords to False, i just got the first exception and the fiel are updated to the table. What can i do to avoid the exception? I think the problem should be in the TFDUpdateSQL Component, but something must be changed from FB4 to FB5? Thanks for any hint Gregor

it works for me. 🙂 Thanks a lot for your support!

@Dmitry Arefiev should i go via the support to get a fix earlyer? Or could you post some infos here to fix it? Quality Portal is read only at the moment and it‘s not an option for that.