Delphi Developers Archive

Hello, I'm a Pascal developer since Turbo Pascal 3.0 and currently developing  uniGUI project.

Delphi 10 has Windows XP compatibility issues. However it works normally after pressing OK.

Hello guys, It is very interesting, I was afraid about how to hide private REST API calls from Android binary decompilation (since this type of reverse-engineering is successful for many applications hosted at Google Play), but Delphi built applications are immune to APK decompilation once there is no Java code generated into classes.dex, tools such as ShowJava, jadx, Android APK Decompiler are not able to catch any usable code from the logic of your application. Your application is more safe than Android JDK (traditional way) built ones and Xamarin built ones which also suffer on similar problem (these apps have a *.dll file attached into *.apk that contains the .NET's IL code, the tool ILSpy easily shows the decompiled C# code).

New license manager = #fail I uninstalled the preview of 10 then did a full install from the provided link in the email. Just spent the last 4+ hours installing it. When it first loaded, the splash screen still said that I was using the preview edition. So I waited until it loaded then went to the License Manager to enter in my XE8 license as instructed and the manager said I had reached my limit of installs. OK, this is the FIRST install of RAD Studio 10, so the manager has made an error somewhere. It should know that I am installing 10 and not count it towards my XE8 installs, but apparently it is. Gee, have I mentioned before how much I love the license manager?!

Bummer, went to register Seattle so I could install, and I get "Subscription not started yet".  I just removed XE8 so that I don't have stacks of IDE's installed, but that product was registered.   I tried their "I have a valid license file", I see XE8's serial number as un-registered.  I tried the "register" option on the "Embarcadaro License Management" screen, it validates, but still can't install.   I paid for a year subscription back in July.   I have submitted a support ticket.  I wanted to play around with it before I go on the road for a couple days.   I guess that's out of the question now.

Bummer, went to register Seattle so I could install, and I get "Subscription not started yet".  I just removed XE8 so that I don't have stacks of IDE's installed, but that product was registered.   I tried their "I have a valid license file", I see XE8's serial number as un-registered.  I tried the "register" option on the "Embarcadaro License Management" screen, it validates, but still can't install.   I paid for a year subscription back in July.   I have submitted a support ticket.  I wanted to play around with it before I go on the road for a couple days.   I guess that's out of the question now.

I wrote this prime number finder. for some odd reason, it only works for even numbers, and not odd ones that I know aren't prime. what is it I'm missing? http://pastebin.com/HvXunX8f

Delphi 10 Seattle, frankly this is somewhat embarrassing. https://quality.embarcadero.com/browse/RSP-11709 Marco said, "Per-monitor DPI support is part of the VCL now, and also leveraged by IDE". On the face of it, no testing was done.  And it's not just the options dialog, although that is egregious. Look at the desktop combo too. Not good.

Changed the layout a bit. Not a final decision, but it's resizeable!

RAD Studio 10 Seattle Easter Egg Open the Help, About from the menu. Hold down the Alt key and type TEAM for the team list... then doubleclick in the scrolling team list... Voila - updated easter egg :) On second thought - did someone slip and leave a codename where the product name should have been in the team picture? Alt-KUDOS and Alt-GUNGLA is also still there.

mORMot welcomes Delphi 10 Seattle aka DX! http://blog.synopse.info/post/2015/08/31/Delphi-10-DX-Seatle-is-out%2C-mORMot-supports-it

RAD Studio 10, yet another naming convention change. And it looks like we skipped 9 all together. Argh. Has anyone at Embarcadero told marketing that developers like things consistent? Constant change is not our friend. Just my $.02

TChromeTabs has been updated for Delphi 10 -  https://github.com/norgepaul/TChromeTabs/

HTML Library updated - added RAD Studio XE10 Seattle support. (also added support for Delphi 5, so now all Delphi versions from 5 to XE10 are supported). Registered users can download updated version from the same location. XE10 trial is also availabe. Please note that htmlutils unit was renamed to htutils to avoid conflict with Getit IDE package. http://delphihtmlcomponents.com/ http://delphihtmlcomponents.com

The bounty of 200 reputation for this question is valid for  4 more days. It would be a shame if it just expired. http://stackoverflow.com/q/32058232/49925

Delphi 10 Seattle, the new release of the product, it out. See the product page,  http://www.embarcadero.com/products/delphi , the press release,  http://www.embarcadero.com/press-releases/million-developers , and more info in the launch webinar on Wednesday. http://www.embarcadero.com/products/delphi

Delphi 10 Seattle, the new release of the product, it out. See the product page,  http://www.embarcadero.com/products/delphi , the press release,  http://www.embarcadero.com/press-releases/million-developers , and more info in the launch webinar on Wednesday. http://www.embarcadero.com/products/delphi

Does a specific reason exist why I should not always use a TIdSSLIOHandlerSocketOpenSSL instance as IOHandler to my TIdHTTP instance or should I always check was I requested to get a https or a http site?

We're pleased to announce the release of TMS Flexcell DLL, a DLL based interface to read, write, manipulate .XLS, .XLSX files and generate PDF or HTML reports from any Windows programming language or application scripting!  Fore more information go to http://www.tmssoftware.com/site/flexceldll.asp http://www.tmssoftware.com/site/flexceldll.asp

