Have an amazing solution built in RAD Studio? Let us know. Looking for discounts? Visit our Special Offers page!
C++DelphiRAD Studio

DelphiおよびC++ Builder開発者の生産性を10倍向上させる強力なJEDIコードライブラリ

460k lines of code library for delphi c builder developers to improve productivity by 10x ja

DelphiとC++BuilderのVCLコミュニティ規模は非常に大きいため、開発者がすぐに再利用可能な様々なライブラリ、関数、非ビジュアルクラスのセットを見つけることができます。

その中で人気のあるライブラリの一つにJEDI Code Library (JCL) があります。このライブラリは、JEDIコミュニティから寄贈されたコードをベースに構築されており、文字列、ファイル、セキュリティ、演算、I/Oなどのカテゴリで、すぐに再利用可能なユーティリティ関数や非ビジュアルクラスを提供しています。

そして充実したドキュメントの提供、テストも万全です。

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 getit ja 4633017

JEDI Code Libraryは、Mozilla Public License(MPL)の条件に基づいて一般にリリースされているため、フリーウェア、シェアウェア、オープンソースおよび商用プロジェクトなど自由に使用できます。なお、エンバカデロではこのライブラリに関するテクニカルサポートサービスは提供しておりません。

RAD Studio 13.1 Florence Now Available See What's New in RAD Studio 13.1 Delphi is 31 - Webinar Replay

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

Leave a Reply

This site uses Akismet to reduce spam. Learn how your comment data is processed.

IN THE ARTICLES