PhilPlus
Members-
Content Count
27 -
Joined
-
Last visited
Community Reputation
4 NeutralRecent Profile Visitors
The recent visitors block is disabled and is not being shown to other users.
-
Also the same 'missing constant error' for me via Getit (Delphi 12.2 patched) , all seems OK via the zipped install.
-
I use MS Access : no installation, triggers, views, all the datas are in a single file but for Windows only.
-
FYI - Several Embarcadero services are currently unavailable
PhilPlus replied to Keesver's topic in General Help
The problem is not so much the bug/fault on the site (it happens to everyone) but the time taken to resolve it. Not serious. -
Is Getit offline for everybody ? (and https://docwiki.embarcadero.com/ ...)
-
how would you do this? Pass API params from UI into API unit
PhilPlus replied to David Schwartz's topic in General Help
Hello David Again I don't see the real problem. When you call the API just send a function which parse the parameter TTABSheet and return a tstringlist (or a string or an array). function sendData(MyTab: TTabSheet): tstringList; var comp: TComponent; begin for comp in MyTab do begin if (comp is Tcheckbox) and then Result.add('"' + comp.Name + '":"' + booltostr(Tcheckbox(comp).checked)) +'"' //or other logic else begin // other comp logic; end; end; end; After you just have to add the TstringList.commatext into your JSON Request. -
Excellent Anders, excellent ! I didn't know this, first tests show that it was the exact simple solution I was looking for. The code is FDConnection1.Offline;
-
Ok but even with these options, when the TConnection is closed (FDConnection1.Connected := false) all the data are lost. So how to use the "offlien mode" ?
-
Thx, but TClientDataset seems more complex than my (not very cean) solution : a copy to FDMemeryTable, but it may be more efficient (perf and memory).
-
Thx I yet use these 2 variants (more or less) but I would find a simpler way as FDDataset have all the data in memory.
-
I typically use TFDQuery connected to a database to use with a TDBGrid. Everything is OK but I would sometimes need to disconnect this TFDQuery while keeping the data in the TDBGrid, just for visualization, with, of course the loss of some functions related to the data update, but it does not pose any problem. It seems to me that it was possible with the old library 'ADODB' : http://etutorials.org/Programming/ma...ed+Recordsets/ Unfortunately I haven't found how to do this with the Firedac components (apart from making a copy in a TFDMemTable but this is a bit cumbersome). Has anyone already implemented this principle?
-
how would you do this? Pass API params from UI into API unit
PhilPlus replied to David Schwartz's topic in General Help
Hello I'm not sure I understand your problems. I have an application with params used in API & VCL interface, every param is declared in a Table (from Database or Inifile) and is used dynanically to construct the param VCL Form AND the API Swagger file. For xyz param the table store its name (xyz) its label ("My parm xyz") its type (integer) and osme other informations (default value...) If in the interface xyz is set to '1' the API (here a GET method) become http://127.0.0.1/api/param?xyz=1& -
@Alexander Yes it works thx for the idea, what a pity that this is not possible in the .dpr
-
Good idea, we can be sure that Unit3 initialization is used before other, but it is less clear for finalization.
-
Hello, in a VCL project I need to run some code when closing the application, after destroying all forms. In the next sample I try to free a tstringlist but the line 'tsTest.Free;' is executed before the Tform onDestroy program Project1; uses Vcl.Forms, System.Classes, Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit2.pas' {Form2}, Unit3 in 'Unit3.pas'; // global contains var : tsTest : TStringList; {$R *.res} begin tsTest := TStringList.Create; Application.Initialize; Application.MainFormOnTaskbar := True; Application.CreateForm(TForm1, Form1); Application.CreateForm(TForm2, Form2); Application.Run; tsTest.Free; end. It is just a simple example of my problem, any idea how to do it ?
-
Hello As you need dataset 'to save data to other kind of structure' paging is not a good idea, just try FetchOptions.Mode := fmAll; and compare timings. Now it would be usefull to have more informations about your software : table size, Query size...