OmniThreadLibrary now supports the Delphinus package installer.

How cool would it be if I could just add something like [DebuggerStepThrough] (see https://msdn.microsoft.com/en-us/library/system.diagnostics.debuggerstepthroughattribute.aspx ) on a method without littering the source code with defines (more info http://www.codeproject.com/Articles/111965/Tips-on-Debugging-Using-DebuggerStepThrough-attrib ). Why? So I could easily exclude all one-liner getters and setters to prevent jumping into them half the time without cluttering up the code.

How cool would it be if I could just add something like [DebuggerStepThrough] (see https://msdn.microsoft.com/en-us/library/system.diagnostics.debuggerstepthroughattribute.aspx ) on a method without littering the source code with defines (more info http://www.codeproject.com/Articles/111965/Tips-on-Debugging-Using-DebuggerStepThrough-attrib ). Why? So I could easily exclude all one-liner getters and setters to prevent jumping into them half the time without cluttering up the code.

Delphi® 10 Seattle http://docwiki.embarcadero.com/RADStudio/Seattle/en/Main_Page

Roman Yankovsky I think it's you the guy behind FixInsight, right? I was thinking that the following piece of code should be signaled with a warning of non-portability: for I := 1 to Length( S ) do begin   C:-= S[[ I ];  // stuff here done with C end; and the suggested replacement should be: for C in S do begin   // stuff done with C end; This would allow to flag all string cycles that aren't portable to FMX and the ARC compilers. What do you people think? Agree/Disagree? I think the for in has been around for enough versions that this is actually doable and desirable. A

I use this all the time, especially when installing components.  It will index everything on your hard drive (it indexes without being noticed, at least I haven't noticed it), and unlike Windows 7, 8.x or 10 search functionality will actually find what you're looking for.  You can open file at path, as well as many other options.   Great for duplicate dcu's created in error, or when you click to navigate and Delphi won't find the unit you're looking for, or when "dcu" not found type of problems.   I need to find an avatar with this thing now that won't scare everyone! ;) http://www.voidtools.com/

New RAD Studio is "Seattle", See it with your eyes http://docwiki.embarcadero.com/Libraries/Seattle/en/Main_page :D Am I doing something wrong saying about it before the official release? :( http://docwiki.embarcadero.com/Libraries/Seattle/en/Main_page

Want to visit authors Homepage? The Project Page? Report a Problem with the Package to the Author? There are buttons for that! The Homepage is a property of each Repository on Github. Projectpage is ofcourse the RepositoryPage on Github. And the Reportbutton takes you to the Issue page on Github (If the User disabled Issues, this button is disabled, too) PS: clear the cache in %LocalAppdata%\Delphinus

Hello all, I am porting a small section of code from CSharp to Delphi but am encountering some access violation at some particular lines (if (smatch.Groups['BaseHex'].Length 0) then) and (if (smatch.Groups['BaseOct'].Length 0) then). Here is my Pascal Port http://pastebin.com/KkbzADut and the original CSharp port http://pastebin.com/f2qGuPCS Thanks http://pastebin.com/KkbzADut

Hello all, am pretty lost here. could someone please show me how to implement an  Iequatable and Icomparable for various types in a record in delphi? below is an example code i am trying to convert from csharp to delphi but i want to use a record instead of  class public class test :         IEquatable , IEquatable , IEquatable , IEquatable , IEquatable ,         IComparable, IComparable , IComparable , IComparable , IComparable , IComparable     {          public bool Equals(int n)         {             return this == n;         }         public bool Equals(uint n)         {             return this == n;                      } } Any Help will be appreciated.  Thanks.

Hey guys, When I switch on $TypedAddress Compiler Directive, it is no longer possible to create an exception from resourcestring. The code below doesn't compile anymore: EArgumentNilException.CreateRes(@SArgumentNil_NilValue_Collection); Neither on Windows nor Android. Many thanks :D

(XE6) when i load a string from Json, and its a path like .\\Folder\\FolderB it is loaded as .\Folder\FolderB But when writing, it is written as .\Folder\FolderB (which is incorrect), too? Didn't find the source where it replaces the double \\ with \ on reading. Where does that happen?

Wouldn't it be cool if the IDE could blend include files directly into the source editor? Preferably expandable just like regions. And editable of course.

Wouldn't it be cool if the IDE could blend include files directly into the source editor? Preferably expandable just like regions. And editable of course.

http://stackoverflow.com/questions/32274398/is-there-a-way-to-force-the-delphi-command-line-compiler-to-output-english-text

Does anyone know if Android Auto systems typically use ARM or Intel under the hood?  I'm interesting in finding out if we could make Delphi apps that run in a car. (Side note: I don't do much Delphi-for-Android development, but I do get the impression we either need an Intel target, or even better a native (Java VM) target, stat.) Google released an Android Auto "Desktop Head Unit" today for testing car apps in a desktop, but of course that doesn't include any requirements that I know of for the underlying hardware CPU.   https://developer.android.com/training/auto/start/index.html?utm_campaign=DHU-827&utm_source=dac&utm_medium=blog#test-it-dhu https://developer.android.com/training/auto/start/index.html?utm_campaign=DHU-827&utm_source=dac&utm_medium=blog#test-it-dhu

Whoever tells me how I can turn off stopping on exceptions during debugging on project basis (without manually going to the global IDE options and turn it off and remembering to turn it on later again of course) by exception type or creates some plugin, unit, whatever to achieve that, will be my hero!

Smooth scrolling on Android HTML Library scrolling on Android is now as smooth as in native applications. But yes, it is still an FMX control and 100% pure Delphi code. Test application: http://delphihtmlcomponents.com/AndroidScroll.apk Added: there is rendering issue on some devices - text looks blurry. It seems that FMX do not return a real screen scale - wiil be fixed.

Parallel Studio XE 2016 https://software.intel.com/en-us/Intel_Parallel_Studio_XE_2016 Name conflict? https://software.intel.com/en-us/Intel_Parallel_Studio_XE_2016

Hi guys, I need to create one dynamic form and I need to place one button and assign onclick event to that button, how to I assign that event in my coding.  unit Unit1; interface uses   Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,   Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.Buttons, Vcl.DBGrids, Data.DB,Bde.DBTables,   Vcl.grids; function Dynamicform(OwnerFrom : TComponent;DetailName : string;parentcom : TWinControl):Boolean; implementation function Dynamicform(OwnerFrom : TComponent;DetailName : string;parentcom : TWinControl):Boolean; var FDetailForm : TForm;     dButton : TBitBtn; begin   with OwnerFrom do   begin      if not Assigned(TForm(OwnerFrom.FindComponent(DetailName))) then      begin         TForm.Create(OwnerFrom).Name := DetailName;         FDetailForm := TForm(OwnerFrom.FindComponent(DetailName));         with FDetailForm do         begin           Position := poOwnerFormCenter;           BorderIcons := [...

Hi guys, I need to create one dynamic form and I need to place one button and assign onclick event to that button, how to I assign that event in my coding.  unit Unit1; interface uses   Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,   Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.Buttons, Vcl.DBGrids, Data.DB,Bde.DBTables,   Vcl.grids; function Dynamicform(OwnerFrom : TComponent;DetailName : string;parentcom : TWinControl):Boolean; implementation function Dynamicform(OwnerFrom : TComponent;DetailName : string;parentcom : TWinControl):Boolean; var FDetailForm : TForm;     dButton : TBitBtn; begin   with OwnerFrom do   begin      if not Assigned(TForm(OwnerFrom.FindComponent(DetailName))) then      begin         TForm.Create(OwnerFrom).Name := DetailName;         FDetailForm := TForm(OwnerFrom.FindComponent(DetailName));         with FDetailForm do         begin           Position := poOwnerFormCenter;           BorderIcons := [...

You are kindly invited to join the OmniThreadLibrary spotlight presentation on September 3rd.

HI one of the good things about programming: when you get something to work... like an 8 channel 1 wire relay :). Could be used for home automation..could control it via a phone app (using tethering) :)

Happy licensing! As of today Delphinus is licensed under MPL-2.0, additionaly i licensed AsciiImage under MIT! Ofcourse, Delphinus offers Licenseinformation (if available) for each package!

Any Spanish-based Delphi developers here?  Embarcadero is hiring into the Alicante team, and the job description looks like you'd be working on Delphi.   http://www.embarcadero.com/company/careers-in-spain#delphidev If I wasn't working on Parnassus stuff (plugins etc - yes, there are more coming) I'd be tempted to apply myself - I hear Alicante is a lovely city, and I have friends just up the coast in Valencia and Barcelona. (Also I know there are lots of native German speakers here. There's also a position for a German speaker for localization. No more going on once-yearly holidays to Majorca - you'd live right next door!) http://www.embarcadero.com/company/careers-in-spain#delphidev

How can I use DSharp with XE8? I tried to install the XE7 package, but it broke an IDE.

So after thinking about the license stuff, i think i am going for MPL-2.0 for Delphinus. Which means you can use it(and compile it into) commercial software without making your Productcode available. You only have to share the source of Delphinus as Sourcecode in someway(as it states make it available, a link to the repository fullfills this, right?). I don't think restricting the project to much is good, but i want that people see what (and who) powers a specific mechanic in the background. Anybody has any concerns or things i overlooked here?

Just added sample GUI for UnivDisasm: https://github.com/MahdiSafsafi/UnivDisasm https://github.com/MahdiSafsafi/UnivDisasm

TMS Cloud Pack v3.2.0.0 released with access to 3 new services!  - New: TAdvGMail: component for access to Google Mail service - New: TAdvGSheets: component for access to Google Sheets service - New: TAdvTrello: component for access to Trello service For evaluating users, a fully functional trial version for Delphi & C++ Builder can be downloaded at: http://www.tmssoftware.com/site/cloudpack.asp

Blog post "Two More Days for the RAD Studio 2015 Developers Survery" at http://blog.marcocantu.com/blog/2015-august-two-days-for-survey.html (includes some tidbits form it) http://blog.marcocantu.com/blog/2015-august-two-days-for-survey.html

Delphi incorrectly adding units to a uses clause. Any ideas? http://stackoverflow.com/questions/32245375/stop-delphi-automatically-adding-units-incorrectly http://stackoverflow.com/questions/32245375/stop-delphi-automatically-adding-units-incorrectly

Test insight, delphi Xe7, Windows 10 I have a problem with test insight on my machine. If there is a compile error in the test project the IDE hangs total. I need to kill the process. Anybody knows a solution?

Good Morning!        I am having trouble getting tethering to work. My goal is to have a desktop app ask a mobile app to send it a copy of it's data, compare said data to the desktop's data, then CRUD the data and send it back to the mobile app.           I have tried both remote actions & remote resources but I cannot get the mobile app to respond.        Can someone show me how to do this?        This http://www.malcolmgroves.com/blog/?p=1854#comment-33558 was my main reference.        My testing projects are here ftp://ftp.greatdaydan.com/whatever/Desktop_Desktop_Tethering.zip if yu  would like ti take a look.              Cya...Dan'l

What about having a MongoDB FireDAC driver, and complex data types in a grid? http://community.embarcadero.com/write-blog-post/entry/coming-soon-to-rad-studio-firedac-nosql-driver-for-mongodb

What about having a MongoDB FireDAC driver, and complex data types in a grid? http://community.embarcadero.com/write-blog-post/entry/coming-soon-to-rad-studio-firedac-nosql-driver-for-mongodb

I tried to download Nick's latest book from here http://cc.embarcadero.com/item/30323 but get a message saying that I don't have access. I'm on SA (XE8 Pro) but haven't installed XE8 yet, which I suspect might be the source of the problem. Anyone else seen this? Strange thing is I can download Marco's no problem. Thanks, Bob http://cc.embarcadero.com/item/30323

So the recent talk about anonymous functions reminded me... Why is TFunc not declaring the arguments as const? That is, why TFunc = reference to function(Arg1: T): R; instead of TFunc = reference to function(const Arg1: T): R; I must be missing something...

To all Delphi developers. Why you need to choose ‪‎UniDAC‬ and Secure Bridge for your next project.  An honest ‪Delphi‬ developer opinion. http://goo.gl/hSEQtf

Anonymous Method constraints Due to the occasional shooting of foot due to how capture works, I wish there was a way of optionally constraining references for an anonymous method, so that I could enforce local references only. type   TFilterMethod = constrained reference to function (const Item:T):Boolean;   TInstanceList = class     property function Filtered(Filter: TFilterMethod ):TInstanceList ;   end; var   SomeRef: TQualifier;   List: TInstanceList ;   Element: TThing; begin   ...   // compiles   for Element in List.Filtered(function (Item: TThing)     begin       Result := Item.Qualifier in [This, That]);     end)   do begin     ...   // should not compile - but error on "reference outside method not allowed for constrained methods   for Element in List.Filtered(function (Item: TThing)     begin        Result := (Item.Qualifier = SomeRef);     end)   do begin     ...

It seems like a new version is looming :) From the blog post by Tim Del Chiaro  Incredible Windows 10 Support Delphi and C++Builder developers will be able to rapidly update their VCL and FMX applications to take full advantage of the Windows 10 wave. Double the IDE Project Power The product and build management system has been re-architected which effectively doubles the project size capacity resulting in higher stability and performance when dealing with large projects, particularly multi-platform projects. Quality, Stability, and Documentation Major changes and improvements have been made to the development, testing, and documentation. RAD C++ for Windows 10 Introducing the world's first CLANG based C++ compiler for Windows and mobile with RAD PME extensions for rapid Windows and Cross-Platform development, tight integration with VCL for Windows and FMX cross-platform frameworks, C++11 language support and backward compatibility. and much more! http://delphi-insider.blogspot.no/...

