問題タブ [graphics32]

TPanelnamedから派生したカスタム コントロールがありTTestCtrlます。TImage32(Graphics32 から) を保持します。

ユーザーが画像をダブルクリックすると、メッセージが表示されます。問題は、メッセージを閉じた後、フォーカスがメイン アプリケーションに戻らないことです。そのため、メインアプリ/メインフォームで何をクリックしても、最初のクリックは失われます。

奇妙なこと:メインフォームからMesaj()ではなく、メインフォームからプロシージャを呼び出すと、TTestCtrl機能します(最初のクリックはもう失われません):

以下の単純/最小限のアプリケーションはテスターです。

アンチエイリアシングを提供することで、プロジェクトで行っている描画の一部を改善しようとしています。標準の Delphi Canvas 関数の代わりに、Graphics32 ライブラリを使用した単純なプロジェクトで遊んでいます。私は単純な形状でテストしていて、ぼかしの影響に気づき、修正できるかどうか疑問に思っていました.

アンチエイリアス処理された三角形の斜辺ははるかに滑らかですが、2 つの直線がぼやけて見えるのは、アンチエイリアス処理されているためです。斜辺を滑らかにしながら、垂直線と水平線が混ざらない両方の世界を最大限に活用する方法はありますか?

編集: 私が使用している Graphic32 のバージョンは、2012 年の最後のリリースが 1.9.1 であるように見えるため、公式 Github フォークのマスター ブランチのトップです。

学習目的で、Graphics32 サンプル アプリケーション「ImgView_Layers」と基本的に同じように動作するアプリケーションを構築しようとしていますが、わずかな変更を加えています。今、単純な描画レイヤーの問題に悩まされています。サンプル アプリと同じ方法で作成します。PaintSimpleDrawingHandler よりも、デフォルトのらせん以外の形状を描画しようとしています。そして、ここで問題が発生します。「デフォルト」の渦巻きは、画像に合わせて拡大縮小されています。ズームアウトすると、渦巻きが縮小され、その逆も同様です。レイヤーのサイズを変更すると、らせんのサイズも変更されます。他のものを描画すると、ズームしたり、レイヤーのサイズを変更したりしても、変更されません。

これは、ひし形、正方形、らせんの例です。スパイラルは正常に「機能」しますが、残りは機能しません。

いくつかの異なる形状、異なる描画方法を試しましたが、それでも同じ結果が得られました。誰かが渦巻きと残りの違いを説明して、渦巻きと同じようにズームおよびスケーリングされるカスタム形状を描くのを手伝ってくれませんか?

Delphi XE7 を使用しています。完全なソースは次のとおりです。