-
Content Count
70 -
Joined
-
Last visited
Community Reputation
2 NeutralRecent Profile Visitors
The recent visitors block is disabled and is not being shown to other users.
-
Ok Uwe. If you don't want to want to solve this simple issue for a poor, poor programmer, I'll do it myself Seriously, I understand. So I found a configuration for the standard formatter I share for others if they find it useful: This solve my terrible () problem wtih MMX. Thanks Uwe
-
Hello, I have a strange behaviour when I add a new parameter in a method. My method has 2 params like this procedure TForm1.Test( const par1: Integer; const par2: string ); begin // ... end; I add the new param with The result is a wrong formatted code: procedure TForm1.Test(const Par1: Integer; const Par2: string; const NewParam: Integer); begin // end; The more params there are, the worst is the formatting... I would like to maintain the same formatting for my params. Any hint? Thanks, Eddy
-
UsesHelper is a drug 🙂 Please, I miss it in D11. Sources at least?
-
I don't know if this is the right place. Sorry in advance if I did a mistake. - Delphi 10.4.1 - GExperts 1.3.18 - Always when close appear an error similar "Error in expert 18". It is favorites file - After this error, Delphi never closes and a lot of AV comes from hell 🙂 - Tried to disable the expert with no success - I have never used this expert - I removed from DPR of the last SVN commit all the uses about favorites and recompile - No more errors
-
Hello, I don't know how I can pass an anonymous function inside a omniTask. Example: type TMyObject = class [...] end; TMyFunction = reference to function(const Arg1: string): TMyObject; var lFunc: TMyFunction; procedure Something; begin lFunc := function(const Arg1: string): TMyObject begin result := TMyObject.Create(Arg1); end; CreateTask( procedure(Task: IOmniTask) var lthdFunc: TMyFunction; lResult: TMyObject; begin lthdFunc := Task.Params['MyRefFunction'].As???; // <-- What here? lResult := lthdFunc('dummy'); [...] end ) .SetParameter('MyRefFunction', lFunc) .Run; end; Thanks in advance, Eddy.
-
Delphi Daily WTF / Antipattern / Stupid code thread
Sonjli replied to Tommi Prami's topic in RTL and Delphi Object Pascal
The marvel: if ThereIsAnError then begin ShowMessage('This is the error'); Abort; end; All exceptions in a big project with this simple, magic trick... I had to work 2 weeks to change all the exception handling system. -
Thank you for Superset, it looks amazing!
-
Hello, I hope this is the right topic. I am looking for a tool for creating web dashboards starting from Firebird databases. I used some time ago Grafana (https://grafana.com/) but it has not driver for Firebird\Interbase and similar. Do you know any tool that permits the user creation of a query and customization of result data? I don't need a compelete BI, just a web tool to custom-create data analytics (pies, linears, etc) with Firebird. Thanks. Eddy
-
I try to better explain my problem. I understand the last question was a bit (lot...) stupid 😉 I need to know if the receiver task is alive. In some cases the receiver task has gone so I continue to send messages to it and I receive this error: "TOmniCommunicationEndpoint.Send: Queue is full" How can I avoid this problem? I would like to do something like this: if not MyTask.IsDead then MyTask.Comm.Send(...) // or if WatchDog(MyTask) <> Dead then MyTask.Comm.Send(...) // where WatchDog can check the healty of the Task and the MyTask.Comm.Writer.IsFull Thanks in advance, Eddy
-
Hi, I hardly use tasks comm. A very simple question: is this code right? if lTask.Comm.Writer.IsFull then begin lLocalLogger.Debug(Format('Task Queue is FULL %s...', [lTask.Name]), lSenderLogTagMain); Sleep(1000); ... end else lTask.Comm.Send(WM_RECEIVE_DO, TOmniValue.CastFrom < IBroadcastMessage < TDataPacketBody >>(ABroadcastMessage)); ...
-
Hi, yes I'd prefer this. How do you do this? GExperts does this before compiling or building.
-
Hi, ok, I set my mind in ease...
-
Hello, I have an automation system to deploy a big application. In this automation system I build some projects in Delphi. I use the "Set Component Properties" of GExperts to update some properties before the build process. I do this "by hand" setting this: Is it possible to use a command line for any tool of GExperts? Or an sdk to implements this? Thanks, Eddy
-
I need strongest drugs... but also for me a coffee is enough for now 😅
-
I need to read the XML quickly. But the server administrator warn me often about high cpu. I understand your axiom. I use Neslib.Xml and it seems well done both in performance and resource utilization. So you recommend me to say to sa to "put his heart in peace"... I can publish the problematic loops but, as you write, the "problem" is implicitly the XML library. Thanks guys.