異なるオブジェクトパスカル方言のイベント割り当て構文

Question

私はDelphiとC++ Builderの間で共有されるべきコンポーネントに取り組んでいるので、私はというリンガフランカとしてパスカルを使用しています。私は自宅のコンピュータにDelphiをインストールしていないので、まずLazarus IDEでコンポーネントを作成しました。今、私のDelphiにも "移植" と驚異的な構文の問題を発見した：

これは、FPC（ただし、デルファイ）でコンパイル：

FSync.FSyncMethod := @SyncCheckInput; 

これは、Delphi（ただし、FPC）でコンパイル：

FSync.FSyncMethod := SyncCheckInput; 

この構文上の相違にもかかわらず、LazarusとDelphi間でユニットを共有するにはどうすればよいですか？

Answer 1

あなたのユニットの先頭にこれを挿入します。

{$IFDEF FPC}{$MODE DELPHI}{$ENDIF} 

これは、ユニットをコンパイルするためにDelphiの方言を使用するFreePascalとを指示します。 FPCが定義されていないため、Delphiは{$MODE DELPHI} directiveを無視します。

その後、イベントを動的に設定するために、この

FSync.FSyncMethod := SyncCheckInput; 

を使用することができます。