Posts

Showing posts from September, 2018

How to unload app from memory when closing the app.

How to unload app from memory when closing the app. After confirming that the user wants to exit the app, I call "close". The app remains in memory as shown in the list of recent apps. I can then switch to it and it is in the same state as it was when it closed. Application. Terminate does the same thing. I want my app to completely unload. Can someone tell me how to do this? Delphi CE, Android SDK 25.2.5 Thanks...Dan'l.

how to add data packet to data set in VCL form. In a sample code I see persistdatapacket binary value for TClientdataset :

how to add data packet to data set in VCL form. In a sample code I see persistdatapacket binary value for TClientdataset : PersistDataPacket.Data = { BF0000009619E0BD010000001800000006000000000003000000BF000743455F......} how to add them, my dataset is used to manually populate data in the code, no data provider in VCL form. The dataset is to used in a data grid, when trying set field, get error: clientdataset missing dataprovider or data packet. Thanks.

I’ve just read Sarina’s post about the Beta 10.3 programme having started and I have an active Update Subscription but haven’t had an invite email yet. I really want to help test the beta so keen to get access.

I’ve just read Sarina’s post about the Beta 10.3 programme having started and I have an active Update Subscription but haven’t had an invite email yet. I really want to help test the beta so keen to get access. Sarina mentions contacting my sales rep if I’ve not had the email but I bought through a U.K. third party so not sure if that’s the correct route. Has anyone else had to do this and if so, how did you request an invite? Is there a specific email address or link to contact the correct team?

FmxLinux 1.32 just released. FmxLinux runtime now embedded to executable, no more extra files.

Image
FmxLinux 1.32 just released. FmxLinux runtime now embedded to executable, no more extra files. History at: https://fmxlinux.com/history.html More Info at: https://fmxlinux.com

Originally shared by Thomas Mueller (dummzeuch)

Originally shared by Thomas Mueller (dummzeuch) Using Application.ProcessMessages is being frowned upon by many because often it means that your program design is flawed. These people usually suggest you should use multi-threading instead, which then opens another can of worms. First of all, let me… http://blog.dummzeuch.de/2018/09/29/calling-application-processmessages-in-a-delphi-program/

Trying to get the text entered in an Android dialog

Trying to get the text entered in an Android dialog I found an example for this here: https://forums.embarcadero.com/thread.jspa?messageID=862688 ASyncService.InputQueryAsync( 'How Many', ['0'], [st], procedure (const AResult : TModalResult; const AValues : array of string) begin case AResult of mrOk: st := avalues[0]; end; end ); How do I implement a callback to capture the entered text? Thanks...Dan'l https://forums.embarcadero.com/thread.jspa?messageID=862688

on calling EncodeString('abc/12345'), declared in unit Soap.EncdDecd, parameter is passed as string

on calling EncodeString('abc/12345'), declared in unit  Soap.EncdDecd, parameter is passed as string I receive the following error message in Delphi XE 10 Seattle " no mapping for the unicode character exists in the target multi-byte code page" any clue please as to what causes this cryptic error?

Small recap of my Smart Mobile Studio presentation in Oslo yesterday

Small recap of my Smart Mobile Studio presentation in Oslo yesterday https://jonlennartaasenden.wordpress.com/2018/09/28/smart-mobile-studio-presentation-in-oslo/

It's time for another demo competition! And boy do I have some prizes in store for you! You have a whole month to flex your coding muscles! Get your freak on show the world who's boss!

It's time for another demo competition! And boy do I have some prizes in store for you! You have a whole month to flex your coding muscles! Get your freak on show the world who's boss! https://jonlennartaasenden.wordpress.com/2018/09/28/delphi-developer-competition/

request for unicode litteral strings like "this" and Ansi strings like 'that'

request for unicode litteral strings like "this" and Ansi strings like 'that' https://quality.embarcadero.com/browse/RSP-21337 https://quality.embarcadero.com/browse/RSP-21337

I'm having an issue in converting HEX to a string. Here's the routine I use:

I'm having an issue in converting HEX to a string. Here's the routine I use: function HexStrToStr(const HexStr: string): string; var tmp: AnsiString; begin SetLength(tmp, Length(HexStr) div 2); HexToBin(PWideChar(HexStr), @tmp[1], Length(tmp)); result := tmp; end; For the most part this has done me well over the years but at the moment I am exchanging values with a third party and finding some characters don't translate the same way. So, for example: HEX 82 converts to character 8218 in Delphi (single low-9 quotation mark - "‚" ) but in RapidTables and CodeBeautify it converts to character 130 which is what 82 is equal to (a non visible character btw). HEX 97 converts to character 8212 ("—"). Any ideas? https://www.rapidtables.com/convert/number/hex-to-ascii.html

The Indy website may have a few issues for short periods today.

The Indy website may have a few issues for short periods today. We are moving and updating it. However to get our SSL certificate and other things I have to first update the public DNS to get the processes started. We apologize for any inconvenience. When ready, it will be at the same url http://www.IndyProject.org http://www.IndyProject.org

The Indy website may have a few issues for short periods today. We are moving and updating it. However to get our SSL certificate and other things I have to first update the public DNS to get the processes started. We apologize for any inconvenience.

The Indy website may have a few issues for short periods today. We are moving and updating it. However to get our SSL certificate and other things I have to first update the public DNS to get the processes started. We apologize for any inconvenience. When ready, it will be at the same url http://www.IndyProject.org http://www.IndyProject.org

Annoying. I have looked through all settings for my DEBUG build. Use Debug DCU's et. al. In this project i oftentimes fail to inspect a variable:

Annoying. I have looked through all settings for my DEBUG build. Use Debug DCU's et. al. In this project i oftentimes fail to inspect a variable: Function to be called, {System.Generics.Collections}TDictionary .GetItem, was eliminated by linker But is optimizations are turned off, should i not be able to inspect? TIA, /D
Is there a way to change the size of the font of a list picker created using the IFMXPickerService?

I-Pascal v1.95 is available. Most important new features:

I-Pascal v1.95 is available. Most important new features: * Delphi CE sources compatibility. Now sources used by default instead of .dcu decompiler. * unfolding WITH blocks - you can see which identifier comes from which scope * code documentation extraction from comments. Viewable by F2. * code analyze optimization - ~100 times faster! More with pictures: http://siberika.com/whatsnew.htm http://siberika.com/whatsnew.htm

WTF? Embarcadero official website and below is google official store web site

Image
WTF? Embarcadero official website and below is google official store web site

Hey guys, where I can find Delphi CE latest patches free download sources?

Hey guys, where I can find Delphi CE latest patches free download sources? I have built some Android app and there are some bugs :(

I wrote a function to make JSON more readable, and naturally I wonder if I missed something crucial so that it eventually will break?

I wrote a function to make JSON more readable, and naturally I wonder if I missed something crucial so that it eventually will break? There are probably more efficient ways to work with strings than concatenating character by character, but performance was not a key goal. I hereby commit it to public code review ;) https://pastebin.com/Juks92Y2 https://pastebin.com/Juks92Y2
Is Delphi CE free for only 1 year? or does it renew if you still meet the "free" requirements?

Having an Embarcadero sanctioned grammar, or Embarcadero ensuring https://github.

Having an Embarcadero sanctioned grammar, or Embarcadero ensuring https://github.com/RomanYankovsky/DelphiAST gets complete would be so much welcomed. Originally shared by Jeroen Wiert Pluimers "The arguments that won the day for us here were about strengthening the ecosystem and becoming the best tooled language on the planet. They were about long-term growth of C# and .NET, versus short term monetization and protection of assets for Microsoft. So even without having mentioned open source, signing up for the cost and risk of the Roslyn project was a big and bold step for Microsoft." https://medium.com/microsoft-open-source-stories/how-microsoft-rewrote-its-c-compiler-in-c-and-made-it-open-source-4ebed5646f98

Having an Embarcadero sanctioned grammar, or Embarcadero ensuring https://github.com/RomanYankovsky/DelphiAST gets complete would be so much welcomed.

