Jump to content

emileverh

Members
  • Content Count

    66
  • Joined

  • Last visited

  • Days Won

    2

Everything posted by emileverh

  1. emileverh

    Set form in read only mode

    Use GetControls() new since Delphi 11 I believe. Just as an example for me to disable TcxEdit's only. But you can do your own stuff: for var ctrl in frmMain.GetControls([ceftAll]) do begin if (ctrl is TcxEdit) then begin TcxEdit( ctrl).Enabled := false; end; end;
  2. emileverh

    Simpel types

    Hi guys! I am using D12. I have lots of code for ID’s like this: type TProductID = record ID : nativeint; end; What I want is this: type TProductID = nativeint; And yes I know the last declaration works! But when you make a call to a procedure and you mixed the params by mistake you got no error. Is there any helper, record attribute, compiler directive or so where I did not think of?!?! procedure TForm6.FormCreate(Sender: TObject); begin var tmpid: TProductID := 6; AddToStock(tmpid, 100); AddToStock(100, tmpid); // I want a compiler warning or error here!!!!!!! end; procedure TForm6.AddToStock(pid: TProductID; cnt: nativeint); // Both uses internally nativeint begin ShowMessage(pid.ToString); end; Now I have lot's(!) of database code like this in my program.... var cid : TCustomerID; var pid: TProductID; pid.ID := qryGetStockProductID.AsInteger; cid.ID := qryGetStocCustID.AsInteger; What I want is: pid:= qryGetStockProductID.AsInteger; cid := qryGetStocCustID.AsInteger;
  3. emileverh

    Simpel types

    Great! Thanks a lot!!
  4. Hi! I installed ICS 9.1 today, wowww I am impressed. The demos are very impressive, compliments to the author(s) 😉 But also overwhelming with so much functionality. Can you give me a direction where to look for with what is the easiest way to find a MySQL server ( with port 3306 open) on my LAN (192.168.x.x)? Thanks in advance, Emile
  5. @Angus and @FPiette, thank you both!!
  6. emileverh

    What new features would you like to see in Delphi 13?

    I know it's a compiler problem, but why can they do it with classes and not with records....
  7. emileverh

    What new features would you like to see in Delphi 13?

    That can be true, but that is 'not my problem' how to solve it. I use records a lot for several reasons (speed, memory management,....). And it would be VERY nice to have that.
  8. emileverh

    What new features would you like to see in Delphi 13?

    forward declaration of records, just like a class
  9. Hi team! frmSelectFooter := TfrmSelectFooter.Create(self); if frmSelectFooter.ShowModal = mrOk then begin ... end; FreeAndNil( frmSelectFooter ); If there are TFDQuery's used in that form, do I need to close explicitly close the query? In other words, are (database) resources still in use? Thanks! Emile
  10. emileverh

    Do runtime created forms close the TFDQuery connections?

    Thanks for the quick reply!! 😉
  11. emileverh

    Do runtime created forms close the TFDQuery connections?

    The TFDConnection is on a central place in the program on a different datamodule. ( MySQL and the property 'Pooled' is left default, which is False )
  12. emileverh

    What new features would you like to see in Delphi 13?

    Totally agree. Fix the existing things first....
  13. emileverh

    Access multiple Outlook calendars

    Hi team! I have a question; I have a situation where a secretary manages multiple calendars in Outlook. So from her manager, employee 1, employee 2, etc. Is it possible to get access to all calendars of all people? For example I want to put an appointment in the calendar of 'Employee 2' via Delphi 12. I now use the 'basic' access like: try myOutlook := GetActiveOleObject('Outlook.Application'); except myOutlook := CreateOleObject('Outlook.Application'); end; etc. etc. And that works. ( I use it for sending emails ). But I don't know you to use multiple calendars.... Your help would be much appreciated! Thanks in advance, Emile
  14. emileverh

    Access multiple Outlook calendars

    Looks interesting. I will try that! Thanks for your help ;-))
  15. emileverh

    Access multiple Outlook calendars

    Thanks for your answer. First the link does not work. And second my application is a planning tool where lots of mutations are done during the day. And adding email with attachments is not a good option ( we tought of that), because there will be a lots of mouse click work than and I don't want to run VBA scripts. Therefore I want full access to the local application, where the secretary has access to xxx employees. And I want to add/remove directly into Outlook. It already works for 1 calendar. But now I want to address one specific calendar.....that is my question
  16. emileverh

    Access multiple Outlook calendars

    Yes, but it's loooooooots of things to read and every item is hyperlinked to another page. So I miss the overview. I hope(d) that some could say, yes I have done this before and do this (fake code): calendar.User[2].AddAppointment
  17. emileverh

    Access multiple Outlook calendars

    Nobody?!?!
  18. emileverh

    Delphi 11, migrate or wait

    Question, I have a large D10.4 project ( approx. 80 forms and lots of frames, also DevExpress and ReportBuilder). Is it worth upgrading now to D11? I did a quick test and I tried loading my project and I see still some high DPI issues, especially on frames. I can reposition the components and it seems to be okay. I have the latest november patch loaded. But can I aspect new issues ( which I did not see now, because I did not went trough all my forms)? Or should I wait until D11 patch 1? Comments welcome 😉
  19. Great! I work only on the Windows platform. One DLL less 😉 So the Embarcadero guys did a translation found on the SQLITE.ORG source code to Delphi-Pascal?
  20. May be a stupid question; but I am correct with the option 'EngineLinkage -> sIFDEStatic' I don't need any external DLL? ( Now I deploy sqlite3.dll to all my clients ). Or is this other behaviour...
  21. Hey guys! I need a little help, I created a ticket. We live in 2023, talking about 64-bit compilers, FMX, and other high-tech stuff, and a string literal can not be longer then 255 chars? for use with resourcestrings, consts. Come on..... Please vote! https://quality.embarcadero.com/browse/RSP-41138
  22. emileverh

    String literals more then 255 chars

    They heard my voice ;-)) https://blogs.embarcadero.com/yukon-beta-blog-delphi-language-modernizing-string-literals/
  23. Title is clear I think ;-)). Installed with DevExpress, CodeSite and ReportBuilder.... NO ISSUES!!
  24. emileverh

    String literals more then 255 chars

    One last remark, as said, it's this issue not shocking.... I use DevExpress 'dxFormattedLabels' a lot. So in the string there will be extra markup code for setting text to bold and/or italic or change color. So the string can quickly become quite large. If you use a multi language app ( as I have Dutch and English for now), the string can grow beyond it's limitation. Break; never filed a request to EMB before, but I see they changed the status to OPEN and INTERNAL ASSIGNED. So there is a little hope 😉 Have a nice day, to you all. And enjoy D11.3 as much as I do. There are lot's of improvements!!!
  25. emileverh

    String literals more then 255 chars

    Nice your code... I can not use it! Because of a third party tool. I don't know how many Delphi programmers are here in this world. A few thousand sure, but if we sum all the time spend on this ( for me stupid) limitation lot's of money is thrown away. Is it a show stopper? No. Is it critical? No. Are there workarounds? Yes. The only thing I hope is that EMB changes this old fashion limitation.
×