diff --git a/.gitattributes b/.gitattributes index 15b71d927d..c8cd5c2452 100644 --- a/.gitattributes +++ b/.gitattributes @@ -1654,7 +1654,7 @@ components/jcf2/IdePlugin/lazarus/jcfidelazarus.lpk svneol=native#text/plain components/jcf2/IdePlugin/lazarus/jcfidelazarus.pas svneol=native#text/pascal components/jcf2/IdePlugin/lazarus/jcfidemain.pas svneol=native#text/pascal components/jcf2/IdePlugin/lazarus/jcfideregister.pas svneol=native#text/pascal -components/jcf2/IdePlugin/lazarus/jcfsettings.lpi svneol=native#text/plain +components/jcf2/IdePlugin/lazarus/jcfsettings.res -text components/jcf2/IdePlugin/lazarus/jcfuiconsts.pas svneol=native#text/plain components/jcf2/IdePlugin/lazarus/languages/jcfideregister.cs.po svneol=native#text/plain components/jcf2/IdePlugin/lazarus/languages/jcfideregister.de.po svneol=native#text/plain diff --git a/components/jcf2/IdePlugin/lazarus/jcfideregister.pas b/components/jcf2/IdePlugin/lazarus/jcfideregister.pas index 315ba8177f..82f9f6821d 100644 --- a/components/jcf2/IdePlugin/lazarus/jcfideregister.pas +++ b/components/jcf2/IdePlugin/lazarus/jcfideregister.pas @@ -36,12 +36,14 @@ uses { rtl } SysUtils, Classes, { lcl } - LCLType, FileUtil, LResources; + LCLType, FileUtil; procedure Register; implementation +{$R jcfsettings.res} + uses { lazarus } LazIDEIntf, MenuIntf, IdeCommands, @@ -85,23 +87,21 @@ end; procedure SetLazarusDefaultFileName; var - R: TLResource; S: TFileStream; + R: TResourceStream; begin JCFOptsFile := AppendPathDelim(LazarusIDE.GetPrimaryConfigPath) + DefaultJCFOptsFile; LazarusIDE.CopySecondaryConfigFile(DefaultJCFOptsFile); if not FileExistsUTF8(JCFOptsFile) then begin // create default - R := LazarusResources.Find('JCFSettings', 'CFG'); - if (R <> nil) and (R.Value <> '') then - begin - S := TFileStream.Create(UTF8ToSys(JCFOptsFile), fmCreate); - try - S.Write(R.Value[1], Length(R.Value)); - finally - S.Free; - end; + R := TResourceStream.Create(HInstance, PChar('JCFSettings'), PChar(RT_RCDATA)); + S := TFileStream.Create(UTF8ToSys(JCFOptsFile), fmCreate); + try + S.CopyFrom(R, R.Size); + finally + S.Free; + R.Free; end; end; end; @@ -149,7 +149,6 @@ end; initialization - {$I jcfsettings.lpi} lcJCFIDE := TJcfIdeMain.Create; finalization diff --git a/components/jcf2/IdePlugin/lazarus/jcfsettings.lpi b/components/jcf2/IdePlugin/lazarus/jcfsettings.lpi deleted file mode 100644 index c13239b085..0000000000 --- a/components/jcf2/IdePlugin/lazarus/jcfsettings.lpi +++ /dev/null @@ -1,170 +0,0 @@ -LazarusResources.Add('JCFSettings','CFG',[ - ''#13#10''#13#10' 2.44 '#13#10' 40208.0415705324 '#13#10' format settings for use with Lazarus <' - +'/Description>'#13#10' '#13#10' False ' - +#13#10' 1 '#13#10' True '#13#10' True '#13#10' ' - +' True '#13#10' True '#13#10' '#13#10' '#13#10' 0 '#13#10' True '#13#10' False '#13#10' S' - +'ender '#13#10' dpr,lpr,pas,pp '#13#10' '#13#10' '#13#10' 2 '#13#10' 0 '#13#10' False '#13#10' False '#13#10' 2 '#13#10' True '#13#10' False '#13#10' True '#13#10' True ' - +''#13#10' True '#13#10' True '#13#10' ' - +'False '#13#10' True '#13 - +#10' False '#13#10' False '#13#10' ' - +#13#10' '#13#10' True '#13#10' ' - +' False '#13#10' 2 '#13#10' 2 '#13#10' True '#13#10' False <' - +'/SpaceBeforeClassHeritage>'#13#10' 0 '#13#10' 0 '#13#10' 0 '#13 - +#10' 0 '#13#10' 0 '#13#10' 0 '#13#10' 0 '#13#10' 0 '#13#10' 0 '#13#10' ' - +' 2 '#13#10' True '#13#10' 0 '#13#10' ' - +' False '#13#10' False '#13#10' False '#13#10' False '#13#10' False '#13#10' False '#13 - +#10' '#13#10' '#13#10' 2 '#13#10' 90 '#13#10' ' - +' 1 '#13#10' True '#13#10' True '#13#10' False '#13#10 - +' False '#13#10' True '#13#10' ' - +'True '#13#10' True '#13#10' True '#13#10' True '#13#10' ' - +' True '#13#10' True '#13#10' ' - +'1 '#13#10' 0 '#13#10' '#13#10' 1 '#13#10' 1 '#13#10' 1 '#13#10' 0 '#13#10' 0 '#13#10 - +' 0 '#13#10' 1 '#13#10' ' - ,' 0 '#13#10' 1 '#13#10' 0 '#13#10' 1 ' - +''#13#10' 1 '#13#10' 0 '#13#10' 1 '#13#10' 0 '#13 - +#10' True ' - +#13#10' 4 '#13#10 - +' 1 '#13#10' 1 '#13#10' '#13#10' ' - +''#13#10' True '#13#10' True '#13#10' '#13#10' ' - +#13#10' True '#13#10' 1 '#13#10' 1 '#13#10' 1 '#13#10' 1 '#13#10' 1 '#13#10' '#13#10' '#13#10 - +' True '#13#10' '#13#10' '#13#10' '#13#10' True '#13#10' ActivePage,AnsiCompareStr,AnsiCompareText,AnsiUppe' - +'rCase,AsBoolean,AsDateTime,AsFloat,AsInteger,Assign,AsString,AsVariant,Begi' - +'nDrag,Buttons,Caption,Checked,Classes,ClassName,Clear,Close,Components,Cont' - +'rols,Count,Create,Data,Dec,Delete,Destroy,Dialogs,Enabled,EndDrag,EOF,Excep' - +'tion,Execute,False,FieldByName,First,Forms,Free,FreeAndNil,GetFirstChild,Gr' - +'aphics,Height,idAbort,idCancel,idIgnore,IDispatch,idNo,idOk,idRetry,idYes,I' - +'nc,Initialize,IntToStr,ItemIndex,IUnknown,Lines,Math,MaxValue,mbAbort,mbAll' - +',mbCancel,mbHelp,mbIgnore,mbNo,mbOK,mbRetry,mbYes,mbYesToAll,Messages,MinVa' - +'lue,mnNoToAll,mrAbort,mrAll,mrCancel,mrIgnore,mrNo,mrNone,mrNoToAll,mrOk,mr' - +'Retry,mrYes,mrYesToAll,mtConfirmation,mtCustom,mtError,mtInformation,mtWarn' - +'ing,Name,Next,Open,Ord,ParamStr,PChar,Perform,ProcessMessages,Read,ReadOnly' - +',RecordCount,Register,Release,Result,Sender,SetFocus,Show,ShowMessage,Sourc' - +'e,StdCtrls,StrToInt,SysUtils,TAutoObject,TButton,TComponent,TDataModule,Tex' - +'t,TForm,TFrame,TList,TNotifyEvent,TObject,TObjectList,TPageControl,TPersist' - +'ent,True,TStringList,TStrings,TTabSheet,Unassigned,Value,Visible,WideString' - +',Width,Windows,Write '#13#10' '#13#10' ' - +#13#10' True '#13#10' False,Name,nil,P' - +'Char,read,ReadOnly,True,WideString,write '#13#10' '#13 - +#10' '#13#10' True '#13#10' ActnColorMaps,ActnCtrls,ActnList,ActnMan,ActnMenus,ActnPopup,ActnRes,A' - +'DOConst,ADODB,ADOInt,AppEvnts,AxCtrls,BandActn,bdeconst,bdemts,Buttons,Chec' - +'kLst,Classes,Clipbrd.pas,CmAdmCtl,ComCtrls,ComStrs,Consts,Controls,CtlConst' - +'s,CtlPanel,CustomizeDlg,DataBkr,DB,DBActns,dbcgrids,DBClient,DBClientActnRe' - +'s,DBClientActns,DBCommon,DBConnAdmin,DBConsts,DBCtrls,DbExcept,DBGrids,DBLo' - +'cal,DBLocalI,DBLogDlg,dblookup,DBOleCtl,DBPWDlg,DBTables,DBXpress,DdeMan,Di' - +'alogs,DrTable,DSIntf,ExtActns,ExtCtrls,ExtDlgs,FileCtrl,FMTBcd,Forms,Graphi' - +'cs,GraphUtil,Grids,HTTPIntr,IB,IBBlob,IBCustomDataSet,IBDatabase,IBDatabase' - +'Info,IBDCLConst,IBErrorCodes,IBEvents,IBExternals,IBExtract,IBGeneratorEdit' - +'or,IBHeader,IBIntf,IBQuery,IBRestoreEditor,IBSecurityEditor,IBServiceEditor' - +',IBSQL,IBSQLMonitor,IBStoredProc,IBTable,IBUpdateSQL,IBUtils,IBXConst,ImgLi' - +'st,Jcl8087,JclAbstractContainers,JclAlgorithms,JclAnsiStrings,JclAppInst,Jc' - +'lArrayLists,JclArraySets,JclBase,JclBinaryTrees,JclBorlandTools,JclCIL,JclC' - +'LR,JclCOM,JclComplex,JclCompression,JclConsole,JclContainerIntf,JclCounter,' - +'JclDateTime,JclDebug,JclDotNet,JclEDI,JclEDI_ANSIX12,JclEDI_ANSIX12_Ext,Jcl' - +'EDI_UNEDIFACT,JclEDI_UNEDIFACT_Ext,JclEDISEF,JclEDITranslators,JclEDIXML,Jc' - +'lExprEval,JclFileUtils,JclFont,JclGraphics,JclGraphUtils,JclHashMaps,JclHas' - +'hSets,JclHookExcept,JclIniFiles,JclLANMan,JclLinkedLists,JclLocales,JclLogi' - +'c,JclMapi,JclMath,JclMetadata,JclMIDI,JclMime,JclMiscel,JclMsdosSys,JclMult' - +'imedia,JclNTFS,JclPCRE,JclPeImage,JclPrint,JclQGraphics,JclQGraphUtils,JclQ' - +'ueues,JclRegistry,JclResources,JclRTTI,JclSchedule,JclSecurity,JclShell,Jcl' - +'SimpleXml,JclStacks,JclStatistics,JclStreams,JclStrHashMap,JclStringLists,J' - +'clStrings,JclStructStorage,JclSvcCtrl,JclSynch,JclSysInfo,JclSysUtils,JclTa' - +'sk,JclTD32,JclUnicode,JclUnitConv,JclUnitVersioning,JclUnitVersioningProvid' - +'ers,JclValidation,JclVectors,JclWideFormat,JclWideStrings,JclWin32,JclWin32' - ,'Ex,JclWinMIDI,ListActns,Mask,MConnect,Menus,Midas,MidasCon,MidConst,MPlayer' - +',MtsRdm,Mxconsts,ObjBrkr,OleAuto,OleConst,OleCtnrs,OleCtrls,OleDB,OleServer' - +',Outline,Printers,Provider,recerror,ScktCnst,ScktComp,ScktMain,SConnect,Sha' - +'dowWnd,SimpleDS,SMINTF,SqlConst,SqlExpr,SqlTimSt,StdActnMenus,StdActns,StdC' - +'trls,StdStyleActnCtrls,SvcMgr,SysUtils,TabNotBk,Tabs,TConnect,Themes,ToolWi' - +'n,ValEdit,VDBConsts,WinHelpViewer,XPActnCtrls,XPMan,XPStyleActnCtrls '#13#10' '#13#10' '#13#10' 0 '#13 - +#10' 1 '#13#10' True '#13#10' True '#13#10' 7 '#13#10' True '#13#10' 15 '#13#10' '#13#10 - +' '#13#10' False '#13#10' MSWINDOWS '#13#10' '#13#10' '#13#10' '#13#10' False '#13#10' False ' - +#13#10' False '#13#10' F' - +'alse '#13#10' False '#13#10 - +' False '#13#10' False' - +' '#13#10' 2 '#13#10' 60 '#13#10' 5 '#13#10 - +' 5 '#13#10' 0 '#13#10' '#13#10' '#13#10' False '#13#10' '#13#10' '#13#10' '#13#10' False ' - +''#13#10' False '#13#10' False '#13#10' False '#13#10' '#13#10' '#13#10' ' - +#13#10' '#13#10' '#13#10' '#13#10' '#13#10' 1 ' - +#13#10' True '#13#10' ' - +' False '#13#10' False '#13#10' Fa' - +'lse '#13#10' False '#13#10' False '#13#10' 0 '#13#10' ' - +' False '#13#10' ' - +#13#10''#13#10 -]); diff --git a/components/jcf2/IdePlugin/lazarus/jcfsettings.res b/components/jcf2/IdePlugin/lazarus/jcfsettings.res new file mode 100644 index 0000000000..82325fb2dc Binary files /dev/null and b/components/jcf2/IdePlugin/lazarus/jcfsettings.res differ