Having an Embarcadero sanctioned grammar, or Embarcadero ensuring https://github.com/RomanYankovsky/DelphiAST gets complete would be so much welcomed. Originally shared by Jeroen Wiert Pluimers "The arguments that won the day for us here were about strengthening the ecosystem and becoming the best tooled language on the planet. They were about long-term growth of C# and .NET, versus short term monetization and protection of assets for Microsoft. So even without having mentioned open source, signing up for the cost and risk of the Roslyn project was a big and bold step for Microsoft." https://medium.com/microsoft-open-source-stories/how-microsoft-rewrote-its-c-compiler-in-c-and-made-it-open-source-4ebed5646f98
Hi looking for good and complete tutorial/course how to create RESTFul services with Delphi 10.2 Enterprise . Or if anyone use Delphi for creating RESTFul services feedback will be appreciated.

Synchronized ListBoxes

Image
Synchronized ListBoxes I have created a test app that has 2 ListBoxes where the ListBoxItems move with each other. It works but has an oddity. If the right side ListBoxItem (lbi) is out of view when the corresponding left side lbi is selected then the right side lbi move into view at the top or bottom of the right side box, but not aligned with the left side lbi. I can work with this in my app but is not user-friendly. Does anyone have any suggestions on avoiding an offset? The pas code: unit LBTest; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.StdCtrls, FMX.Controls.Presentation, FMX.Layouts, FMX.ListBox; type TForm1 = class(TForm) lb1: TListBox; pnl1: TPanel; lb2: TListBox; btn1: TButton; procedure btn1Click(Sender: TObject); procedure lb2Change(Sender: TObject); procedure lb1Change(Sender: TObject); procedure lb1MouseWheel(Sende

Hi, where is the roadmap for new releases of delphi?

Hi, where is the roadmap for new releases of delphi? Support for MacOS 64 compiler is planned ? Regards

Hello people, any idea what exactly mean ...licensed to test ???

Image
Hello people, any idea what exactly mean ...licensed to test ??? My Delphi is registered with a valid account, subscription, serial number and so on.

Ugly code of the day that I found...

Ugly code of the day that I found... IOTAGalleryCategoryManager(BorlandIDEServices as IOTAGalleryCategoryManager).AddCategory(IOTAGalleryCategoryManager(BorlandIDEServices as IOTAGalleryCategoryManager).FindCategory(sCategoryDelphiNew), .....

Is there a good example of implementing background task like waiting for a chat response message while the app is in the background in iOS.

Is there a good example of implementing background task like waiting for a chat response message while the app is in the background in iOS. There are a lot of sample for Android but I cannot find one for iOS.

https://www.atozed.com/2018/09/intraweb-17-beta-1-has-been-released/

https://www.atozed.com/2018/09/intraweb-17-beta-1-has-been-released/ https://www.atozed.com/2018/09/intraweb-17-beta-1-has-been-released/

Did anyone get the latest FacebookSDK running on iOS?

Did anyone get the latest FacebookSDK running on iOS? I get "Undefined symbols for architecture arm64: Error: "___isOSVersionAtLeast", referenced from: -[FBSDKApplicationDelegate..." Facebook sent me a warning that I use a deprecated version of their Graph API, so I downloaded latest Facebook API (v4.36) and merged it in with my iOS11.2 SDK (used because Delphi fails in static linking with iOS11.3 and newer). I assumed that the above error was because the FBSDK is made for a newer version of iOS, but I don't see any requirements about that on the FB SDK pages, so what can the problem be?

why a class method of a record without the static keyword raise E2998 error ?

why a class method of a record without the static keyword raise E2998 error ? AFAIK it can not be anything else then static ?!

FindStyleResource fails to find nested FireMonkey style controls if their parent is TStyledControl descendant.

FindStyleResource fails to find nested FireMonkey style controls if their parent is TStyledControl descendant. https://stackoverflow.com/q/52478699/4267244 I have a solution by iterating through children myself. But I would still like to know the following: 1. Is this behavior a bug or a feature? 2. If it is not a bug, why FindStyleResource works the way it does? 3. Am I doing this completely the wrong way and some other mechanism is available? https://stackoverflow.com/q/52478699/4267244

UberPDF™ 1.3, Plus+, and Ultra have been released

Image
UberPDF™ 1.3, Plus+, and Ultra have been released Highlights: * 175,000 lines of new code * High level drawing functions * A real time accessible graphics stack * Text Setting Engine (sets columns of text - left, right, center and justified) * Commercial grade line breaking options (soft hyphens, soft breaks, hard breaks, etc) * Commercial grade character kerning engine * Font Engine - All PDF encodings (including custom) supported * Smart Font Cache - Fast font, character, kerning and AFM information * Commit fonts used to dictionary in a single line line of code * Custom character mapping - any input to any character set or encoding * High performance batch drawing (content writer) * High performance PDF content strings (you can draw to them) * High performance CString type (that grows automatically!) * Built in PDF Content, PDF name, and PDF key buffers (no alloc needed) Whats next? Expanded Ultra functionality, new PDF Canvas and printer objects , and a 3D viewer! To recap the curr

https://stackoverflow.com/questions/52483218/delphi-code-completion-fail-with-anonymous-methods

https://stackoverflow.com/questions/52483218/delphi-code-completion-fail-with-anonymous-methods I have seen this question and I am curious. There is an answer that has been accepted and in fact it solves the problem but I still have the doubt. Is the code valid? I have taken Object Pascal Handbook (the latest edition) from my shelf and I've seen that Marco Cantu in his code, in the exception handling part, uses a try-except in the inner part and then a try-finally surrounds the try-except because it protects the Object.Free. Is there a reference somewhere about this? Or is that simply a bug? I have always used a try-except inside a try-finally and never a try-finally inside a try-except https://stackoverflow.com/questions/52483218/delphi-code-completion-fail-with-anonymous-methods

Hi, I am trying to install PA Server on my Mac and Linux.

Hi, I am trying to install PA Server on my Mac and Linux. I get a version error difference. It seems like my Windows contain version 10.1.1.37 and version on my Mac is 10.1.1.33. It automatically tries to copy some install files to the scratch -dir on my Mac, but when I install them they are also 10.1.1.33. I am using Tokyo Update 2 and do not have an active subscription. Any ideas where I can get version 10.1.1.37 of PA Server for Mac OSX and Linux?
Hi, I am trying to install PA Server on my Mac and Linux. I get a version error difference. It seems like my Windows contain version 10.1.1.37 and version on my Mac is 10.1.1.33. It automatically tries to copy some install files to the scratch -dir on my Mac, but when I install them they are also 10.1.1.33. I am using Tokyo Update 2 and do not have an active subscription. Any ideas where I can get version 10.1.1.37 of PA Server for Mac OSX and Linux?

I was wondering if this could be done. In the debugger, when I'm inspecting a variable (an array of bytes), that represent a string -- but at debug time, I just see the byte array elements as the ansi character number of each element. We have a function "AnsiCharArrayToString" that will convert this array of bytes to a string. Is there a way to somehow create a debugger construct to convert this byte array to a string in debugger insight? If I allow side effects and function calls when inspecting, I can get it to show the string, but I was wondering if there is an easier way..

I was wondering if this could be done. In the debugger, when I'm inspecting a variable (an array of bytes), that represent a string -- but at debug time, I just see the byte array elements as the ansi character number of each element. We have a function "AnsiCharArrayToString" that will convert this array of bytes to a string. Is there a way to somehow create a debugger construct to convert this byte array to a string in debugger insight? If I allow side effects and function calls when inspecting, I can get it to show the string, but I was wondering if there is an easier way..

This is a question that probably Marco can answer but I figure it's a good question to ask publicly - my company currently doesn't use Delphi. We have a company-wide Hackaton next month, which means we get to propose whatever we'd like to see implemented in our company. I'd like to propose an app and I'd love to make it with Delphi; I need a fully working multidevice mobile app to be made in less than a week, and I think Delphi is pretty much the only good option for that.

This is a question that probably Marco can answer but I figure it's a good question to ask publicly - my company currently doesn't use Delphi. We have a company-wide Hackaton next month, which means we get to propose whatever we'd like to see implemented in our company. I'd like to propose an app and I'd love to make it with Delphi; I need a fully working multidevice mobile app to be made in less than a week, and I think Delphi is pretty much the only good option for that. Can we use a trial license for this competition? (it's just a week). Do trial versions have limitations in the creation of mobile apps?

Assuming you would like to build something like in the Delphi project options Compiler settings where you have a base configuration (All Platforms) and then you have a bunch of derived configurations (Android, iOS etc.) that can override the settings from the base configuration.

Assuming you would like to build something like in the Delphi project options Compiler settings where you have a base configuration (All Platforms) and then you have a bunch of derived configurations (Android, iOS etc.) that can override the settings from the base configuration. What data structure would you use for that. And how would you implement persistence of such data?
Since I put up 10.2, I cannot get a form width >1620. Whenever I enter a greater value, the system changes it back! As I have some programmes with complex forms about 1800 wide, can anyone please tell me how to get a decent width back please?

It's been two days now that D102 shuts down whenever I create a new project that has forms. both VCL and FMX

It's been two days now that D102 shuts down whenever I create a new project that has forms. both VCL and FMX Anyone what may be wrong?

Super extended CRON support in kbmMW's scheduler.

Super extended CRON support in kbmMW's scheduler. https://components4developers.blog/2018/09/22/kbmmw-scheduler-tidbits-6/

"exception class EClassNotFound with message 'Class TfrxDataPage not found'."

"exception class EClassNotFound with message 'Class TfrxDataPage not found'." Well, it is not 'new' because I have struggled with this beastie several times in the last few years. Before I go into the details let me ask if anyone else has had a problem with this. The FR forum does not give a definitive answer for this. Does anyone know the cause and fix? Thanks...Dan'l

Can delphi do template literals like js ?

Can delphi do template literals like js ? e.g Var x = "John" Var Msg = `Hello {x} thank you for coming today` The same can be done in C#, but I can't find if delphi can do this or not
I'm using Delphi Community Edition, and I want to compare code changes to my XE version. However, I uninstalled Delphi XE, so I don't have the sources anymore. Where can I get the VCL source code for Delphi XE if I'm a registered user? I do have the big 2,1 GB installer, is it possible to extract its contents without installing?
Just renewed my subscription to Rad Studio Enterprise. Still a good value.

Does anyone know how to solve this error with MSBUILD in a batch file?

Does anyone know how to solve this error with MSBUILD in a batch file? ----------------- C:\Program Files (x86)\Embarcadero\Studio\19.0\Bin\CodeGear.Delphi.Targets : warning MSB6002: The command-line for the "DCC" task is too long. Command-lines longer than 32000 characters are likely to fail. Try reducing the length of the command-line by breaking down the call to "DCC" into multiple calls with fewer parameters per call. C:\Program Files (x86)\Embarcadero\Studio\19.0\Bin\CodeGear.Delphi.Targets(399,5): error MSB6003: The specified task executable "dcc" could not be run. The filename or extension is too long --------------------------- I have used substitute letters for paths and use the drive root folder but I can't get past this error

Hi there, Vivaticket spa is looking for a Senior Delphi Developers.

Hi there, Vivaticket spa is looking for a Senior Delphi Developers. Check out this job opportunity through the link below https://www.indeedjobs.com/vivaticket-spa/jobs/5bb01662acfaa98adb53

Всем привет.

Всем привет. Столкнулся с необъяснимой ситуацией, при переходе на другую версию делфи, поехало меню на форме. Строки отображаются как нужно, но в конце строк непонятные отступы, как будто пробелов понаставили. Если кинуть на другую форму новое меню, то все нормально отображается. Если вырезать (поехавшее) меню, кинуть на другую форму, то все ОК. По видимому проблема в неком кешировании, или что то еще. Потому что компоненты работают, но с визуальными багами Тот же компонент на другой форме отображается нормально Если потом обратно его перекинуть на основную форму, то тоже нормально отображается. У кого нибудь есть идеи? https://i.imgur.com/Jd1LvrY.png

Всем привет. Столкнулся с необъяснимой ситуацией, при переходе на другую версию делфи, поехало меню на форме. Строки отображаются как нужно, но в конце строк непонятные отступы, как будто пробелов понаставили.

Всем привет. Столкнулся с необъяснимой ситуацией, при переходе на другую версию делфи, поехало меню на форме. Строки отображаются как нужно, но в конце строк непонятные отступы, как будто пробелов понаставили. Если кинуть на другую форму новое меню, то все нормально отображается. Если вырезать (поехавшее) меню, кинуть на другую форму, то все ОК. По видимому проблема в неком кешировании, или что то еще. Потому что компоненты работают, но с визуальными багами Тот же компонент на другой форме отображается нормально Если потом обратно его перекинуть на основную форму, то тоже нормально отображается. У кого нибудь есть идеи? https://i.imgur.com/Jd1LvrY.png

Playing with Android :)

