Jump to content

Javier Tarí

Members
  • Content Count

    61
  • Joined

  • Last visited

  • Days Won

    1

Everything posted by Javier Tarí

  1. Javier Tarí

    Unicode weirdness

    I would just substitute the original characters for their equivalent codes, in the #99 or #$ab format
  2. Javier Tarí

    Huge memory problem

    Excuse my question, but: Are you using a memory table or file based table?
  3. Javier Tarí

    ANN: StyleControls VCL v. 5.11 just  released!

    Which is the latest release compatible with D2007?
  4. Javier Tarí

    Trying to find the correct mouse event

    All of the following applies to VCL,; I have zero experience with FMX: You should use OnEnter, not OnMouseEnter If you want it work 100% also when the form is closed, I do this: Save the form Active control value on a variable Assign to ActiveControl another safe control (I do it eg. btnCancel.SetFocus) Assign again to ActiveControl the control you saved This way you are simulating the user leaving the edit box Another way to observe a DB field changes is the TDataSource events: when your field is changed while the dataset is in dsEdit or dsInsert state, you will get a DataChange event refering to that field (and not to nil)
  5. Javier Tarí

    MQTT: advice wanted

    I'm planning to use MQTT to connect industrial devices (PLCs) to an ERP program running in Windows Never played with that, so I hope some of you could give me any advice The broker would be a Mosquitto As for the Delphi side, I need something that works without troubles, so was considering purchasing the www.esegece.com components, unless suggested otherwise Any advice would be more than welcome! Than you in advance
  6. I was just looking to purchase it as ebook; I read a lot of ebooks, but can't remember when did I read the last paper book Btw, in Amazon Spain the book is not listed
  7. Javier Tarí

    Duplicated SMTP messages

    I'm having a strange issue sending messages through TSMTP The emails are sent to a fixed destination, and CC'd to the sender email Although I only send them once from program, About 5% of them are sent twice To increase my confussion, I've added as BCC my own email, and that email doesn't get duplicates So I'm quite lost
  8. Javier Tarí

    Duplicated SMTP messages

    Thanks for answering, Remy; I'm sure it's not Indy's fault, but I'm quite lost All and every email is sent to exactly the same recipients: the email addresses are used by an automated system, always from the same "From" to the same "To", CC" and "BCC" All the emails are sent successfully, and arrive successfully. Some of them (5%-10%) are received twice, and never more than twice I call TIdSMTP.Send once The source of the repeated emails, at least as seen on Thunderbird "source code" message option, is exactly the same, even compared with a text comparer On the source I can see some IDs (as I said, exactly the same on both emails): X-Cyrus-Session-Id: llcc507-a-18474-1651934775-1-2233586116162072206 ESMTP id 4KwVcR2Dvdz30vg ESMTPS id 4KwVcQ5F2Lz3072 ESMTPA id 4KwVcQ1gtSz2t2D
  9. Does anyone knows of any implementation in Delphi? Client or server? Free or commercial? Thanks in advance
  10. Is there any library/framework out there for D2007, wich makes easier using interfaces, DI , factories or anything on that line? I would jump on Spring4D, but some legacy issues doesn't allow me to go other Delphi versions for now I'm using interfaces for just a couple years now, and would prefer not reinventing the wheel if possible
  11. Javier Tarí

    RAD Studio 11 Alexandria is now available

    The installer is failing for me. These are some details for my subscription; This is what happens when I try to install from the web installer or the ISO installer: Just in case, I downloaded the activation file from the licensing page: and tried removing the license from licensing manager, and leting the installer use the new one Result: Delphi 10.3 and 10.4 keep running with the license, but Delphi 11 won't install
  12. Short: At design time, How can I get the IDesigner interface for a given form? Long: I have a VCL DBGrid-kind component developed for D5 and working fine all the way up to D10.4.1, except for one thing At design time, when I clic on a column header, it should select on the Object Inspector the TCollectionItem descendant for that column In D5, it was as easy as finding the form owning the DBGrid-kind, and then using FDesigner.SelectComponent(TheColumn); But now the form has IDesigner: IDesignFormHook, so I don't know how to do a SelectComponent Thanks in advance
  13. Javier Tarí

    Need help finding the IDesigner

    Works perfect; thank you very much
  14. Javier Tarí

    PlasticSCM, Delphi, Semantic merge

    Has someone tried PlasticSCM with Delphi sources? The semantic comparison seems awesome, but I wonder if someone has tried it already, and has found how good it is - or is not Thanks in advance
  15. Javier Tarí

    Database app good practice

    If you can, sure. I work everyday on the same project, for more than 20 years, and it can't stop evolving So no chance of rewriting projects here
  16. Javier Tarí

    Database app good practice

    Testing Greater Platform independency Long term, evolutive applications Same happens with DB-aware; you just have some DBaware components
  17. Javier Tarí

    Database app good practice

    Very far from it; just an appetizer, an starting point to get a feeling on how MVVM could work If you are looking for a true MVVM framework, this is not for you
  18. I'm deeply interested on this, and would like if anyone here is using/used homegrown MVVM implementations, and wich was/is your experience. Works fine? Is not woth the effort? Is the best since sliced bread? Please, share your experience Thank you!
  19. Javier Tarí

    Is someone using MVVM?

    Could you expand that a bit? Do you mean in Delphi we don't need it? If that's what you mean, wich would be in Delphi the pattern that gives us the same as MVVM in other platforms?
  20. One possible solution could be allowing a two-phase declaration: tPolar2D = record Radius: Double; azimuth: Double; end; forward; //keyword just to say there are methods to be defined later tPoint2D = record x: Double; y: Double; function ToPolar: tPolar2D; end; tPolar2D = record finalization function ToCartesian: tPoint2D; end;
  21. Javier Tarí

    Database app good practice

    There are no MVC or MVVM frameworks on Delphi, other than the DMVCframework, wich I believe is not thought for Windows UI apps And anyway, that kind of frameworks are not oriented to let a form use a TDataset or a TDatasource So IMHO, as of today, RAD and MVC/MVVM are not friends
  22. Javier Tarí

    Need help finding the IDesigner

    Thank you; finally understood it Ofcourse, it is a BPL registering the components and some property editors, all of them working Following your advice, I've solved it this way: var ModuleServices: IOTAModuleServices; FFormEditor: IOTAFormEditor; NTAFormEditor: INTAFormEditor; FormModule: IOTAModule; aFormDesigner: IDesigner; begin aFormDesigner:=nil; ModuleServices := BorlandIDEServices as IOTAModuleServices; if Assigned(ModuleServices) then begin FormModule := ModuleServices.FindFormModule(Self.Owner.Name); if assigned(FormModule) then begin FFormEditor := FormModule.GetModuleFileEditor(FormModule.GetModuleFileCount - 1) as IOTAFormEditor; if Supports(FFormEditor, INTAFormEditor, NTAFormEditor) then aFormDesigner:=NTAFormEditor.GetFormDesigner; end; end; //Now you just select the column, i.e.: if Assigned(aFormDesigner) then aFormDesigner.SelectComponent(Column(ACol)) end; Next one also works, but I'm not sure if it should work, so will keep the first one var aFormDesigner: IDesigner; aForm: TCustomForm; begin AForm:=GetParentForm(Self); If not Supports(aForm.Designer,IDesigner,aFormDesigner) Then aFormDesigner:=nil; if Assigned(aFormDesigner) then begin aFormDesigner.SelectComponent(Column(ACol)); end;
  23. Javier Tarí

    Need help finding the IDesigner

    Don't thik I understood you.. Do you mean something as this? ((Form as IOTAmodule) as INTAFormEditor).GetFormDesigner
  24. Javier Tarí

    SetRange - Doesn't

    If it is not supported, it should throw an exception. Is the query sorted with an order by?
  25. Javier Tarí

    No C/S FireDac for Delphi Professional

    Unless you really need Enterprise, I would go with UniDac If you decide to go with UniDAC, consider making wrapper components wich, depending on a $DEFINE, would inherit from FireDAC or from UniDAC, and then substitute all your current FD components with those That way, your app will always be ready for both FD and UD. So if you later decide to go with Enterprise and come back to FireDAC, you would not need to change a single line of code on your sources That's pretty much my line of work right now
×