Die Holländer

Interesting will be how to handle files (save, loadfrom) and database access via FireDac.

Start making your own Excel object for your projects.. For example: constructor TExportExcel.Create; begin oXL := CreateOleObject('Excel.Application'); xlsClosed:=False; oXL.Visible := False; // Get a new workbook oWB := oXL.Workbooks.Add; oSheet := oWB.ActiveSheet; end; procedure TExportExcel.CloseExcel; begin oWB.Close; oXl.Quit; xlsClosed:=True; end; procedure TExportExcel.Open(aFileName: String); begin oXL.WorkBooks.Open(aFileName); oSheet := oXL.Workbooks[ExtractFileName(aFileName)].WorkSheets[1]; end; function TExportExcel.ColToText(aCol: integer): string; var d,m:integer; begin result:=''; if aCol<=0 then exit; aCol:=aCol-1; d:=aCol div 26; m:=aCol mod 26; result:=Char(ord('A')+m); if d>0 then begin result:=Char(ord('A')+d-1)+result; end; end; function TExportExcel.GetCell(aRow, aCol: integer): OLEVariant; begin result:=oSheet.Cells[aRow,aCol] end; procedure TExportExcel.SetCellBold(aRow, aCol: integer; const Value: OLEVariant); var oRng:OLEVariant; begin oSheet.Cells[aRow,aCol]:=Value; oRng:=oSheet.Range[CellToRange(aRow,aCol)]; oRng.Font.Bold:=True; end; procedure TExportExcel.SetCellValue(aRow, aCol: integer; const Value: OLEVariant); Begin oSheet.Cells[aRow,aCol].value := Value; End;

Link to otc.pl

Maybe they should be clear about the costs instead of you must contacting sales. I think this is a hurdle for many developers. (Normally you see this when the costs is high..) Just put some system senarios on the webpage with the costs needed. Even with (bit complex) MS-Azure subscription, for example, it is possible to do an overview of the costs.

or https://thinfinity-vui-v3-docs.cybelesoft.com/ It seems it delivers the whole environment needed.. Delphi Demo

No, but sadly enough, you are not able to figure out what is the cause of all these problems. You have an unstable IDE setup and because you use some incompatible components (without source..) you can not install a newer IDE, so you don't know if these problems are still in version 12 or in even in your version 11 (.3?) that I've used for one year without any of such problems you mentioned. There must be something you installed in you IDE that is causing these problems or maybe some hardware/connection problems. Install the latest Delphi version on a clean machine or in a virtual machine open some of the example projects and develop some extra features on it and see if you have all these problems you mentioned.

Yes, I think so too and I'm always amazed by people finding "tons of bugs" in Delphi while I have never real problems with Delphi. It's not because of simple projects. We developed our software for 20 years and use almost everything a modern application can do. Database, Printing, SFTP, COM, OLE word/excel, Webserver, XML, JSON, FMX, Owner drawing, Math calculations, Interfacing with other companies, etc... I only know that some had problems with the Delphi RIO version eating memory.: memory leaks with RIO

Sometimes my users get an SQL error maybe because the computer doesn't have the proper ODBC driver version installed. (Like "ODBC Driver 17 for SQL server") How in runTime can I ask FireDac to fetch this driver version used by the application? I have the FDConnection open.

The problem is to get this TFDPhysMSSQLDriverLink casting based on FDConnection.

I can't get the name like "ODBC Driver 17 for SQL server" but I see things like "17" by the statement under, so that will do.. Uses FireDAC.Phys.ODBCWrapper; SQLDriverName:=TODBCConnection(DatabaseConnectionObject.ADConnection.CliObj).DRIVER_NAME;//DRIVER_VER;// DRIVER_ODBC_VER;

Looks very nice but hard to find what the cost will be.. Ian?

To avoid hanging of the UI I use FireDac CmdExecMode: MyQuery.BeforeOpen:=FDQuery1BeforeOpen; MyQuery.AfterOpen:=FDQuery1AfterOpen; MyQuery.ResourceOptions.CmdExecMode:=amAsync Execute MyQuery; procedure FDQuery1BeforeOpen(DataSet: TDataSet); Begin fCurTime:=now; JvDesktopAlert2.HeaderText:='HeaderText'; JvDesktopAlert2.MessageText:='Fetching Data..'; JvDesktopAlert2.Execute(self.Handle); MyQuery.BeforeOpen := nil; End; procedure FDQuery1AfterOpen(DataSet: TDataSet); Begin //Reset MyQuery.ResourceOptions.CmdExecMode:=amBlocking; MyQuery.AfterOpen:=nil; Sleep(3000); JvDesktopAlert2.MessageText:='Execute Time: '+IntToStr(SecondsBetween(Now,fCurTime))+' Sec.'; JvDesktopAlert2.Close(False); //Extra Things.. End;