Hi! I have a database ' people ' that may have duplicate records. I found this function (StringSimilarityRatio) to find out how similar two strings are. Is there a way I can use it inside an ADOQuery? http://www.delphiarea.com/articles/how-to-match-two-strings-approximately/

XE8-compatible DS Pack? I've got an XE2 installation of DS Pack here, and I'm not sure where I got it from. All the googling I've done so far seems to find older versions of the code with no obvious XE-onwards support. The code.google.com page is readonly (obviously, given the status of that service) but it's not obvious where the project might be (if anywhere). Anyone got DS Pack installed on XE8? I guess I can copy my XE2 installation and start fiddling around, but if there was a slightly newer version of the library somewhere I'd like to start with that, if you see what I mean. Thanks!

RAD in Action - are these available beyond the scheduled live podcast? Tomorrow's looks interesting but the timing isn't good for me.

This is off topic, since it's to do with C++ Builder, but it is very cool news .  The C++Builder 32-bit compiler has been out of date for a long time, while the 64-bit compiler has been based on Clang and supporting far more modern C++.  This is a "new" 32bit compiler, bringing both up to the same modern tech - my guess is it's the 64-bit compiler now supporting 32bit - and supporting modern C++ language standards.  (Not C++14 yet, but a good sight better than it used to be.)  I use C++ and I have been wanting to see the 64-bit Clang compiler ported back to 32bit for ages, which I think this is.  I am legitimately very excited. The point is that Embarcadero is doing some very nice stuff this release, and I wouldn't want this particular thing to be missed just because it's not Delphi.  It is fantastic. http://community.embarcadero.com/write-blog-post/entry/coming-soon-to-c-builder-standard-c-11-for-win32 http://community.embarcadero.com/write-blog-post/entry/co...