Playing with Android :) https://github.com/tothpaul/Delphi-LowLevel/tree/master/app_process https://github.com/tothpaul/Delphi-LowLevel/tree/master/app_process

Saw on LinkedIn: https://codematters.online/wanted-new-delphi-developers/

Saw on LinkedIn: https://codematters.online/wanted-new-delphi-developers/ https://codematters.online/wanted-new-delphi-developers/

Delphi got yet another way to connect directly to Microsoft SQL Server: TMS Aurelius 4 introduces native database drivers.

Delphi got yet another way to connect directly to Microsoft SQL Server: TMS Aurelius 4 introduces native database drivers. https://www.tmssoftware.com/site/blog.asp?post=478 https://youtu.be/Brq4lbUqJYM https://youtu.be/Brq4lbUqJYM

I think all of us know the how works COALESCE SQL function.

I think all of us know the how works COALESCE SQL function. True? In a simple version, evaluates two arguments and if the first is NULL, returns the second. I need this behaviour in Delphi. Anyone know a standard function like this. -------------------------- The problem becomes because I have a function that receives two parameters of type char and I need to send to it as the argument the first character of a TField and this TField can be null. ReorganizeCoordinatesControls( FEditComponent.LAYOUT.AsString[1], FEditComponent.ORIENTATION.AsString[1]); when is null, taking the first character causes an AVE. Apart, a variable of type char, can't receive an empty string . ----------------------------- Of course, I know how to create the function. The curiosity is about if a standard function like this exists in the Delphi libraries. Of course, I've searched on google, in forums, in stackoverflow and so on. Anyone knows? https://docs.microsoft.com/es-es/sql/t-sql/l

I think all of us know the how works COALESCE SQL function. True? In a simple version, evaluates two arguments and if the first is NULL, returns the second.

I think all of us know the how works COALESCE SQL function. True? In a simple version, evaluates two arguments and if the first is NULL, returns the second. I need this behaviour in Delphi. Anyone know a standard function like this. -------------------------- The problem becomes because I have a function that receives two parameters of type char and I need to send to it as the argument the first character of a TField and this TField can be null. ReorganizeCoordinatesControls( FEditComponent.LAYOUT.AsString[1], FEditComponent.ORIENTATION.AsString[1]); when is null, taking the first character causes an AVE. Apart, a variable of type char, can't receive an empty string . ----------------------------- Of course, I know how to create the function. The curiosity is about if a standard function like this exists in the Delphi libraries. Of course, I've searched on google, in forums, in stackoverflow and so on. Anyone knows? https://docs.microsoft.com/es-es/sql/t-sql/l

Click "Join" if applicable.

Click "Join" if applicable. https://plus.google.com/communities/104721286834689601292?hl=en

Tokyo 10.2 Update 3 Version 25.0.31059.3231

Tokyo 10.2 Update 3 Version 25.0.31059.3231 Does It Support IOS 12?

I have Delphi XE and an old license of AnyDAC. I thought to make an experiment of using Community Edition and AnyDAC so I can have remote database access.

I have Delphi XE and an old license of AnyDAC. I thought to make an experiment of using Community Edition and AnyDAC so I can have remote database access. It didn't went too well. I managed to compile AnyDAC and even got my old application compiling in Tokyo, but AnyDAC fails to get data. I found out that in Data.DB line 6529 the member variable FIOBuffer is all zeroes so it doesn't get any data back. Anyways, I'm mostly ranting, but if anybody has any tips I'm all ears.

