Delphi

问题 NOTE: Bear with me, I feel a little "flame grilled" due to some discussions over here and here and some issues I reported here and here. Some background Ye olde (pre 10.4) FreeAndNil looked like this: FreeAndNil(var SomeObject) The new and fresh FreeAndNil looks like this: FreeAndNil(const [ref] SomeObject: TObject); IMO both have their downsides: The old one doesn't do any type checking, so calling FreeAndNil on pointers, records and interfaces compiles just fine, but produces interesting

问题 NOTE: Bear with me, I feel a little "flame grilled" due to some discussions over here and here and some issues I reported here and here. Some background Ye olde (pre 10.4) FreeAndNil looked like this: FreeAndNil(var SomeObject) The new and fresh FreeAndNil looks like this: FreeAndNil(const [ref] SomeObject: TObject); IMO both have their downsides: The old one doesn't do any type checking, so calling FreeAndNil on pointers, records and interfaces compiles just fine, but produces interesting

问题 My database is in a VPS and I should get some query from my tables Because of getting query from server taking long time ( depending on Internet speed ! ) , I want to use threads to get queries Now I create a thread and get query and then send result to my forms with sending and handling messages I want to know is it possible to create and use a thread locally ?!? My mean is : procedure Requery; var ... begin Create Thread; ... Pass my Query Component to Thread ... Getting Query in Thread; ..

问题 My database is in a VPS and I should get some query from my tables Because of getting query from server taking long time ( depending on Internet speed ! ) , I want to use threads to get queries Now I create a thread and get query and then send result to my forms with sending and handling messages I want to know is it possible to create and use a thread locally ?!? My mean is : procedure Requery; var ... begin Create Thread; ... Pass my Query Component to Thread ... Getting Query in Thread; ..

问题 My database is in a VPS and I should get some query from my tables Because of getting query from server taking long time ( depending on Internet speed ! ) , I want to use threads to get queries Now I create a thread and get query and then send result to my forms with sending and handling messages I want to know is it possible to create and use a thread locally ?!? My mean is : procedure Requery; var ... begin Create Thread; ... Pass my Query Component to Thread ... Getting Query in Thread; ..

问题 hopefully an easy question, but I could not find an answer. I am using Delphi TColor and some color values are negative. Is this documented? I need to do some color conversions, for example, to RGB. for example: Label.Color=-16777188; //light bluish Thanks 回答1: The negative values are not actual RGB colours, but Windows system colours, which are variable. For instance, the following are actual RGB colours: clRed = $000000FF; {00BBGGRR} clBlue = $00FF0000; clWhite = $00FFFFFF; clBlack =

问题 hopefully an easy question, but I could not find an answer. I am using Delphi TColor and some color values are negative. Is this documented? I need to do some color conversions, for example, to RGB. for example: Label.Color=-16777188; //light bluish Thanks 回答1: The negative values are not actual RGB colours, but Windows system colours, which are variable. For instance, the following are actual RGB colours: clRed = $000000FF; {00BBGGRR} clBlue = $00FF0000; clWhite = $00FFFFFF; clBlack =

问题 hopefully an easy question, but I could not find an answer. I am using Delphi TColor and some color values are negative. Is this documented? I need to do some color conversions, for example, to RGB. for example: Label.Color=-16777188; //light bluish Thanks 回答1: The negative values are not actual RGB colours, but Windows system colours, which are variable. For instance, the following are actual RGB colours: clRed = $000000FF; {00BBGGRR} clBlue = $00FF0000; clWhite = $00FFFFFF; clBlack =

问题 I've been signing compiled apps for several months and have a script that calls the Windows 10 SDK signtool. It's been working fine on two different computers and my certificate is valid. Today, I just started getting an "Unexpected internal error" with the error number listed above. I tried disabling antivirus which helped in this case but not mine. My app is written in Delphi but I don't think that matters as this same problem was reported on Microsoft's Developer Community under Visual

问题 I've been signing compiled apps for several months and have a script that calls the Windows 10 SDK signtool. It's been working fine on two different computers and my certificate is valid. Today, I just started getting an "Unexpected internal error" with the error number listed above. I tried disabling antivirus which helped in this case but not mine. My app is written in Delphi but I don't think that matters as this same problem was reported on Microsoft's Developer Community under Visual