Open Delphi, select a component, move to the Object Inspector, select the filter box, and start typing... (Coming soon, among other Object Inspector improvements). Filters anywhere in the property and event names (not only at the beginning). http://community.embarcadero.com/write-blog-post/entry/coming-soon-to-rad-studio-enhanced-designer-experience

Open Delphi, select a component, move to the Object Inspector, select the filter box, and start typing... (Coming soon, among other Object Inspector improvements). Filters anywhere in the property and event names (not only at the beginning). http://community.embarcadero.com/write-blog-post/entry/coming-soon-to-rad-studio-enhanced-designer-experience

Done, breaking changes for Delphinus comitted. You have to rename the json files to be Delphinus.Info.json and Delphinus.Install.json https://github.com/Memnarch/Delphinus/wiki/Publishing-your-Project-for-Delphinus Delete the Github-Folder at %LocalAppdata%\Delphinus\Github to avoid problems. And uninstall all components you installed using Delphinus Packages which use the old name scheme are not visible anymore!

Has anyone tried this for a laugh ?? Go to:   http://docwiki.embarcadero.com/RADStudio/XE8/en/Service_Applications Now try to re-create their example: To create the example: 1. Choose File > New > Other and select Service Application from the New Items dialog box. The Service1 window appears. 2. From the Internet category of the Tool palette, add a ServerSocket component to the service window (Service1). 3. Add a private data member of type TMemoryStream to the TService1 class. The interface section of your unit should now look like this: I failed at 2. as I cannot find the ServerSocket on the Internet category ( or any other category ). Am I missing something ?? Or is the documentation wrong ? http://docwiki.embarcadero.com/RADStudio/XE8/en/Service_Applications

