DelphiとC++BuilderのVCLコミュニティ規模は非常に大きいため、開発者がすぐに再利用可能な様々なライブラリ、関数、非ビジュアルクラスのセットを見つけることができます。
その中で人気のあるライブラリの一つにJEDI Code Library (JCL) があります。このライブラリは、JEDIコミュニティから寄贈されたコードをベースに構築されており、文字列、ファイル、セキュリティ、演算、I/Oなどのカテゴリで、すぐに再利用可能なユーティリティ関数や非ビジュアルクラスを提供しています。
そして充実したドキュメントの提供、テストも万全です。
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 |
uses JclFileUtils, JclStrings, JclSysUtils; { TForm1 } procedure TForm1.FileListBox1Change(Sender: TObject); var FileName: TFileName; I: Integer; begin FileName := FileListBox1.FileName; Memo1.Lines.BeginUpdate; try Memo1.Lines.Clear; if VersionResourceAvailable(FileName) then with TJclFileVersionInfo.Create(FileName) do try for I := 0 to LanguageCount - 1 do begin LanguageIndex := I; Memo1.Lines.Add(Format('[%s] %s', [LanguageIds[I], LanguageNames[I]])); Memo1.Lines.Add(StringOfChar('-', 80)); Memo1.Lines.AddStrings(Items); Memo1.Lines.Add(BinFileVersion); Memo1.Lines.Add(OSIdentToString(FileOS)); Memo1.Lines.Add(OSFileTypeToString(FileType, FileSubType)); Memo1.Lines.Add(''); end; Memo1.Lines.Add('Translations:'); for I := 0 to TranslationCount - 1 do Memo1.Lines.Add(VersionLanguageId(Translations[I])); Memo1.Lines.Add(BooleanToStr(TranslationMatchesLanguages)); finally Free; end; finally Memo1.Lines.EndUpdate; end; end; |
JEDI Code Libraryの入手
JEDI Code Libraryは、GetItパッケージマネージャを開いて、検索ボックスから”JEDI”というキーワードで検索すると見つかりますので、これを選択してインストールすることができます。
JEDI Code Libraryは、Mozilla Public License（MPL）の条件に基づいて一般にリリースされているため、フリーウェア、シェアウェア、オープンソースおよび商用プロジェクトなど自由に使用できます。なお、エンバカデロではこのライブラリに関するテクニカルサポートサービスは提供しておりません。
Reduce development time and get to market faster with RAD Studio, Delphi, or C++Builder.
Design. Code. Compile. Deploy.
Start Free Trial Upgrade Today
Free Delphi Community Edition Free C++Builder Community Edition
Design. Code. Compile. Deploy.
Start Free Trial Upgrade Today
Free Delphi Community Edition Free C++Builder Community Edition
