paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-02 19:24:46 +01:00
Code Issues Packages Projects Releases Wiki Activity

jcf2: initialize Application object to allow form showing

Browse Source 
git-svn-id: trunk@16981 -
This commit is contained in:
paul 2008-10-13 08:02:32 +00:00
parent 80cb5bada3
commit 416ced6947
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/jcf2/CommandLine/Lazarus/JCF.lpr
View File

@ -381,6 +381,7 @@ var
{ main program starts here }
begin
Application.Initialize;
feReturnCode := rcSuccess;
{ read registry }
GetRegSettings.ReadAll;