Currently thinking about adding a License.txt to the Delphinus Packagemanager. Curently standing between http://choosealicense.com/licenses/apache-2.0/ and http://choosealicense.com/licenses/gpl-3.0/ Tending towards gpl v3, as others may not sublicense and must provide source to their software when using my source. any Ideas/Input?

Doubt Socket or IOHandler: Hello such, I have a question and maybe I can clarify the, I do not quite understand what would be the difference between using IdTCPClient1.Socket.WriteLn or IdTCPClient1.IOHandler.WriteLn if I understand the second can encode the message but other than that, in my case I do not need, what, according to you It is the best option ?. This designing an application which has communications customers android and I do them by IdTCPClient1.Socket but the curious thing is when and by chance, two clients simultaneously connect to the server in any of the clients the message "Connection Closed Gracefully" appears . I been reading that the components in the INDY the server creates a thread automatically for each client that connects what makes me think that the problem is not in the communication between clients and the server because you can not it handle customers if not perhaps I use the databases that perhaps this "slowing down" communications, ...

Bonjour, We develop a software connected to a DATABASE FIREBIRD in DELPHI XE7 (with the VCL) We want to develop (with FIREMONKEY) small applications on IOS and Android with a connection to the database FIREBIRD. Do you know where I can find information (and/or examples) about this subject? And perhaps do you know, what  is the best solution to connect an IPhone with a database FIREBIRD on a server?

For those which already submitted packages or plan to submit packages to Delphinus, keep an eye on the wiki. During this day i'll add commits which will require to prefix the json files you added to the repository with delphinus, resulting in Delphinus.Info.json and Delphinus.Install.json to avoid conflicts and better seperation.

Looking forward: http://community.embarcadero.com/blogs/entry/coming-soon-to-rad-studio-twice-the-ide-memory-brings-a-new-level-of-productivity-performance-and-stability http://community.embarcadero.com/blogs/entry/coming-soon-to-rad-studio-twice-the-ide-memory-brings-a-new-level-of-productivity-performance-and-stability

Un-Win32-ing your non-visual code? We have a lot of lib code which has evolved on the Windows platform for years, and I am wondering what would be the best approach for making the code platform agnostic. Has anyone been down this road?  What approach did you use? What pitfalls did you stumble on?

Do we get Delphi XE9 next week?

Windows Hosting Recommendation  I'm considering purchasing Elevate Web Builder (  http://www.elevatesoft.com/products?category=ewb ) and need to install & run the Elevate Web Builder Server which is an ISAPI.DLL.  I'm looking for recommendations for a Windows Web Hosting company that will let me install my own DLL's.  Thanks in advance.

