TSpeedButtonのダブルクリックイベントを取得する方法。

TspeedButtonのダブルクリックイベントは、ダブルクリックすると起動しませんでした.OnClickイベントとOnDblClickイベントに対して異なる機能が必要です。TSpeedButtonのダブルクリックイベントを取得する方法。

ありがとう、 Rakesh。

2011-11-10 rakesh

簡単な答えは、GroupIndexプロパティが0でない限り、以下のコードで、Delphiのダブルクリックイベントが使用されないということです。これは、FDownが真であることを意味します。 GroupIndex = 0の場合、FDownは真ではありません。

procedure TSpeedButton.WMLButtonDblClk(var Message: TWMLButtonDblClk); 
begin 
    inherited; 
    if FDown then DblClick; 
end;

あなたはあなたの周りプレイしたい場合は、VCLを再コンパイルし、それはおそらくあなたのために働くだろうOK、これから「FDown場合」を削除できます。そのイベントのソースは、次のようになります。代わりに、VCLを再コンパイルする

-Don

出典

2011-11-10 03:56:49

、私は自分のユニットにTSpeedButtonのコードをコピーし、名前を変更し、そしてXYZは、企業のコンポーネントの接頭辞であるTXYZSpeedButton、と私のアプリでTSpeedButtonを交換する一般的でしょう。私はそのようなソースを再配布しないので、そのような技術はオープンソースのアプリケーションでは使用できませんが、クローズドソースの商用アプリケーションでは大丈夫です。私はより良いホットイメージサポート（マウスオーバーや画像の変更）を伴うTSpeedButtonを望んでいました。これを行うには、基本的にbuttons.pasからTSpeedButtonソースを複製して変更する必要はありませんでした。 –

TSpeedButtonのダブルクリックイベントを取得する方法。

答えて

関連する問題