parameter by reference in ActiveX component

parameter by reference in ActiveX component I am currently using an ActiveX component and have problems with the parameter by reference of the function of this component. The definition of the function is: HRESULT ReadInformation ([in] BSTR * szCard, [in] int iTimeChip, [in] int iTimeMag, [in] int iType, [in] BSTR messMag, [out, retval] int * rc) Defining a procedure in a normal way that makes use of the function I got the following error: "Access violations at address 1381O7AO in module * .DLL. Write of address 00000000" procedure TForm2.btnConInfClick (Sender: TObject); var .... CardInformation: WideString; begin try ... ReadCardResult: = MyCompActX.ReadInformation (CardInformation, 20, 20, 1, 'ENTER NUM ...'); if Trim (CardInformation) <> '' then ShowMessage (CardInformation); finally MyCompActX.Free; end; end; Then doing some research and suggestions from some friends they indicated that I h

Spring4D and factory

Spring4D and factory A very simple example: IExample = interface ['{0F1BE36B-0735-4BCE-BAF7-AC0AC3B60A16}'] end; TExample = class(TInterfacedObject, IExample) public constructor Create(const aId: UInt32; const aObject: TObject); end; {$M+} TExampleFactory = reference to function(const aId: UInt32; const aObject: TObject) : IExample; {$M-} aContainer.RegisterType .Implements ; aContainer.RegisterFactory ; When I call the factory: lExample := aExampleFactory(2, nil); <- exception I get an exception: "Unsatisfied constructor on type TExample" When I call other, not nil value then is ok. Is it not allowed to transfer nil to factories?
I will be in the San Francisco are from October 1st until 4th, if some Delphi developer wants to take a coffee, just ping me in private and we can meet in person. Thanks!

Hi at all

Hi at all, this is an example, I'd like to implement a list of my generic class. Is it possible? I've googled a lot whithout success... :( Can someone help me? Thanks. TPlcType = class private FValue: T; procedure SetValue(const Value: T); overload; procedure SetValue(const AValue: Boolean); overload; procedure SetValue(const AValue: Byte); overload; procedure SetValue(const AValue: Word); overload; public property Value: T read FValue write SetValue; end; TPlc = class private FMyBool: TPlcType ; FMyByte: TPlcType ; FMyWord: TPlcType ; FMyList: TOBjectList<...> // ???? end;

Can anyone confirm the following works with RAD Studio 10.2.3....

Can anyone confirm the following works with RAD Studio 10.2.3.... MacOS 10.13.6 XCode 9.4.1 PAServer 10.3.1.10 I can't find anything on Platform Status that has known working version numbers.

Searching for a full time Delphi developer in Milan Italy for an Analytical project about six moths. anybody interested?

Searching for a full time Delphi developer in Milan Italy for an Analytical project about six moths. anybody interested? for more info write to : info@synaptica.info

Hi

Hi, say I've got the following classes: TClassA = class end; TClassB = class fCA: TClassA; end; Now, suppose I do not know that fCA is TClassA but I know that the field is called "fCA" and I want to get access to the instance fCA. I try this: ////////////////////// var ctx: TRTTIContext; cType: TRTTIType; clB: TClassB; cField: TRTTIField; obj: TObject; begin [initialise clB and fCA] .... cType:=ctx.GetType(clB.ClassInfo); cField:=cType.GetField('fCA'); if assigned(cField) then begin ///Q1: How do I check that fCA is TObject?? //I try this but I get AV obj:=cField.GetValue(cField).AsObject; //I have also tried this and AV again obj:=cField.InitInstance(cField.ClassInfo); end; ////////////////////// Any ideas? Thanks a lot in advance

Does anyone have any suggestions for a currently supported DTP style component set like http://www.simdesign.nl/dtpDocuments.html?

Does anyone have any suggestions for a currently supported DTP style component set like http://www.simdesign.nl/dtpDocuments.html ? I used this some years ago and it now looks unsupported. I do have the source so may be able to work with it but I tend to prefer using supported components.

Is there a way to use the JVCL's TJvXxxAppStorage to store float values as strings (e.g. "10.152") rather than hex dumps and also control the decimal separator that is being used?

Is there a way to use the JVCL's TJvXxxAppStorage to store float values as strings (e.g. "10.152") rather than hex dumps and also control the decimal separator that is being used? I know that I can set AppStorage.StorageOptions.FloatAsString := True; But then it will use the currently active DecimalSeparator when I store a float property, e.g. "10,152" for standard German settings. It internally calls procedure TJvCustomAppStorage.WriteFloatInt(const Path: string; Value: Extended); begin if StorageOptions.FloatAsString then DoWriteString(Path, EncryptPropertyValue(FloatToStr(Value))) else DoWriteFloat(Path, Value); end; Which calls FloatToStr which uses the DecimalSeparator. Providing an OnEncryptPropertyValue handler won't solve that problem either because then the result will be mime encoded. (I think it cannot be done without changing the WriteFloatInt code. But I would like a confirmation for that.)

I have hit a big snag with DevExpress ribbon recently.

I have hit a big snag with DevExpress ribbon recently. Its a long story in a (so far) private ticket at DX. It's really slow going and i'm not getting all sides of the problem. What i mean by that is a ticket is a ticket so they are trying to solve the same specific problem. But i'm not getting really far when trying to discuss alternate solutions to my problem. When googling on DevExpress + something all their other flavours come up a lot. So i was thinking, would there be any interest in creating a G+ group called "Delphi DevExpress Users"? To discuss design issues using DX VCL? If i get a positive response here, i'll go and see how to create such a group. Regards, /Dany

I have hit a big snag with DevExpress ribbon recently. Its a long story in a (so far) private ticket at DX. It's really slow going and i'm not getting all sides of the problem. What i mean by that is a ticket is a ticket so they are trying to solve the same specific problem. But i'm not getting really far when trying to discuss alternate solutions to my problem.

I have hit a big snag with DevExpress ribbon recently. Its a long story in a (so far) private ticket at DX. It's really slow going and i'm not getting all sides of the problem. What i mean by that is a ticket is a ticket so they are trying to solve the same specific problem. But i'm not getting really far when trying to discuss alternate solutions to my problem. When googling on DevExpress + something all their other flavours come up a lot. So i was thinking, would there be any interest in creating a G+ group called "Delphi DevExpress Users"? To discuss design issues using DX VCL? If i get a positive response here, i'll go and see how to create such a group. Regards, /Dany

Hi

Hi I need to verify and extract the original file ( need xml ) from a .p7m (Signed-Data PKCS7 Format) ?

Is there any way to report bugs in TeeChart without an active subscription? We did not renew our subscription this year and therefore lost write access to the forums.

Is there any way to report bugs in TeeChart without an active subscription? We did not renew our subscription this year and therefore lost write access to the forums. I found a bug in TeEngine / TeeTools that results in a Range Check Error.

Any one from Netherlands?

Any one from Netherlands? I was planing to visit Netherlands during this week, to catch up with Delphi Conference 2018, but unfortunately I will not arrive on time, I will be on Netherlands between 20 & 25 Sep. I'm interested to meet any developers there and visit companies if they don't mind for knowledge sharing and to see any future business opportunities between us. I have a small software company, with team of Delphi & C# developers, and already doing outsourcing for multiple companies in Europe & USA. Regards, Mohammed

These is a cool project by one of my fellow Chinese Delphi programmers called nickemma (see original links at the end of the post) I came across today that I couldn't resist to share with the world:

Image
These is a cool project by one of my fellow Chinese Delphi programmers called nickemma (see original links at the end of the post) I came across today that I couldn't resist to share with the world: Picture 1 === The electronic car that receives control commands through WIFI, sent from an Android app developed in Delphi. Picture 2 === The FireMonkey app that sends hex. control commands to the toy car.BTW, it uses an UI framework called OrangeUI that's available in China only. Picture 3 === The settings window of the Android app where you specify the IP of the toy car's WIFI modue, the hex. commands for turning left/right, forward and back, and so on. Picture 4/5 === He made two toy cars each of which are differently constructed, but seems to be controlled by the same Delphi-powered Android app. I don't know much about the electronic thing, but this project obviously shows a cool part of Delphi :) link1: http://bbs.2ccc.com/topic.asp?topicid=552684 link2: http://bbs.2ccc