I am currently writing a Service application and have been having a few issues ( https://plus.google.com/108221563060569563805/posts/c4nVPaK6hth ). I decided to use OutputDebugString ( as the debug method I was using did not appear to be catching an error ). I stuck the OutputDebugString at the top and bottom of every relevant procedure, So: ServiceAfterInstall, ServiceStart and ServiceStop ... and in the DPR at the point when everything is being constructed. I don't seem to be able to get beyond Starting the Service. When I install the Service the OutputDebugString debug appears as I would expect. However, as soon as I start the Service it is stopped automatically with a message:  "The Unity Express Alerts service on Local Computer started and then stopped. Some services stop automatically if they are not in use buy other services or programs."  I looked in the Event Viewer and the log states "Service failed on start: list index out of bounds[0]".  However, wh...

I am currently writing a Service application and have been having a few issues ( https://plus.google.com/108221563060569563805/posts/c4nVPaK6hth ). I decided to use OutputDebugString ( as the debug method I was using did not appear to be catching an error ). I stuck the OutputDebugString at the top and bottom of every relevant procedure, So: ServiceAfterInstall, ServiceStart and ServiceStop ... and in the DPR at the point when everything is being constructed. I don't seem to be able to get beyond Starting the Service. When I install the Service the OutputDebugString debug appears as I would expect. However, as soon as I start the Service it is stopped automatically with a message:  "The Unity Express Alerts service on Local Computer started and then stopped. Some services stop automatically if they are not in use buy other services or programs."  I looked in the Event Viewer and the log states "Service failed on start: list index out of bounds[0]".  However, wh...

Originally shared by Boian Mitov Internet of Things with #Visuino, #Arduino and #Delphi article!

Let me introduce the FixInsight 2015.08 release. * Support for {$INCLUDE } directives * Support for search path * Introduced rule W524 ("Generic interface declared with a GUID") * Introduced rule W526 ("Pointer to a nested method") * Improved rules W504, W521 * Improved parser * Minor fixes http://sourceoddity.com/fixinsight/download.html http://sourceoddity.com/fixinsight

Looking for help with scanning EAN-13 barcodes from Android app WITHOUT relying on 3rd party apps (ie. Barcode Scanner by ZXing). Found "Mobile Vision API" by Google but I need some advice on how to use this from my app. Can anyone offer some advice please? https://developers.google.com/vision/barcodes-overview

The latest "Language Trends on GitHub" was released... https://github.com/blog/2047-language-trends-on-github https://github.com/blog/2047-language-trends-on-github

Embarcadero NNTP forums are finally fixed. Running on new hardware and software. Enjoy :) https://forums.embarcadero.com/

Hi Guys I am trying to write a Service application in win32 on XE7 and so far I think I have pulled most of my hair out in frustration. I don't seem to get beyond Starting the Service and as soon as I start it is stopped automatically with a message: "The Unity Express Alerts service on Local Computer started and then stopped. Some services stop automatically if they are not in use buy other services or programs." I looked in the Event Viewer and the log states "Service failed on start: Access violation at address 00A750F4 in module 'AlertService.exe'. Read of address 00000004". Does anyone know how I can debug this ??

I Unicode Originally shared by Aleatha Parker-Wood

Does anyone has used the TPath on iOS.  I have been developing on Windows with FMX and all my custom component uses TPath to draw on canvas. The rendering is poor.  I have an IPad Air and the rendering of the TPath does not use anti-aliasing, which make the rendering very ugly. Any hint on what I should do?

Does anyone has used the TPath on iOS.  I have been developing on Windows with FMX and all my custom component uses TPath to draw on canvas. The rendering is poor.  I have an IPad Air and the rendering of the TPath does not use anti-aliasing, which make the rendering very ugly. Any hint on what I should do?

I have heard around the traps that if the .NET stuff within the IDE is turned off, it will work for a bit longer - ie, the .NET stuff is fairly memory hungry - Is that true? How do I do this in XE? Other versions of XE7/8 (if it is different)? What gets turned off (other than the refactoring menu item/tools)?

I seem to be having an issue with a function I created for a numerology program I wrote. when I wrote the function as part of the program, it works. when I decided to create the function as a separate function, I find that it doesn't work at all when it's called.  I feel that it almost works.  am I confusing function for procedure or am I missing something? http://pastebin.com/gTycxGfQ

Originally shared by George “ARGB32” Bakhtadze I-Pascal v0.98 has been released. Changes: * missing method declaration/implementation error highlight + quick fix  suggestion * missing routine implementation error highlight + quick fix suggestion * missing routine declaration in interface section info highlight + quick fix suggestion * method/class implementations/descendants search (arrow markers on left gutter) * super method search * ancestor class search * several fixes to parser (mostly bugs reported by the community), .dcu decompiler and completion http://www.siberika.com/siberika/ipascal.htm

Hey guys. Is there a way of using TEnumerable (for example, TList ) instead of IEnumerable in the function string.Join()?

Something new: http://memnarch.bplaced.net/blog/2015/08/delphinus-packagemanager-for-delphi-xe-and-newer/ http://memnarch.bplaced.net/blog/2015/08/delphinus-packagemanager-for-delphi-xe-and-newer

Thanks to our little mORMot, it is not "SQL vs NoSQL" - but "SQL AND NoSQL". You know certainly that our mORMot Open Source framework is an ORM, i.e. mapping objects to a relational / SQL database (Object Relational Mapping). You may have followed also that it is able to connect to a NoSQL database, like MongoDB, and that the objects are then mapped via an ODM (Object Document Mapping). In fact, the framework is able to add NoSQL features to a regular relational / SQL database, by storing JSON documents in TEXT columns. http://blog.synopse.info/post/2015/08/23/SQLandNoSQL

JFYI No info for it in goolge. Suppose you have installed a package (P1) containing a class  (C1) with   an abstract constructor.  When you will try to install another package (P2) containing a class C2(C1) there will be "Procedure entry point ... could not be located in P1.bpl" error.

Good Morning!    I have been reading Malcolm Grove's tutorial on tetheering. It has helped me understand tethering.    Question: Can an app created with DXE7 connect to one created with DXE8?    I have the eval version of XE8 and I own a copy of XE7pro.    I have been looking at using tethering to synchronize my App's data with it's desktop brother. I have not been able to get my XE8 Win 32 'app1' to connect to the XE7 Win 32 'app2'. I have made sure that all are using the same Group name.    Any advice? Thanks...Dan'l

Hey guys, Some days ago I started a project of implementing data structures just for ARC-enabled platforms, my initial idea was to not mix the new memory management with the old one, all objects added are handled by reference counting and I don't rely on Free calls. The first data structure implemented was a Queue, more (priority queues, hash maps) will come soon, the code is available at https://github.com/horaciojcfilho/Kelloggi/blob/master/GoSeaHorse.Kelloggi.pas#L132-L283 . This implementation has some advanges over the RTL's, such as a constructor for set the initial capacity, Contains function, defensive coding around enumerator usage, and slightly smaller binary. It was tested on Android 4.1 and 4.4 devices and worked :D Without Free calls, the world is more happy :D Once I am new at Delphi programming, any sort of help is apreciated. Thanks a lot :D

Hey guys, I am wondering whether exists any performance penalty (or any kind of penalty) in changing this code: if IsManagedType(T) then     CopyArray(Pointer(@Destination[DestinationIndex]), Pointer(@Source[SourceIndex]), TypeInfo(T), Count) else     Move(Pointer(@Source[SourceIndex])^, Pointer(@Destination[DestinationIndex])^, Count * SizeOf(T)); to this code: if IsManagedType(T) then     CopyArray(@Destination[DestinationIndex], @Source[SourceIndex], TypeInfo(T), Count) else     Move(Source[SourceIndex], Destination[DestinationIndex], Count * SizeOf(T)); I didn't understand the need of an untyped pointer casting. Thanks a lot :D

Our application write a lot of logs using simple AssignFile/Append/WriteLn/CloseFile routines. Everything worked just fine for a long time. But today we started to experience performace issues. The results of quick investigation showed us the problem is that Windows Defender scans our log file constantly. And if I add an exclusion for *.log files in its settings, everything is fine again. Perhaps MS pushed an update last night. I just wonder if anybody else has this issue?

there is not a problem in TPath.GetXXX ? like this one  class function TPath.GetDownloadsPath: string; var   LStr: array[0 .. MAX_PATH] of Char; begin   SetLastError(ERROR_SUCCESS);   if SHGetFolderPath(0, CSIDL_LOCAL_APPDATA, 0, 0,@LStr)= S_OK then     Result := LStr; end; Result is not initialized on a SHGetFolderPath error.

I see that after a long period of inactivity Nevrona look to be back and active. I have seen Thomas Pfister's blog post. I guess my question is, has anybody got any experience (positive or negative) with the new version? I have some projects that really could use updating to XE7/8 and have been waiting because I did not want to invest time in converting a lot of code based reports. TIA

Just a quick hi. Having just moved to California in early 1995 to work on a new project I found myself at the Moscone Center for the Delphi launch. Came away with version 0.9 and had some tests up almost immediately. Delphi made the decision for our project (quite a lot of legacy Modula/2 code) very easy. Still with it, and don't regret a minute. We use it on big scientific instruments and still love the sped of development, compilation, but most of all execution.

Hi guys!  New IntraWeb version, 14.0.45. This version contains one of the most requested features ever: JavaScript dialogs and browser-modal windows. You can download a pre-compiled demo from our server, so you can see it in action:  http://downloads.atozed.com/intraweb/demos/NewDialogsDemo.zip http://atozed.com/IntraWeb/Blog/20150818.EN.aspx

Hello guys, Is there a way to a interface inherit from many other interfaces? For example: public interface UserMethods { } public interface WallMethods { } public interface OpenreduAPI : UserMethods, WallMethods { } I can do this using C# and Java, but I was not able to achieve something similar with Delphi :( I tried this: IUserMethods = interface end; IWallMethods = interface end; IOpenreduAPI = interface(IUserMethods, IWallMethods) end; But it doesn't compile, multiple interface inheritance is very useful for compose REST API calls :D Many thanks :D

http://community.embarcadero.com/blogs/entry/coming-soon-to-rad-studio-ios-64-bit-universal-app-debugging

I'm very happy to announce the  release of UnivDisasm. A powerful x86 disassembler and opcodes analyzer. The idea started when I was learning Intel AVX512 instructions set .And I realized that I need a powerful x86 disassembler to decode AVX512 opcodes. Unfortunately a few libraries was available and in the most case they give a wrong memory size or wrong instructions length (they were buggy),not mentioning that all was coded using c programming language .So in the summer of 2014,I started implementing zDisAsmLibrary project, However things get dirty and I got a buggy  disassembler library too. It was good for legacy x86 instructions but not for AVX, so I dropped the project and started with a new one hopping that will be much better. I spent mostly all the time between the summer of 2014 and this one collecting and reading available resources till I decided to start the real coding staff (this Mai). I know you may get bored when you are reading this story…Ok, I will stop! Here is ...

Small teaser of TeeBI. This is the custom web server calculating a query and returning a chart. The only dependencies are TeeChart and Indy http web server component. Data is in column-oriented, memory-based custom format for speed reasons, no database or FireDac, etc are necessary. Data is imported from many sources (excel, text files, firedac or any other datasets, etc) to the custom format, which is then transparent to the user apps. The web server is optional if data is not remote, and it can also return binary streams to normal desktop (vcl or fmx), or mobile apps (fmx). A table of 2000x5 cells takes 180msec via web. For visual display, an fmx or vcl dbgrid easily handles 1 or more million rows with a custom "TBIDataset" linked to an in-memory data, allowing grouping, filtering and sorting using complex expressions involving columns from the same table or foreign-key(s) fields.  This speed is the basis for a next-coming set of machine-learning and data-mining algorithms,...

Nice bug that took me a lot of time to figure out :) type   TTest = class     s: string;     constructor Create(s: string);   end; constructor TTest.Create(s: string); begin   Self.s := s; end; var   t: TTest; procedure NiceBug(const s: string); begin // here RefCount(s) = 1 because of "const" keyword   t.Free; // RefCount(s) = 0 ! // at this point s is no more allocated  and should not be used anymore !   ShowMessage(s); end; procedure TForm1.Button1Click(Sender: TObject); begin   t := TTest.Create('Hello');   NiceBug(t.s); end;

