Jump to content

Lajos Juhász

Members
  • Content Count

    820
  • Joined

  • Last visited

  • Days Won

    11

Everything posted by Lajos Juhász

  1. Lajos Juhász

    Draw a path with winding fill mode?

    Most probably there was no QP ticket to implement this logic?
  2. Lajos Juhász

    Delphi dll ERROR_BAD_EXE_FORMAT

    You can find out in the Help: Use debug .dcus The debug DCUs contain debug information and are built with stack frames. When this option is checked, the compiler adds the debug DCU path to the search paths specified in Debug Source Path on the Embarcadero Debuggers page.
  3. Open a ticket at https://quality.embarcadero.com/ with the steps how to get Access Violation.
  4. Yes you can, before you compile the package uninstall all the packages that depends on that one. That should improve the situation. Unfortunately this is a "known" issue and impossible to report (as it's hard to make the required test case). PS. For a project group I even have a situation that some days Access Violation is almost every time triggered when I compile an application without runtime packages.
  5. Lajos Juhász

    namespace in XML

    uses Xml.XMLIntf, Xml.XMLDoc; procedure TForm1.Button1Click(Sender: TObject); var MyXMLDocument : IXMLDocument; FounderNode : IXMLNode; begin MyXMLDocument := TXMLDocument.Create(nil); MyXMLDocument.Active := true; MyXMLDocument.Version:='1.0'; MyXMLDocument.DocumentElement := MyXMLDocument.CreateNode('ab', ntElement,''); MyXMLDocument.DocumentElement.DeclareNamespace('xsi', 'https://www.guru99.com/XMLSchema-instance'); MyXMLDocument.DocumentElement.DeclareNamespace('xsd', 'https://www.guru99.com/XMLSchema'); MyXMLDocument.DocumentElement.SetAttributeNS('xmlns', '','MyString'); FounderNode := MyXMLDocument.DocumentElement.AddChild('founder'); FounderNode.NodeValue:='Krishna'; MyXMLDocument.SaveToFile('TestOne01.XML'); MyXMLDocument.Active := false; end; You have to set the version and MyString should be the 3rd parameter not the second one.
  6. Lajos Juhász

    Delphi 10.4 and MacOS 12.6

    There is a hope for Delphi 11 CE; my bet is that it's going to be released after Delphi 12. In order to learn more about the release date and roadmap I suggest to apply for a job at Embarcadero (that's the only legal way to get information).
  7. Lajos Juhász

    Can you mix VCL and FMX?

    You can access the windows handle using WindowHandleToPlatform. .
  8. Lajos Juhász

    Web-fonts v Desktop-fonts

    Google thinks this is a way to achieve it: https://www.advancedinstaller.com/forums/viewtopic.php?t=9364
  9. Lajos Juhász

    Web-fonts v Desktop-fonts

    This should be part of the installation of your application. For example Inno Setup can do it for you.
  10. Lajos Juhász

    custom fonts and sizes showmessage()

    Make your application DPI aware and the dialog should be same on every settings.
  11. Lajos Juhász

    AV with SetStyleFromFile at runtime

    It's not. There were Embarcadero webinars on this topic.
  12. Lajos Juhász

    How to??? uses {IF EXISTS}CodeSiteLogging;{ELSE};

    https://docwiki.embarcadero.com/RADStudio/Sydney/en/Conditional_compilation_(Delphi)
  13. Lajos Juhász

    Change 'DPI awareness' on runtime

    You can also test with regular VCL controls, the bug could be also in the DevExpress controls. With VCL placed on the form I don't have had placement problems.
  14. Lajos Juhász

    A gem from the past (Goto)

    It's fine until you get an exception, which will result in a memory leak.
  15. Lajos Juhász

    FireDAC.Stan.Async amBlocking causing threadlock

    Never had deadlock when using amblocking. On the other hand in D11 sometimes amCancelDialog will not work on query. You must change for the connection before and change back after the query is finished.
  16. (I believe earlier if you have had no valid licence there was no possibility to renew the previous one. The only option was to buy a new licence.)
  17. Lajos Juhász

    CodeInsight: Loading project [...] hanging

    I do get codeinsight loading, however almost never freeze delphi. Maybe try using process monitor to spy what code insight and / or the IDE is doing.
  18. Lajos Juhász

    Updating to newer version

    For third party and IDE settings you can use the migration tool (migrationtool.exe in the bin folder of the Delphi available for a couple of versions). As far as I know it will not download packages from getit, that could cause problems. I like to stay on the safe side and reinstall everything.
  19. Lajos Juhász

    Check duplicates in TADOQuery

    What is the metric for efficiency? You would have to iterate the query and for every record check the value in a memory structure if it's there you have duplicate if not insert into it. You can store the list in an array, list or a hash table.
  20. Lajos Juhász

    Cannot open project main form

    it's a bad idea, only English text should be saved as ANSI, otherwise you should always save as UTF-8.
  21. most probably in the part: ..... /////
  22. Lajos Juhász

    FIREDAC - Auto Generate SQL

    Hi, Usually I like to use TFDUpdateSQL to generate SQL's to update the database. Now I have a case where it would be easier to let FD generate the insert statement. However I fail to see how to customize the SQL. For some reason for Informix: function TFDPhysInfxMetadata.GetNameParts: TFDPhysNameParts; begin Result := [npCatalog, npSchema, npBaseObject, npObject]; end; In case of informix npCatalog that's makes no sense as it is the database name. npSchema is the user and that is a big no. I have a database with multiple users and rights. Is there a way to customize to generate the table name without prefixes? (When ApplyUpdates generates the insert or update statement.)
  23. Lajos Juhász

    ExtractFilePath v TDirectory.GetCurrentDirectory

    The program was started with a different current folder option, or the WIN API SetCurrentDirectory was called somewhere from the application.
  24. Lajos Juhász

    Access Violation using TVariantManager.VarToInt64

    You should check the implementation for that procedure: { ----------------------------------------------------- } { Variant manager support (obsolete) } { ----------------------------------------------------- } procedure GetVariantManager(var VarMgr: TVariantManager); begin FillChar(VarMgr, sizeof(VarMgr), 0); end; This will not fill the record properly.
  25. Lajos Juhász

    The Delphi 11.2 release thread

    Do not worry everything is going to work perfectly in the new 64 bit IDE.
×