Arthur Hoornweg I hope this can provide a work-around...

Arthur Hoornweg I hope this can provide a work-around... https://tondrej.blogspot.com/2018/09/project-page-ide-extension-for-rad.html

Originally shared by Thomas Mueller (dummzeuch)

Originally shared by Thomas Mueller (dummzeuch) Did you known that LongWord in Delphi is not (any longer) always a 32 bit unsigned integer? I wasn’t aware of this until I asked about what others use for that data type in the Delphi Developers Google+ community. I turned out that the majority of the… http://blog.dummzeuch.de/2018/09/16/delphi-longword-is-not-always-a-32-bit-unsigned-integer/

Theres any way to include git commit at copile time? The plan is show in a log the actual git commit.

Theres any way to include git commit at copile time? The plan is show in a log the actual git commit.

Hello

Hello, Below is reproduced on both Delphi 10.2.3 and Delphi 10.2.2. I expect code to display 1715. I do read 1715 (no decimals) after multiplication on Debug. After Trunc() value is 1714. I know Trunc() rounds towards zero. It is just there is nothing to round as decimal here. var ADouble: Double; AInteger: Integer; begin ADouble := 17.15; ADouble := ADouble * 100; AInteger := Trunc(ADouble); ShowMessage(AInteger.ToString()); end; Thanks.