Can anyone help me with this issue please? This project can not be compiled (Delphi XE8 Update 1): http://www49.zippyshare.com/v/Ws9cdzJY/file.html [dcc32 Fatal Error] uMapParallel.pas(94): F2084 Internal Error: C27720 Pastebin: http://pastebin.com/RwZCq4Z4 http://www49.zippyshare.com/v/Ws9cdzJY/file.html

Title

Coming soon to Delphi: Support for Android services:  http://community.embarcadero.com/blogs/entry/coming-soon-to-delphi-execute-background-tasks-with-android-services http://community.embarcadero.com/blogs/entry/coming-soon-to-delphi-execute-background-tasks-with-android-services

Coming soon to Delphi: Support for Android services:  http://community.embarcadero.com/blogs/entry/coming-soon-to-delphi-execute-background-tasks-with-android-services http://community.embarcadero.com/blogs/entry/coming-soon-to-delphi-execute-background-tasks-with-android-services

Hi everyone, I am new in Delphi developer, I need to create my application using MVC framework, please guide me. My application is fully based on Server-Client concept.

Hi everyone, I am new in Delphi developer, I need to create my application using MVC framework, please guide me. My application is fully based on Server-Client concept.

Hi all. How can I cast TArray to IEnumerable ? I need this to avoid duplicate code: class function TCheck .Every(Source: IEnumerable ; Lambda: TPredicateRef): Boolean; var   X: T; begin   Result := True;   for X in Source do     if not Lambda(X) then       Exit(False); end; class function TCheck .Every(Source: TArray ; Lambda: TPredicateRef): Boolean; var   X: T; begin   Result := True;   for X in Source do     if not Lambda(X) then       Exit(False); end;

