-
Content Count
1936 -
Joined
-
Last visited
-
Days Won
25
Everything posted by Attila Kovacs
-
Finalization section not called unless main form shown
Attila Kovacs replied to Mark Williams's topic in VCL
That means Application.ShowMainForm := False; and Application.Terminate; and Application.Run; if login fails, and you won't get a flickering mainform and you will have a clean termination of the application including calling the finalization section in the mainform. -
Finalization section not called unless main form shown
Attila Kovacs replied to Mark Williams's topic in VCL
Ok, here is the thing: Application.Terminate only sends a message to the application to terminate. It will be processed in the main Application message loop, which you can start with Application.Run. To avoid showing the mainform, set Application.ShowMainForm := False; prior to .Run; -
Finalization section not called unless main form shown
Attila Kovacs replied to Mark Williams's topic in VCL
@Mark Williams Can you see what I'm writing? Just for the record. -
Finalization section not called unless main form shown
Attila Kovacs replied to Mark Williams's topic in VCL
I'm not sure what your "exit" does, and I can't see your code, but with the code below finalization is called: if not DoLogIn() then begin Application.ShowMainForm := False; Application.Terminate; Application.Run; end; -
It is indeed a mess. If you'd remove all the skinning you'd be shocked how it looks like. Putting controls to the title bar was also a steep decision. Thanx DM.
-
1GB SVN repo free from Perforce... and Git Sucks.
Attila Kovacs replied to Darian Miller's topic in Tips / Blogs / Tutorials / Videos
I don't even bother reading a website without a proper imprint. -
Any Known GDI Lockup Issues with Delphi 10.3.2?
Attila Kovacs replied to Steve Maughan's topic in VCL
or driver or hardware.. btw. taskmanager has a ton of extra columns in options, GDI objects too, but this is something else -
is there any "currency to words" routine for Delphi?
Attila Kovacs posted a topic in Algorithms, Data Structures and Class Design
I mean the ones I found on the net are not satisfying. Something like this would be great: https://www.calculator.org/calculate-online/mathematics/text-number.html -
TWebModule response content truncated before return
Attila Kovacs replied to Mark Williams's topic in Network, Cloud and Web
@Mark Williams LOL Sorry I must have been very tired. https://chapmanworld.com/2017/06/15/installing-webbroker-projects-in-microsoft-iis/ -
TWebModule response content truncated before return
Attila Kovacs replied to Mark Williams's topic in Network, Cloud and Web
I have no clue, but you could watch this video, how to create a console application from the broker to be able to debug your code. -
is there any "currency to words" routine for Delphi?
Attila Kovacs replied to Attila Kovacs's topic in Algorithms, Data Structures and Class Design
Worse. 4-20-12 -
How to manage defined list values
Attila Kovacs replied to Mike Torrettinni's topic in Algorithms, Data Structures and Class Design
You could associate the loaded values with enums, but which of the above mentioned versions showing you the constant values with codeinsight? -
How to manage defined list values
Attila Kovacs replied to Mike Torrettinni's topic in Algorithms, Data Structures and Class Design
Or you could convert a JSON on the fly to any record or class, thus the multi-language support you mentioned would be solved too. The question is, do you really need this amount of data linked to every single project? -
Create a form you like, right click on it, add to repository....
-
FastMM Full Debug Mode and JCL problem
Attila Kovacs replied to Jacek Laskowski's topic in RTL and Delphi Object Pascal
Not using goole 😛 https://issuetracker.delphi-jedi.org/view.php?id=6560 -
If you can alter both apps I would create an encrypted file and pass it to the other as parameter.
-
Creating a Shell-Link with hotkey property
Attila Kovacs replied to PeterPanettone's topic in I made this
I'm not sure if you missed the second line in the code "shortcut creation object". I did not know that you want to edit existing shortcuts, sorry. I'm wasting here my time. Confirmed. -
Creating a Shell-Link with hotkey property
Attila Kovacs replied to PeterPanettone's topic in I made this
This is how I'm using it. SCut := TWin32ShortCut.Create; try SCut.Location := ciDesktop; SCut.FileName := sp[0]; SCut.AppPath := ResolvePath(sp[1]); SCut.WorkDir := ResolvePath(sp[2]); SCut.IconPath := ResolvePath(sp[3]); if l > 4 then if TryStrToInt(sp[4], i) then SCut.IconIndex := i; SCut.SaveShortCut; finally SCut.Free; end; function ResolvePath(const Path: string): string; var sp: TArray<string>; i: Integer; begin sp := Path.Split(['%']); Result := ''; for i := 0 to High(sp) do case i mod 2 of 0: Result := Result + sp[i]; 1: Result := Result + GetEnvironmentVariable(sp[i]); end; end; -
Creating a Shell-Link with hotkey property
Attila Kovacs replied to PeterPanettone's topic in I made this
And? Change Published to Public and TWin32FindDataA to TWin32FindDataW or TWin32FindData, Dummy: Longint to Dummy: Cardinal -
Creating a Shell-Link with hotkey property
Attila Kovacs replied to PeterPanettone's topic in I made this
https://web.archive.org/web/20171110112441/https://www.tek-tips.com/faqs.cfm?fid=7526 -
Creating a Shell-Link with hotkey property
Attila Kovacs replied to PeterPanettone's topic in I made this
They killed Kenny! Strange, I just opened it 5 minutes ago 😄 Try it later again, its a thin unit to do the same. (As I understand your needs) -
Creating a Shell-Link with hotkey property
Attila Kovacs replied to PeterPanettone's topic in I made this
https://www.tek-tips.com/faqs.cfm?fid=7526 ? -
Why is this thread in RTL and DOP?
-
TJson - Strip TDateTime property where value is 0?
Attila Kovacs replied to Lars Fosdal's topic in Network, Cloud and Web
@Lars Fosdal Thx for the input, I wanted to create something generic with the less effort, I'll go with Uwe's example above and decorate the fields for this PHP API for now. Strange, that I'm the only one who facing this, but the DecodeISO8601Time() conversion in System.DateUtils is not ISO8601. -
TJson - Strip TDateTime property where value is 0?
Attila Kovacs replied to Lars Fosdal's topic in Network, Cloud and Web
Barely passed 6 months and I'm sitting here with dates like "2019-10-27T22:48:20+0100" from a php API, which are ISO8601 dates, but Delphi can't handle it because of the missing colon in the time zone offset...... I've tried everything I can think of to hook the conversion to TDateTime, globally (not on field basis) but I failed. The corresponding methods are not virtual, Reverter can be regged only on classes, interceptors only on field basis. Maybe it's too late and I'm missing something, @Uwe Raabe, how can I register a reverter for TDateTime? (Creating the marshal objects is not a problem at all, I'm already doing it for other reasons.)