Having started with Delphi before the Cardinal type was available (Or has it always? I can't remember.) I routinely declare 32 bit unsigned variables as LongWord.

Having started with Delphi before the Cardinal type was available (Or has it always? I can't remember.) I routinely declare 32 bit unsigned variables as LongWord. What do you use?

Spring Collections

Spring Collections I have a list of elements, there are, for example, 100 of them. List : IList ; I want to get 5 values greater than 10 and I do it like this: result: = List.Where(ValueIsGreatThan10).Take(5); Will the "work loop" be executed a minimum number of times and if, for example, the first 5 values in the list will be greater than 5, then only the five will be checked? Or maybe the Where() loop will scan 100 elements, and Take() will return the first 5 results?

https://plus.google.com/+YaroslavBrovin/posts/JnveEy527YN

https://plus.google.com/+YaroslavBrovin/posts/JnveEy527YN This is a project that I am SURE will replace FMX because (if it works well as I expect) we will have native android and iOS apps. Yaroslav Brovin when will you release this? Any other updates?? I see on the telegram group that you put screenshot of 100% native android apps created with Delphi but they are 3 months old. Updates?

Small video on scripts remote debug featute in HTML Library

Small video on scripts remote debug featute in HTML Library (Scripter is independed part of the library and can be used for any purposes) https://youtu.be/qgZR8bVyhCY https://youtu.be/qgZR8bVyhCY

I need some help with Livebindings.

Image
I need some help with Livebindings. I have a TLabel component linked with a TIntegerField. Currently, I have the next CustomFormat property: %s+"%%" and it works well. Shows the number of the field with a percentage sign at the end. What I need is an expression that shows the same but if the value is 0 (zero) show "---" instead of the value. I've tried things like IfThen(%s = 0, "---", %s + "%%") or IfThen(ToStr(%s) = "0", "---", %s + "%%") but I always get "No argument for format..." error. I think is because I use two %s. But how I do this then? Thanks in advance.

Hey Folks --

Hey Folks -- We here at Gateway Ticketing are looking for Delphi developers. Relocation assistance is available. We are open to remote work for the right candidate, though you must be eligible to work and actually work in the US. We are looking for people of all skill levels -- we just want you to be the kind of person who is smart and gets things done. You can apply here: https://workforcenow.adp.com/mascsr/default/mdf/recruitment/recruitment.html?cid=b1ce2757-11ad-4d5a-973a-abb9e975dd74&ccId=19000101_000001&type=MP&lang=en_US Or you can contact me directly at nhodges@gatewayticketing.com Gateway is a great place to work -- I ought to know, I'm on my third tour of duty! https://workforcenow.adp.com/mascsr/default/mdf/recruitment/recruitment.html?cid=b1ce2757-11ad-4d5a-973a-abb9e975dd74&ccId=19000101_000001&type=MP&lang=en_US

Gave Help & Doc a test-run and I must say I'm impressed.

Gave Help & Doc a test-run and I must say I'm impressed. Easy to use, to the point and very efficient - loved it! https://jonlennartaasenden.wordpress.com/2018/09/13/helpdoc-documentation-made-easy/

Hello

Hello, there is a delphi script or component for download a video from youtube and convert it to mp3 ? Regards

If I were to choose the best program MS ever written, I'd choose MS Paint. Not Paint 3D or else, the original MS Paint as in Windows 7.

If I were to choose the best program MS ever written, I'd choose MS Paint. Not Paint 3D or else, the original MS Paint as in Windows 7. If you need to draw a raster picture with several shapes, arrows, captions, etc, MS Paint is perfect. There is nothing even close to MS Paint in the Linux world, only buggy and low-functional software claiming itself MS Paint clones or replacements. I understand now why some recommend to use GIMP for drawing on Linux, though GIMP is a heavyweight not designed for easy drawing.

Fellow Delphi Developers!

Image
Fellow Delphi Developers! Just tested VCL Styles from delphistyles.com with StyleControls VCL 4.0 from our partner www.almdev.com ! We have awesome results! You can really jump to a new UI level in applications!

Our main delphi VCL application has a number of plugins (all written in delphi) as DLL's. Within the DLL's we want to have VCL forms that get requested to be shown by the main app.

Our main delphi VCL application has a number of plugins (all written in delphi) as DLL's. Within the DLL's we want to have VCL forms that get requested to be shown by the main app. This always worked well for us when the forms were shown modal; but now I am switching some forms to be non-modal. I pass the TApplication handle of the main app into the DLL and assign it to VCL.Forms.Application inside the DLL. This seemed to resolve most peculiarities (like the form disappearing and not reappearing after minimizing), but the one thing that still seems wrong is the form from the DLL is always on top of the main application form (it's not set to stay on top). Am I doing something I just shouldn't be doing, or should this work fine?

What problem with these? As the pictute shown below. I‘m using Tokyo 10.2.3 Version 25.0.31059.3231

Image
What problem with these? As the pictute shown below. I‘m using Tokyo 10.2.3 Version 25.0.31059.3231 iOS 11.4.1 xcode 9.4.1

Anyone here in the healthcare industry?

Anyone here in the healthcare industry? We make a system for dentists in Norway. For HL7, would you use this componentset? http://www.delphihl7.com/ https://www.embarcadero.com/healthcare-industry https://www.embarcadero.com/healthcare-industry

What do you think about this idea ?

What do you think about this idea ? Replace Control.ParentFont : Boolean by Control.ParentFont.Name : Boolean Control.ParentFont.Size : Boolean Control.ParentFont.Color: Boolean with a RecordProperty instead of a new TParentFont = class(TPersistent) of course ! https://github.com/tothpaul/DelphiTips/tree/master/RecordProperty https://github.com/tothpaul/DelphiTips/tree/master/RecordProperty

Has something changed with WifiInfo: JWifiInfo in Tokyo 10.2.3 which is not public? We're porting now our app from Berlin to 10.2.3 and we're using jWifiInfo to getMacAddress of Android devices. Same app on same device compiled with Berlin is getting correct mac, app compiled with tokyo 10.2.3 is getting 02:00:00:00:00:00 as result. All access-rights should be set.

Has something changed with WifiInfo: JWifiInfo in Tokyo 10.2.3 which is not public? We're porting now our app from Berlin to 10.2.3 and we're using jWifiInfo to getMacAddress of Android devices. Same app on same device compiled with Berlin is getting correct mac, app compiled with tokyo 10.2.3 is getting 02:00:00:00:00:00 as result. All access-rights should be set.

Hello

Hello, This will be my first post/question :-) I have a large VCL application made up of several EXE's and 100+ dynamically loaded DLL's with forms. The primary EXE has a Datasnap client inside it that calls methods of a service running on a server for concurrent user tracking, so we know who is logged into the software. Today I implemented a Datasnap callback so a message can be sent through the Datasnap channel from a monitoring EXE to all connected clients. The message trigger on the client side then issues a thread sync call to a procedure in the main GUI thread that calls "Close;" to end the program. This is working like I expected it to, it calls Close and the EXE ends as normal....until a form from a DLL is in use. The DLL is calling Application.Terminate, which destroys all the created forms in the DLL and exists the DLL and frees the resources, but then it stops at the EXE in the method where the DLL was loaded from, like the user just close the form norm

I am studying the so called "C# bible" (the book is C#7 in a nutshell) and I see that A LOT of things that there are...

I am studying the so called "C# bible" (the book is C#7 in a nutshell) and I see that A LOT of things that there are in delphi are also in C#. Like the File class has identical methods, same for the stream classes names (and the hierarchy), datetime libraries, stopwatch and so on. Well I find C# super powerful, so would it make sense if Delphi had: - something like "auto" in C++ and "var" in C# (now java has "var" too). I find it very useful! It deduces automatically the type like "auto i = 5" or "var i = 5" gives the same result as "int i = 5" - the += operator and the -= operator - the possibility to have something like this: https://pastebin.com/WRi0hd3Q I do not want to make Delphi a C# with a different syntax but I just think that these would be nice features! Delphi has copied a lot from C# so it could copy these nice features as well! I do not know technical details but could these be implemented? https://p

I am studying the so called "C# bible" (the book is C#7 in a nutshell) and I see that A LOT of things that there are in delphi are also in C#. Like the File class has identical methods, same for the stream classes names (and the hierarchy), datetime libraries, stopwatch and so on. Well I find C# super powerful, so would it make sense if Delphi had:

I am studying the so called "C# bible" (the book is C#7 in a nutshell) and I see that A LOT of things that there are in delphi are also in C#. Like the File class has identical methods, same for the stream classes names (and the hierarchy), datetime libraries, stopwatch and so on. Well I find C# super powerful, so would it make sense if Delphi had: - something like "auto" in C++ and "var" in C# (now java has "var" too). I find it very useful! It deduces automatically the type like "auto i = 5" or "var i = 5" gives the same result as "int i = 5" - the += operator and the -= operator - the possibility to have something like this: https://pastebin.com/WRi0hd3Q I do not want to make Delphi a C# with a different syntax but I just think that these would be nice features! Delphi has copied a lot from C# so it could copy these nice features as well! I do not know technical details but could these be implemented? https://p

I think that time ago I read in this group that the Professional Subscription of Delphi now includes de Mobile AddOn.

I think that time ago I read in this group that the Professional Subscription of Delphi now includes de Mobile AddOn. Is this correct?

Is there a checklist online to debug autocompletion, errorinsight, or perhaps some tools to help the issue?

Is there a checklist online to debug autocompletion, errorinsight, or perhaps some tools to help the issue? It stopped working on my delphi Berlin project and I cannot seem to get it working. Perhaps I'm missing some toggles. I (think) it stopped working when I added a number of var x: TypeX; y: TypeQ absolute X; references, the Bidit compiler really seems to hate these, I am loath to remove them though, I really like the way `absolute` fixes illegal typecast errors. I'm doing lowlevel bit-twiddling BTW. Obviously there are no errors or warnings in the compilation of code. With DelphiAST so advanced these days I'm half temped to write my own error insight, code completion implementation.

Fellow Delphi Developers!

Image
Fellow Delphi Developers! We are glad to announce that StyleControls VCL v.4.0 just released! Key features: - Unique solution to create UWP-like applications (you can fully customize form, enable DWM shadow with hit test for it) - Excellent support of system Themes and VCL Styles - Improves VCL Styles on Forms, Menus and Common Dialogs (and for High-DPI systems) - All controls work fine, faster, without any flickers, have the same functionality with system Themes or with VCL Styles - All controls have support of High-DPI systems with any DPI (no limitations and with VCL Styles) - Complex solution to scale images in controls on High-DPI systems (icons, backgrounds and many more) - A lot of advanced controls to create really modern application - A lot of controls has multi-theme (style) adjustments (for example, one button can looks and works as push button, tool button, spin button and many more) - Additional collection of controls, which use GDI+ (edits, memos with transpar

Hi all

Hi all, Is there any way to know which Style has been applied to a FMX StyleBook? If you look at the FMX, it's hard coded in a huge hex string. But I have a style in one of my apps that I like, and don't remember which one was applied. Opening the StyleBook doesn't mention which style file has been loaded. Any other way to know whether I applied A.style or B.style? Thanks for any help Steve

I'm trying to build this library in Delphi 10.2.3 Tokyo:

I'm trying to build this library in Delphi 10.2.3 Tokyo: https://github.com/pjde/delphi-mqtt (I have the latest ICS lib installed as well.) It looks like the author used Delphi XE to build this lib originally. I opened the .dproj file in Tokyo and it prompts me to convert it. I took the default. Then I went into project options and set up the folders for debug on W32 and W64, then I ran Build. When I got it to finally build ok, it complained that it had to implicitly import a bunch of ICS files. The original Requires file spec has a bad path on it, and is also for the wrong version of Delphi. Anyway, the problem I'm having is that after running Build, there's no Install option present in the right-click menu. So when I try to open the demo file, it complains b/c it can't find the components anywhere, which is to be expected. It doesn't look like the author properly separated things for Design and Run-time needs, but there IS a register proc contained in uMQTTComps.

Integrating Visual Studio Code + OmniPascal with a Form Designer. This is just a prototype I wanted to see if it was possible. Not planning to commit more time to it, just let me know if you find it interesting and maybe I release it at some point.

Integrating Visual Studio Code + OmniPascal with a Form Designer. This is just a prototype I wanted to see if it was possible. Not planning to commit more time to it, just let me know if you find it interesting and maybe I release it at some point. https://youtu.be/A57SJ3TNRg8

Wrapping up the Tweening animation library for VCL, so that is ready to ship to patrons after work tomorrow. Next on our list is PixelRage! Been wanting to finish this for quite some time. It supports 8-32 BPP, layers, fast pixel conversion used on blitter level (so you can copy a pixmap to another using alpha blending, color key - and it will convert the pixel data ad-hoc. If you draw a 32 bit pixmap onto an 8 bit image, it will try to map the colors (and it does a great job).

Wrapping up the Tweening animation library for VCL, so that is ready to ship to patrons after work tomorrow. Next on our list is PixelRage! Been wanting to finish this for quite some time. It supports 8-32 BPP, layers, fast pixel conversion used on blitter level (so you can copy a pixmap to another using alpha blending, color key - and it will convert the pixel data ad-hoc. If you draw a 32 bit pixmap onto an 8 bit image, it will try to map the colors (and it does a great job). But coolest is probably the full paint program! It reminds me a bit about Paint Shop Pro if anyone remembers that? You can do pixel art, but also have high level brush functionality etc. #Embarcadero #Delphi #Patreon #VCL https://www.patreon.com/posts/pixelrage-21312723

FmxLinux 1.30 just released. Start building UI Linux apps with Embarcadero Delphi and FmxLinux.

Image
FmxLinux 1.30 just released. Start building UI Linux apps with Embarcadero Delphi and FmxLinux. What's new: https://fmxlinux.com/history.html More Info: https://fmxlinux.com

Easy WebSocket support with existing TidHTTPServer component :)

Easy WebSocket support with existing TidHTTPServer component :) TWebSocket turn a idHTTPServer GET request into a WebSocket dialog. https://github.com/tothpaul/Delphi/tree/master/idWebSocket https://github.com/tothpaul/Delphi/tree/master/idWebSocket

What is the text of those lines the IDE automatically inserts into new form etc. declarations in the localized Delphi versions?

What is the text of those lines the IDE automatically inserts into new form etc. declarations in the localized Delphi versions? In English they are: { Private declarations } { Protected declarations } { Public declarations } { Published declarations } As far as I know there are German, French and Japanese localizations. What's the text there? And please make sure you get the case right.

I stumbled upon a new word today: Boolshit

I stumbled upon a new word today: Boolshit It immediately reminded me of code like this: if myBoolVar = True then ... else if myBoolVar = False then ... else //oh shit!

Originally shared by Thomas Mueller (dummzeuch)

Originally shared by Thomas Mueller (dummzeuch) Just in case you are maintaining Delphi code for several older versions of Delphi: Be aware that the declarations of NativeInt and NativeUInt are wrong in some of them. Delphi version SizeOf(Native(U)Int) Win32 SizeOf(Native(U)Int) Win64 6 to 2007 8 ←… http://blog.dummzeuch.de/2018/09/08/nativeint-nativeuint-type-in-various-delphi-versions/

Blog post: Next week is by me at Delphi CE Bootcamp. Details and links in the blog post

Blog post: Next week is by me at Delphi CE Bootcamp. Details and links in the blog post https://blog.andreamagni.eu/2018/09/my-week-at-delphi-ce-bootcamp/ https://blog.andreamagni.eu/2018/09/my-week-at-delphi-ce-bootcamp/

I did some measurements with new direct PDF export (using SynPDF) in HTML Library.

I did some measurements with new direct PDF export (using SynPDF) in HTML Library. * Document parsing and print preview generation (135 Kb): 94ms (414 pages/sec) * PDF export: 20ms (2000 pages/sec). Previous version use intermediate metafile object, so export was slower and images was reencoded. Now all images are saved in original format.

We need to implement reminders in something, modeled after what Outlook offers. There's a checkbox to enable/disable a reminder; a calendar to pick a date; and a combo-box that has 48 entries on 30-min time boundaries, from 00:30 to 23:30. This data is being stored in a DB record.

We need to implement reminders in something, modeled after what Outlook offers. There's a checkbox to enable/disable a reminder; a calendar to pick a date; and a combo-box that has 48 entries on 30-min time boundaries, from 00:30 to 23:30. This data is being stored in a DB record. This is running in Windows. Is there a solution other than polling the DB (running a SQL query) every 30 minutes? So if you want to get an alert next Wed at 4:30 PM, what can be done without polling the DB every 30 minutes? EDIT: is it possible to use Windows Task Scheduler to help? Say, poll the DB every 24 hours and pull down the reminders scheduled for the next 24-hr period and then poke them into the task scheduler. All we need is to get a windows message with a couple of parameters sent at the assigned time. Note that this app is a regular app, not a service. We don't need to start/stop any services or even apps, just send a message. (I'm not familiar with the Windows Task Mgr API, so any ins

Originally shared by Thomas Mueller (dummzeuch)

Originally shared by Thomas Mueller (dummzeuch) Today I had a curious bug: After changing the way GPS coordinates were read from a file (not calculated!) all of a sudden lots of unrelated floating point calculations had different results. I reverted the changes just to be sure and, yes, the results… http://blog.dummzeuch.de/2018/09/06/if-your-floating-point-calculations-differ-after-a-trivial-change/

What you think about coroutine-based multithreading concurrency in Delphi like GoLang

What you think about coroutine-based multithreading concurrency in Delphi like GoLang https://github.com/Purik/AIO Probably evolution paths, actuality, etc

Fellow Delphi developers

Fellow Delphi developers, This is with great pleasure that we announce the immediate availability of HelpNDoc 5.9, an easy to use yet powerful help authoring tool producing CHM help files, responsive HTML 5 and mobile Web Sites, DocX and PDF manuals, ePub and Kindle eBooks as well as Qt Help files from a single source. HelpNDoc is Free for personal use and evaluation purposes and is available at: https://www.helpndoc.com HelpNDoc 5.9 provides many new features and enhancements including WinHelp HLP files import; Google Analytics support in HTML documentation web-sites; an enhanced project analyzer; a new script to merge children topics; better style support; enhanced documentation generaoin; and many additional enhancements and bug fixes. You can learn more about this update at: https://www.helpndoc.com/news/2018-09-06-import-winhelp-hlp-files-google-analytics-support-html-documentation-and-more Download HelpNDoc now and use it for free for personal and evaluation purposes: https://www

Does anyone know of a way to stop a FireMonkey scroll box from scrolling during dragging? I have a control inside of a TVertScrollBox which I need to handle the mouse/finger events rather than its parent scrollbox. Everything I’ve tried hasn’t worked and the control moves around in the scrollbox while interacting with it which is really annoying UX.

Does anyone know of a way to stop a FireMonkey scroll box from scrolling during dragging? I have a control inside of a TVertScrollBox which I need to handle the mouse/finger events rather than its parent scrollbox. Everything I’ve tried hasn’t worked and the control moves around in the scrollbox while interacting with it which is really annoying UX. I guess I need to stop the events propagating to the parent once handled but can’t see a way to do this. Has anyone managed to do this? Thanks!

Well, we have been waiting to long, after the closure of the forums.embarcadero.com, which fortunately currently can still be read, but cannot posted on anymore.

Well, we have been waiting to long, after the closure of the forums.embarcadero.com , which fortunately currently can still be read, but cannot posted on anymore. So I have decided to design a replacement Forum, which is based on the same layout as the original forums.embarcadero.com : " http://www.delphiforum.net " This Forum will STAY. It will not be removed, and when I drop dead, it will become available in the public domain. The Forum runs on a Linux Debian based VPS with a MariaDB (MySQL) back-end, located at a major site in the Netherlands. Right now, it look rather empty. So please SPREAD THE WORD any way you can think of, so that all previous Embarcadero forum users can now migrate to this compatible forum. Any requests for changes and improvements, please email me at delphiforum@sartrack.nz PS: Note the correct URL for this Forum: http://www.delphiforum.net and NOT delphiforum[s].net which is a locked, non-existent domain stolen by GoDaddy to make money out of it.

This is the third episode of our tutorial on how to build a database engine from scratch. This time we implement sequence (or record) persistency, the metadata layer and we are basically ready to connect the table definitions to actual record data being stored! This is a code heavy post so snuggle up with your ipad - or just fork the code from bitbucket and check it out!

This is the third episode of our tutorial on how to build a database engine from scratch. This time we implement sequence (or record) persistency, the metadata layer and we are basically ready to connect the table definitions to actual record data being stored! This is a code heavy post so snuggle up with your ipad - or just fork the code from bitbucket and check it out! #Delphi #Embarcadero #RollYourOwn #DatabaseEngine https://jonlennartaasenden.wordpress.com/2018/09/05/building-a-delphi-database-engine-part-three/

Hi guys, I just want to share my experience with Tokyo 10.2.3 and HDPI.

Image
Hi guys, I just want to share my experience with Tokyo 10.2.3 and HDPI. To test HDPI I'm running Delphi on Win10 (latest version) on a machine with 2 monitors: - main monitor a 27" HDPI 3840x2160 200% zoom - secondary monitor 24" Full HD 1920x1080 100% zoom The secondary monitory is positioned on left (as shown on attached picture). On the monitor 2 I'm running the Delphi IDE (cause it's not ready for hdpi) and on monitor 1 I run and debug the application to test VCL hdpi. Some considerations on my situation: 1. I get often IDE access violations: analizing IDE call stack I could see that are involved always TMonitor objects in theese errors so I suppose that this kind of configuration is not really tested and used. 2. Ide popupmenus positions are calculated in wrong way. I suppose IDE works with main monitor resolution and not with resolution of the monitor in which is running so in my configuration several menu items are sometimes not visible depending on where

Sorry Embarcadero you are great with WINDOW

Sorry Embarcadero you are great with WINDOW but on Android.. I Started investigation ,for a project, a piece of code for Android just a few lines of code <50. On window it runs great, but On Android waaa.. bad bad. 1. The size 40G i can not run it on S2 (luck of memory) only on S6. 2. Behavior bad. 3. How do you Ebaracdero expect a professional user to work ? 4. Do i research on each pies of code ? wast of time. same exact project with Android Studio 1. The size 780k!! 2. run as expected. I love Delphi and its IDE using it since #1 but it seem i will not use it for Android. I mite be wrong ,i will keep trying. P.S I made all ready a project for Android with Delphi and it works Ok but once started on a new one well... cannot go beyond investigation. To sum it up Delphi is much better , then Android Studio , for designing a project but it lucks the 100% result.

So i have set up Tokyo because i wanted to move a project from Berlin in order to see if some stuff improved.

Image
So i have set up Tokyo because i wanted to move a project from Berlin in order to see if some stuff improved. No big problem... It's named Tokyo but i think this is over the top (English Windows, English IDE, see screenshot). More importantly, how do i get rig of the "Upcoming Events" thingy? Much appreciated!

I have listbox with pictures

Image
I have listbox with pictures var Item:TlistBoxItem; F:TBitmap; for s in FolderList{Bilder} do begin Item:=TlistBoxItem.Create(nil); Item.StyleLookup:='listboxitemnodetail'; Item.Width:=90; Item.Height:=200; Item.Margins.Rect:=rectF(0,5,5,0); F:=TBitmap.Create; f.LoadFromFile(s); Item.ItemData.Bitmap:=(f); << I want to resize to full squer 90x200 Tried // Item.ItemData.Bitmap.Resize(60,60); //Canvas.DrawBitmap(f, Rect(0, 0, sib.Width, sib.Width), ib);// f.Free; Pictures are too small on android. do i resize after loading ? but then it will be to slaw. any other list box component that i can inflate the picture to full item square ?

By installing VS Community edition I seemed to have broken my Delphi Berlin build path. Interestingly they get along fine on my other machine, same setup. I seem to recall reading about this a year or so ago when it didn't matter to me - no VS.

By installing VS Community edition I seemed to have broken my Delphi Berlin build path. Interestingly they get along fine on my other machine, same setup. I seem to recall reading about this a year or so ago when it didn't matter to me - no VS. I cannot seem to Google or Stack Overflow my way to a solution. Does anyone perhaps have a link to a discussion of this ? Thanks MSBuildToolsPath is not specified for the ToolsVersion "14.0" defined at "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSBuild\ToolsVersions\14.0", or the value specified evaluates to the empty string.

Generic records (from my record wishlist).

Generic records (from my record wishlist). I wish the following could be possible: type TRecA = record; abstract; // defines contract procedure MethodA; // no implementation provided; end; TRecB = record implements TRecA; FieldB: Integer; procedure MethodA; // contract is implemented here; end; TRecC = record FieldC: Integer; FRecA: TRecA; procedure MethodC; // calls FRecA.MethodA end; TRecD = TRecC ;

DelphiAWSSDK v0.2.0

DelphiAWSSDK v0.2.0 https://github.com/novuslogic/DelphiAWSSDK/releases/tag/v0.2.0 Summary of updates * Updated support Delphi XE to Delphi X10.2 * Tested support for Windows 32/64Bit, MacOSX 32Bit * New TAmazonIndyRESTClient and TAmazonDelphiRESTClient classes * Updated TAmazonSignatureV4 class to be less reliant on Indy, allowing for cross-platform development. * THashSHA2 supported in unit Amazon.Utils for Delphi XE8 and up. https://github.com/novuslogic/DelphiAWSSDK/releases/tag/v0.2.0

Thank you for your support! As promised here is the license management package. Work now begins on porting over Ironwood, the new serial number minting engine, to Delphi and C++ builder.

Image
Thank you for your support! As promised here is the license management package. Work now begins on porting over Ironwood, the new serial number minting engine, to Delphi and C++ builder. Remember to visit hexlicense.com and download the documentation and enjoy the Delphi quick-start tutorial :) The public repository is at: https://bitbucket.org/cipher_diaz/hexlicense/src/master/ New development and features are available via Patreon, and are pushed to the public repository on interval. #Patreon #Delphi #LicenseManagement

Originally shared by Thomas Mueller (dummzeuch)

Originally shared by Thomas Mueller (dummzeuch) gnugettext.pas has got a conditional define called DXGETTEXTDEBUG. If it is defined, various debug messages are written to a MemoryStream. That won’t help much, if you can’t read that stream, so you need a way to write that stream to a file. Guess what,… http://blog.dummzeuch.de/2018/09/03/enable-debug-logging-in-gnugettext-pas/

Guess what is this ;-)

Image
Guess what is this ;-)

Open a html file when a project is opened in Delphi?

Open a html file when a project is opened in Delphi? Hello all, I vaguely recollect that it is somehow possible to open a html description file automatically when a Delphi project is loaded in the IDE. I can't remember where I saw that, though. It would be extremely practical for me (I manage lots of projects). Any ideas how it is done?

I have a form full off DBAdvEdits and one DBAdvMask, the first thing is that the mask is getting the focus first (tabindex:5), before all the others, and second i wish none of them will have the cursor active, that when the client opens the form he has to click on an edit to type.

I have a form full off DBAdvEdits and one DBAdvMask, the first thing is that the mask is getting the focus first (tabindex:5), before all the others, and second i wish none of them will have the cursor active, that when the client opens the form he has to click on an edit to type. Note that none of them has auto focus, and the tab index is correct.

Originally shared by Thomas Mueller (dummzeuch)

Originally shared by Thomas Mueller (dummzeuch) The Delphi IDE has supported docking of various forms for a long time (I don’t remember if it ever did not). Unfortunately if not docked, the floating forms always seem to be in the way, and if you dock them, they take up screen space that you might… http://blog.dummzeuch.de/2018/09/02/gexperts-enhancements-for-docking-in-the-delphi-ide/
Trying to find a link to a cool app winner. Searching Emba.. no, searching here.. no. It was a Polish POS system. The name had something to do with an animal. Sorry for my useless google-fu :-S

Hello

Image
Hello , I need some help about the TTabItem When i use the tabitemcustom in the stylelookup loses the style theme in the ttabitem. How can i do that; Thanks. P.S. I am using the 10.2.3 CE FMX Delphi.

Anyone running Windows 10 Insider Preview 1773x or newer?

Image
Anyone running Windows 10 Insider Preview 1773x or newer? I have a strange problem with Delphi applications and even the Delphi IDE: When editing the content of a TComboBox (default Style = csDropDown), the Backspace key (VK_BACK) deletes two characters instead of only one character! Not only my applications are affected, even the Delphi IDE has the same behaviour: Ctrl+F in the code editor show the "Search" panel at the bottom of the editor. The Backspace key deletes two characters. "Find in files" (Ctrl+Shift+F), "Replace Text" (Ctrl*R), Run->Parameters,... almost any TComboBox-based control deletes two characters on one Backspace keystroke. Even 3rd-party experts like GExperts' Grep search misbehaves like this. But when using a TComboBoxEx, the Backspace key works normal. I'm not sure if this is bug in Windows 10, or a bug in the VCL which shows only in the latest Windows 10 builds.

Anyone running Windows 10 Insider Preview 1773x or newer? I have a strange problem with Delphi applications and even the Delphi IDE: When editing the content of a TComboBox (default Style = csDropDown), the Backspace key (VK_BACK) deletes two characters instead of only one character!

Image
Anyone running Windows 10 Insider Preview 1773x or newer? I have a strange problem with Delphi applications and even the Delphi IDE: When editing the content of a TComboBox (default Style = csDropDown), the Backspace key (VK_BACK) deletes two characters instead of only one character! Not only my applications are affected, even the Delphi IDE has the same behaviour: Ctrl+F in the code editor show the "Search" panel at the bottom of the editor. The Backspace key deletes two characters. "Find in files" (Ctrl+Shift+F), "Replace Text" (Ctrl*R), Run->Parameters,... almost any TComboBox-based control deletes two characters on one Backspace keystroke. Even 3rd-party experts like GExperts' Grep search misbehaves like this. But when using a TComboBoxEx, the Backspace key works normal. I'm not sure if this is bug in Windows 10, or a bug in the VCL which shows only in the latest Windows 10 builds.