Hi everyone, I'm having trouble using datamodule's public functions and variables on xe6, like I was used to do on D7, D2007 ...any ideas?

Hi everyone, I'm having trouble using datamodule's public functions and variables on xe6, like I was used to do on D7, D2007 ...any ideas?

The problem I was battling yesterday reduces to a single relevant question: How do you define a type for a class method pointer? This does not work:   TOFunc = function(const ID: Integer; Data: string): Integer of object; My workaround at present is not to use the class method, but to create a simple function in the unit which calls the class method. A one line wrapper. That then makes it possible to use this type: TMyFunc = function(const ID: Integer; Data: string): Integer; It would be much better, in the context of this requirement, to define the type for the class method. An example function is here:   TMyClassOne = class     class function Execute(const ID: Integer; Data: string): Integer;   end; Ultimately, the delegates will be declared in a const array of records. As written, when I attempt to call a delegate, it throws an AV.

Help here! After a firewall change here in my company, one of our TCP servers stopped binding the connections. I tried to hard force it to make a test but the incommig connections only works for the internal network.     IdTCPServer1.Bindings.Clear;      SHandle := IdTCPServer1.Bindings.Add;     SHandle.ip := '10.0.0.1'; // previous was 0.0.0.0     SHandle.Port := 10001;  Default was using bindings: 0.0.0.0:0 I need an advice here how can this happen? An old application using WinSocks works fine, this new on XE7 is no more woking.

New blog post:  http://community.embarcadero.com/my-posts/entry/2015-rad-studio-delphi-and-c-builder-developer-survey http://community.embarcadero.com/my-posts/entry/2015-rad-studio-delphi-and-c-builder-developer-survey