I've got thousands of large JSONS in the same format (like with intake data for many persons..) each with many objects and array's where the people wanted to do searching. I tried many Delphi JSON programming libraries but ended up by adding all the plain JSONS as records in the MSSQL database and wrote a SQL-View using the "OPENJSON" rowset function Now I can do: Select * FROM [View_JSON] where field=value Even better.. You can just do joins with "normal" tables.. Select * FROM [View_JSON_] left join myNormalTable on [View_JSON].field=myNormalTable.field=value and the speed.?

I like the native Delphi JSON Data Binding Wizard that creates objects for you by importing your JSON file.. neftali.clubdelphi json data binding wizard delphi 12

Fortran on place 9.. Why or for what is Fortran so populair nowadays?

I had the same issue by opening some of my D11.3 projects after D12.2 install. I just clicked and messed around the screen and I was able to get it back to sizeable. Not sure it was because of the "old" projectfiles..

Wise developers. MS SQL Express is great and the 10GB restriction is a lot of data. Easy to install and the database manager studio for managing your databases and testing your SQL's is also very good.

<?xml version="1.0" encoding="UTF-8"?> <PCConfiguration> <System> <Brand>Custom Build</Brand> <Model>Gaming Rig</Model> <DateAssembled>2023-10-15</DateAssembled> </System> <Hardware> <CPU> <Model>AMD Ryzen 9 5900X</Model> <Cores>12</Cores> <Threads>24</Threads> <BaseClock>3.7 GHz</BaseClock> <BoostClock>4.8 GHz</BoostClock> </CPU> <Motherboard> <Brand>ASUS</Brand> <Model>ROG Strix X570-E Gaming</Model> <FormFactor>ATX</FormFactor> <Chipset>AMD X570</Chipset> </Motherboard> <RAM> <TotalCapacity>32 GB</TotalCapacity> <Type>DDR4</Type> <Speed>3200 MHz</Speed> <Modules> <Module> <Capacity>16 GB</Capacity> <Brand>Corsair</Brand> <Model>Vengeance LPX</Model> </Module> <Module> <Capacity>16 GB</Capacity> <Brand>Corsair</Brand> <Model>Vengeance LPX</Model> </Module> </Modules> </RAM> <Storage> <Drives> <Drive> <Type>SSD</Type> <Capacity>1 TB</Capacity> <Brand>Samsung</Brand> <Model>970 EVO Plus</Model> </Drive> <Drive> <Type>HDD</Type> <Capacity>2 TB</Capacity> <Brand>Western Digital</Brand> <Model>Blue</Model> </Drive> </Drives> </Storage> <GraphicsCard> <Brand>NVIDIA</Brand> <Model>GeForce RTX 3080</Model> <Memory>10 GB</Memory> <Type>GDDR6X</Type> </GraphicsCard> </Hardware> <Peripherals> <Monitor> <Brand>Dell</Brand> <Model>U2720Q</Model> <Size>27 inches</Size> <Resolution>3840 x 2160</Resolution> </Monitor> <Keyboard> <Brand>Logitech</Brand> <Model>G915</Model> <Type>Mechanical</Type> </Keyboard> <Mouse> <Brand>Razer</Brand> <Model>DeathAdder V2</Model> <Type>Wired</Type> </Mouse> </Peripherals> </PCConfiguration>

Openai-Codex

Seems the same issue like this Stackoverflow Question

I can't help you with this question. Don't you need the PEM (Public) file from the server people? Isn't it possible to ask for the connect string from Azure at your database person ("someone else")? Like the example: https://samadhiweb.com/tags/Azure.html I believe, sometimes I see the Delphi database (FireDac) guru here on the form Maybe you can ask him about connecting the Mongo Azure database with SSL: Dmitry Arefiev

Please, if you find out some good things to know for other developers then come back here and add some solutions and info.

Mongodb with delphi 11.2 firedac https://github.com/grijjy/DelphiMongoDB

I'm using Azure MSSQL and that will connect just like a normal Server MSSQL using the Delphi Data Explorer. (View-ToolWindows-DataExplorer) Connect to MongoDB Database (FireDAC)