Stéphane Wierzbicki

Did you try to forbid internet access for BDS.exe (using Windows built in firewall) ?

Hello, I cannot work with refactoring stuff any more. Right clicking and selecting "Refactor" menu takes up to 5 minutes on my VM machine (Windows 2016 / 32Gb Ram / 8 Sockets + 8 cores). Proccess monitor display almost 8 000 000 entries during all this time. The pattern hereunder is always repeated 13:07:05,7547890 bds.exe 15488 CreateFile C:\ SUCCESS Desired Access: Synchronize, Disposition: Open, Options: Directory, Synchronous IO Non-Alert, Attributes: n/a, ShareMode: Read, Write, AllocationSize: n/a, OpenResult: Opened 13:07:05,7548220 bds.exe 15488 QuerySecurityFile C:\ SUCCESS Information: Attribute 13:07:05,7548380 bds.exe 15488 QueryNameInformationFile C:\ SUCCESS Name: \ 13:07:05,7548534 bds.exe 15488 QueryAttributeInformationVolume C:\ SUCCESS FileSystemAttributes: Case Preserved, Case Sensitive, Unicode, ACLs, Compression, Named Streams, EFS, Object IDs, Reparse Points, Sparse Files, Quotas, Transactions, 0x3c00000, MaximumComponentNameLength: 255, FileSystemName: NTFS 13:07:05,7548669 bds.exe 15488 CloseFile C:\ SUCCESS Next "right click" / "Refactor" are then working as expected ! Maybe @David Millington can help me on this ? Regards

No, not really. This is a small sized project. I'm trying right now with an empty project.... Tooks 1m30 .... Process monitor displayed almost 2 000 000 events ....

Looks like an SQL server error. Have you checked that data sent to SQL server is correct? Regarding your error message, it looks like you are sending a text having a length greater than the declared field size.

Is there any reason to stay with such an old version? Why don''t you update to a much recent version?

Just to let you know, the link is not working (404 error)

Take care !

Hi, I'm heavily working with Aurelius (which I'm really satisfied) that can store objects within TList<T>. TList<T> is missing a lot of functionalities that ITlist<T> provide. Is there a easy way to have referenced TList<T> object within ITList<T> ? (I can loop through TList<T> but this is not really practical). Thanks

Thanks for your reply. Object's lifetime cycle is actually handle by Aurelius' manager. Object's stored within TList are only queried for additional checks, needs to see TList acting like a cache. I'll then use .ToArray and then free TList. Ps: @Wagner Landgraf it will be nice allowing TMS Biz products using Spring4D library 😄

Well this was almost 14 years ago ! I found some reference but no real explanation (tbh I don't care about). http://www.codenewsfast.com/cnf/article/0/waArticleBookmark.7292264

I remember a change in the way application was displayed in task bar (twice). If I recall it was an issue specific to application built with Delphi.

Do you have any IDE experts installed? If so, did you try removing them?

You meant "At the least"? I agree, if he want to attract more users, it is more than necessary to have English content.

Would you mind creating a quality entry on Embarcadero website? Btw are you working with which Delphi version?

Why don't you just create one metWhySpineditxxxChange event and bind it to all your components change event? This can be done at design time as well as runtime.

How ?

Hello, I'm trying to disable IDE Theme (because it is damn slow). Setting Computer\HKEY_CURRENT_USER\Software\Embarcadero\BDS\21.0\Theme\Enabled entry to Value: 0 brings me hope but : IDE start with an exception: and there are some disgraceful black painted controls and IDE Is there maybe another way to get rid of this ? I seen a lot of people complaining about VCL Theme speed and IDE slow down.... Why the hell Embarcadero do not listen to their customers? BTW I'm working with Delphi Sydney 10.4.1 + all available patches

Hello everyone, I hope this message finds you all in good health! This year and really weird.... But anyway, let's get back to the point. I recently found a little nugget on the Internet developed by the brilliant @Uwe Raabe : it's a Dataset helper that automatically fills in the properties (or even fields) of an object. The source code can be found at this address : https://www.uweraabe.de/Blog/2017/02/09/dataset-enumerator-reloaded/ I have slightly adapted the source code to use TMS Aurelius attributes (using "Column" attribute instead of "DBField" one provided bu Uwe). The Dataset helper works perfectly well "simple" classes such TCustomer = class private [Column('CustNo')] FCustNo: Double; FCompany: string; FAddress1: string; public [DBField('Addr1')] property Address1: string read FAddress1 write FAddress1; property Company: string read FCompany write FCompany; end; But it gets more difficult as soon as my fields are declared this way: TCustomer = class private [Column('CustNo')] FCustNo: Nullable<Double>;; FCompany: Nullable<String>;; FAddress1: string; FEntity: TObject; public [DBField('Addr1')] property Address1: string read FAddress1 write FAddress1; property Company: string read FCompany write FCompany; property Entity: TObject read FEntity write FEntity; end; At runtime application is throwing "Invalid Type Typecast" exception on every TRTTI.GetValue or TRRTI.SetValue procedure TDataSetHelper.TDataSetRecord<T>.TFieldMapping.LoadFromField(var Target: T); begin FRTTIField.SetValue(GetPointer(Target), TValue.FromVariant(FField.Value)); end; procedure TDataSetHelper.TDataSetRecord<T>.TFieldMapping.StoreToField(var Source: T); begin FField.Value := FRTTIField.GetValue(GetPointer(Source)).AsVariant; end; procedure TDataSetHelper.TDataSetRecord<T>.TPropMapping.StoreToField(var Source: T); begin FField.Value := FRTTIProp.GetValue(GetPointer(Source)).AsVariant; end; procedure TDataSetHelper.TDataSetRecord<T>.TPropMapping.LoadFromField(var Target: T); begin FRTTIProp.SetValue(GetPointer(Target), TValue.FromVariant(FField.Value)); end; I guess this is happening because of either reading/writing values from a Record or an Object. I searched (maybe not enough nor thoroughly) the Internet but I wasn't able to solve this by myself. Can someone helps me sorting this out adapting attached unit to handle simple properties types (integer, double, date, string, boolean....) values as well Nullable one ! (and rejects complex types too 🙂 ) I'll really appreciate some help. Kind regards, Stéphane Ps: I have attached modified Uwe's unit file. Ps2: I'm working with Delphi Sydney Aurelius.Dataset.helper.pas

Thanks, looks like I need either some good sleep or vacation !

Thank you Uwe, but problem still arise, the RTTI code is not able to read (or write) value from (or to) a record.

Thank you Attila, but I've already spotted this 😉. The thing is I don't know actually how to do this 🙂 !

Thanks, this looks really promising. I just want to inform you that IDE is unstable since installing this plugin Delphi is runniing on a Windows 2016 TSE server.

I'm using TortoiseGit, never used the IDE integrated one...

I do not fully agree. I was able to live without IDE FixPack until XE area, when unit scope was introduced. At that time IDE were barely usable, took a lot of time displaying forms at design time, compiling project (the more directories in the search path the worse the IDE react)...

And that is a shame...