The information stored in the dfm is only what you design. The nesting is about parent/child relations, not about ownership. This dfm suggests that Son is no longer the Parent of Father. This may be caused by code in TSon that modifies it’s own parent. 1 solved Issue with Delphi DFM inheritance
How to insert Line From MemoList2 To Top Lines Of MemoList1 Translate your query literally into Delphi language if MemoList2.Count > 0 then //check that list contains at least one line MemoList1.Insert(0, MemoList2[0]); solved How to insert a line from MemoList2 to the top of MemoList1
You’ve already answered your question…. “no updates installed” means that you don’t have update 1 installed. Select that you want to keep your registry entries during uninstall, then you don’t need to reinstall your components. 5 solved delphi 10 seattle update installed? [closed]
You are declaring a TDateTime variable: var myDate : TDateTime; You are then trying to assign to this variable the result of a function that converts a TDateTime to a String: myDate := datetimetostr(dxDateTimeWheelPicker2.DateTime); So of course you get an incompatible types error, because a TDateTime is not assignment compatible with a String. But for … Read more
There is no built-in functionality to do that, since you throw away information (the length of each string). So that information have to be stored somewhere. You could use a TStringList descendant : Interface TMyStrings = class(TStringList) protected function GetTextStr: string; override; end; Implementation { TMyStrings } function TMyStrings.GetTextStr: string; var Element: String; begin Result … Read more
Not really, because the canvas doesn’t keep track of distinct images. However, you can easily “clear” any part of your canvas simply by drawing over it. This will allow you to redraw all remaining pictures. This could however be quite time consuming if there are many pictures and a user is busy dragging a single … Read more
It’s a bit confusing. Readme does say you need to install components The readme.md address this issue. Let me quote it for you Component Installation If you intend to view or modify the Setup project’s forms, you must install the following component units, which can be found in the Components directory. BidiCtrls BitmapImage FolderTreeView NewCheckListBox … Read more
Solution is very simple – need to add: Database=myDataBase; to CONN_STR = ‘DRIVER=SQL Server Native Client 10.0;UID=user;PWD=pass;server=server;’ + ‘Trusted_Connection=No;MARS_Connection=yes’;Database=myDataBase; Thanks Arnaud for great framework!!! solved Delphi: What’s wrong with REST API based on mORMot?
The C++ equivalent of Delphi’s uses clause is #include statements for C++ header file. In this case, to use TIdHTTP in C++, you need an #include <IdHTTP.hpp> statement in your C++ code, and make sure Indy’s header files are in a folder in your project’s Includes search path. If you drop a TIdHTTP component on … Read more
By default, CEF cancels the request when a certificate issue occurs during its navigation. Hard to say what you want to do in your case, but in general, you should not work with content with some certificate issue. But if you know that it’s safe for you, you can allow your request(s) to continue at … Read more
This is or was an issue with the With Adoquery2 do begin … end when using name in the sql, it was really getting adoquery2.name not the var name. I fixed this by changing name to Cname had no more issues after that. 1 solved SQL not finding results
As already explained to you in comments, your while loop should look something like this: while **not** FData.FDQuery1.Eof do **begin** ShowMessage(FData.FDQuery1.Fields[0].ToString); **FData.FDQuery1.Next;** end; (minus the asterisks, of course). However, that would not overcome the problem that your SQL is incorrect. So, try this instead: In a new Delphi project, place a TFDConnection, TFDQuery, TDataSource, TDataSource … Read more
I suggest you investigate Waitable timers. These can be set to set to fire after a specific period of time (like a regular TTimer) or at a specified time of day, which is exactly what you need in this case. In your form create/show event, create a waitable timer and set it to the required … Read more
The string you have is a perfectly formatted JSON array. Written, as source code, it is more readable (JSON doesn’t care about spaces when not inside double quoted string): JSONText : String = ‘[‘ + ‘ {‘ + ‘ “data”: “18/06/2021”,’ + ‘ “dataHora”: “18/06/2021 22:08”,’ + ‘ “descricao”: “Objeto em trânsito – por favor … Read more
The best approach is define an Event on your datamodule and then implement a handler for the event in your form and assign it to datamodule event. Then, in your process, you invoke the event and thereby call the event handler. Something like this: type TMyProgressEvent = procedure (Position, TotalSteps: Integer; Msg: string) of object … Read more