microtronx

On my side the IDE 11.2 with latest patch hangs minimum 1-2 times per day, without the possibility to save changes. That means, all changes since last saving are lost! This is crazy because Delphi was not for free. I try to click to "Save All" every x minutes but mostly if I forgot this for some minutes because of a big project ... work of >30 minutes gets lost and I have to start from scratch.

I don't like "with" and do try to avoid it all the time!

Hi folks, after searching a lot for different possibilities, Alexander remembered me that we can use his components (https://delphihtmlcomponents.com/) to create very simply pdf files on the fly. If you search for a component to create PDF files without much code from HTML (incl. using images files) use this code: thtdocument.HTMLtoPDFFile(ahtmlstring:string; aPDFfile:string); Thanks to @Alexander Sviridenkov for his wonderfull components.

Yes, but with thtdocument you do not have any dependencies to other libs/dll's ...

Hi, I need a way to send and receive "messages" to a connected rdp session or from a rdp session to i.e. start a software, which is only on local computer available from rdp session, i.e. for sending attachments to outlook. Is WTSAPI32 a good starting point or are there any ready to use components for send/receive over rdp / pipe? Thanks for some hints.

@Dave Nottage Do I need to create any registry-Keys on my client machine to get that demo work? Answer: YES, see: https://docs.microsoft.com/en-us/windows/win32/termserv/virtual-channel-client-registration

I searched for hours and was not able to find anything ... and now a full demo Wow + Thanks Dave

We've used https://www.nsoftware.com/sftp/sftpserver/ when we needed a lightweight server, installed in seconds with good functionality.

Same here. Do you have DevExpress Units in your uses? I see this problem only when those units are in use. In small projects its working but not in bigger ones.

It is a small bug but it annoys us every day: https://quality.embarcadero.com/browse/RSP-25667?jql=text ~ "versioncode" Please vote for it so it gets solved!

Installation went good from 10.4.1 to 10.4.2. Only problem I had, was with third party components / packages. I.e. I had to reinstall i.e. Reportbuilder 20.04 for Sydney but now it starts without any problems. Anyone using 10.4 (or 10.4.2) in production environment? We're stuck at 10.3 ...

What about only creating your form without applying the saved changes? = That should be your design time state, or I'm wrong?

... wow, I also know that old DOS - blue background Turbo Pascal .. crazy. It feels like i worked with it "last year" ... so it feels like only 1-2 years of experience 😉

Hi, what components, classes do you use to create extended service apps for windows i.e. with forms and timers etc or have one exe for service and gui? Only tService or any other commercial components?

Hi, which is the simpliest way to add new properties to a existing component in runtime? Lets say we have a tDataset and I want to att a fList:tList to it in runtime, if it does not exists. Is this possible?

Very stable and good components + very good support. We can recommend htmlcomponents fully! Thanks for your work Alexander!

I have created a global "tDictionary<tComponent, tmxEvents>" and a small helper function to return an entry or add an entry if it does not exists ... working perfect. Thanks for your tips guys.

After searching the internet a lot i've decided to create a new unit to be able to assign multiple afterscroll or afteropen events to one component ... very simple in runtime. Informations on https://www.delphipraxis.net/143341-event-multicast-problem-howto-sender-methodname.html helped me to create a basic unit. Pls check it at https://github.com/MicrotronX/Multicast-Events I know, there must be something better out there ... but for me this works very good ... PS: I cannot guarantee that the source code is free of bugs! Example-Usage in a tDataset descant: unit myMulticastEventDatasetUnit; interface uses System.Classes, Data.DB, mxEventsUnit; type tmyMulticastEventDataset=class(tDataset) private function fmxevents_get:tmxevents; public fmxEvents:TmxEvents; constructor Create(AOwner:TComponent); override; destructor Destroy; override; published property mxEvents:TmxEvents read fmxevents_get; end; implementation constructor tmyMulticastEventDataset.Create(AOwner: TComponent); begin inherited; fmxEvents:=nil; end; destructor tmyMulticastEventDataset.Destroy; begin if assigned(fmxEvents) then fmxEvents.free; fmxEvents:=nil; inherited; end; function tmyMulticastEventDataset.fmxevents_get: tmxevents; begin // we Create the tmxEvents only if there is a need if not assigned(fmxevents) then begin fmxEvents:=tmxEvents.create(self); end; result:=fmxevents; end; end. If someone knows a way to inject this into tDataset itself, you're free to change the code! Declarations for Examples: myDS:tmyMulticastEventDataset; procedure FirstAfterScrollEvent(vDataset:tDataset); procedure SecondAfterScrollEvent(vDataset:tDataset); Example-Usage for registering a AfterScroll Event: myDS.mxEvents.Event('AfterScroll').AddDatasetNotifyEvent('uniquenameforevent1', FirstAfterScrollEvent) ; myDS.mxEvents.Event('AfterScroll').AddDatasetNotifyEvent('uniquenameforevent2', SecondAfterScrollEvent) ; Example-usage for disabling a already registered AfterScroll Event: myMCDS1.mxEvents.Event('AfterScroll').Disable('uniquenameforevent1') ; myMCDS1.mxEvents.Event('AfterScroll').Disable('uniquenameforevent2') ;

I found spring4d but there was no demo or i've not seen any demo how to use that. How is Event<T> used?

Why we do not go another way ... and why does Embarcadero do not give Andreas free lifetime licenses or a lifetime subscription? We / Subscription owners pay a lot and sometimes we don't get anything within that subscription period + Andreas is doing / has done a lot for Delphi in the last years ... so this would be a very good roi for embarcadero IMO. I don't know if Andreas would accept this ... but if he can, it would be a big plus for delphi ...

I would use "Exit;". Having nearly same needs and have a created a tObject for managing a tDictionary<string, __myrecord> to manage everything ... very fast IMO. Be sure to use "MonitorEnter" and MonitorExit if this can be used in multithreaded applications like function tmyComponent.getvaluerecord(vName: string; const vDefaultValue: variant): __MyRecord; var vValue:__MyRecord; begin if MonitorEnter(fDATA, fMonitorTimeout) then begin try vname:=trim(lowercase(vname)); if fData.TryGetValue(vname, result)=false then begin // we don't have that key in dictionary ... return default value ... or create a new entry etc.. result.vwert:=vDefaultValue; result.isObject:=false; result.isFile:=false; result.doFreeObject:=false; result.vcomponent:=nil; result.vname:=''; result.vdtstamp:=0; result.vtype:=''; result.vgroup:=''; end; finally MonitorExit(fDATA); end; end; end;

Any news here? We're also searching for a updated libmysql.dll in 32bit for mysql8.

Be sure to have a backup, after installing this patch Reportbuilder and DevExpress Components connected with Teechart are not working any more: So, whats next if we don't have a backup ??

I think the Patch has uninstalled all components (Teechart Standard is one of them) which i had selected in time of installation ... right after the patch installed i saw all optional software & languages not installed any more in platform manager. After reinstalling them with platform manager (tools menu), everything fine again ...

Ok, after reinstalling missing components over Tools + Platform manager = everything working again 😉