freepascal

8熱

3答えて

単位テストを作成して、DelphiとFree Pascalの両方でコンパイルして実行できる方法はありますか？ DelphiとFree Pascalでは、両方のコンパイラ（たとえば、ライブラリとフレームワークの開発者）を対象とする開発者に重複した作業をさせる異なる単位テストフレームワークがあります。 DUnitまたはFPCUnitフレームワークを使用し、テストケースのソースコード（またはフレームワー

10熱

2答えて

Free PascalのDelphiのTStopWatchに相当するものは何ですか？

Free Pascalで簡単なパフォーマンスベンチマークを実装する必要があります。 Delphiでは診断ユニットのTStopWatchレコードを使用していますが、Free Pascal/Lazarusで何が使えますか？ここで

0熱

1答えて

FreePascalのレコードのコンパクトなリストを作成しますか？

メモリが大きい構造です。それはTListです。各項目はTMyObjectであり、TMyObjectはレコードであるDataフィールド（n個のフィールド：整数、ブール値）を保持する。リストは1.000.000個のアイテムを持つことができます。私はリストをコンパクトにしたい：私はTMyObjectではなくレコードのリストを持ちたいと思い、各リスト項目はレコードでなければならない。したがって、プロキシ

-2熱

1答えて

メインメニューを右クリック

メインメニューまたはForm1を右クリックして使用すると問題が発生し、フォレスト、シー、クラウドで特定のサブメニューを開き、ピクチャ、終了メニューを無視します。今ではすべての作品をポップアップメニューを追加することで、私の問題を修正しました unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, Fi

1熱

1答えて

FreePascalとは：「=オーバーロードは」私は<code>TFPGList<TnnItem></code>からジェネリックリストを作っ

使用されている行を検索し、現在のコンパイラは、（大きなコードのために、ラザロのメッセージで）エラーを示しています Error: Operator is not overloaded: "TnnItem" = "TnnItem" が、それは表示されませんラインでこれを使用するソースは= overloadです。私はこの=使用行を削除したいと思います。それらを見つける方法？（FPC 3.0.0、ラ

2熱

2答えて

- 。無料パスカル\ラザロまたはデルファイ

私は私が持っているなぜ、どのように私はちゃうだけで右ジャンプの説明とボアの人にしたくありません生のバイトデータを含むバイト配列。配列は1000バイトです。私はその1000バイトの配列を調べて、ファイル名に似ているUTF-16 Unicode文字のみを抽出したいと思いますが、文字列が1000バイトの配列のどこにあるかはわかりません。私は Lazarus Unicode Pageとthisを読んだ

1熱

1答えて

任意のタイプのファイルをbase64文字列にエンコードして、それをLazarus/Delphiを使用して再びファイルにデコードしますか？

どうすればいいのですか？私のためにこれを行うことができるFreepascalユニットはありますか？私のプログラムはXMLベースのファイル形式でバイナリデータを格納できるようにする必要があります。

6熱

1答えて

DelphiとLazarusのフォーム初期化の違いは？

MainFormは実行時にいくつかのセカンダリFrameオブジェクトを作成し、さまざまなオプションパネルを表示します。ここでは、それらのフレームクラスの一つの典型的なコンストラクタは、（彼らはそれぞれのTFrameを拡張）です： constructor Tframe2.Create(AOwner: TComponent); begin inherited; edTime.T

8熱

2答えて

スクリーンレコーダーの出力のプログラミング

録画画面が必要です（毎秒15枚のスクリーンショットをキャプチャします）。この部分は私がする方法を知っている。しかし、私はこれをいくつかの一般的なビデオフォーマットに書き込む方法を知らない。私が見つけた最良のオプションは、分離したPNGファイルにフレームを書き、コマンドラインMencoderを使用して複数の出力フォーマットに変換することです。しかし、誰かが別の考えを持っているかもしれません要件：

5熱

1答えて

if文で何が問題になっていますか？

私は今、パスカルを探索しようとしています。そして私はいくつかのコンパイルエラーに遭遇しました。私はこのような場合はelse文場合はAを書きました： if ((input = 'y') or (input = 'Y')) then begin writeln ('blah blah'); end; else if ((input = 'n') or (inp