Flash が非常に人気のある今日、プログラムに Flash をいくつか追加して自慢したいと考えたことはありますか?試してみましょう。前提として、フラッシュ再生ソフトウェアをインストールする必要があります (IE でフラッシュを表示できる)。これは、Macromedia, Inc. が提供する swflash.ocx コントロールがインストールされているためです。はい、win98 は $WindowsSystemMacromedFlash の下にあり、win2k は $WinntSystem32MacromedFlash の下にあります。 ActiveX コントロールは Windows では一般的ですが、もちろん Delphi もサポートしています。Delphi を開いて始めましょう。メニューの [コンポーネント] --> [ActiveX コントロールのインポート] を選択し、SWFlash.OCX ファイルを選択してインストールします。完了すると、TShockwaveFlash コントロールが ActiveX パネルに表示されます。これで、このコントロールを使用できるようになります。フラッシュを再生します。 1 つをドラッグしてフォーム上に配置し、その Movie 属性を d:est.SWF として指定し、F9 キーを押すと、すべてが OK になります。 Delphi プログラミングはとても簡単で快適です。
TShockwaveFlash の主なプロパティ、メソッド、イベント
財産：
ReadyState - フラッシュ ファイルを読み取るときの状態。 0=ロード中、1=未初期化、2=ロード済み、3=対話型、4=完了。
TotalFrames - 総フレーム数。ReadyState = 4 の場合にのみアクセス可能。
FrameNum - 現在再生中のフレーム。
再生中 - フラッシュを再生または一時停止します。
品質 - 現在のレンダリングの品質を指定します。0=低、1=高、2=自動低、3=自動高
ScaleMode - スケール モード、0 = すべて表示、1 = NoBorder、2 = ExactFit。
AlignMode - 整列モード、Left=+1、Right=+2、Top=+4、Bottom=+8。
BackgroundColor - 背景色、赤*65536+緑*256+青、-1はデフォルトの色です。
ループ - ループするかどうか。
ムービー - 再生する Flash ファイルのパスを指定します。URL を指定できます。
方法：
Play() - アニメーションの再生を開始します。
Stop() - アニメーションを停止します。
Back() - アニメーションの前のフレームを再生します。
Forward() - アニメーションの次のフレームを再生します。
Rewind() - アニメーションの最初のフレームを再生します。
SetZoomRect(int left, int top, int right, intbottom) - ズーム領域を設定します
Zoom(intパーセント) - パーセンテージでズームします。
Pan(int x, int y, int mode) - 再生パネルをズームします。モードは次のとおりです: 0 - ピクセル数、1 - ウィンドウのパーセンテージ
イベント：
OnPROgress(int パーセント) - フラッシュの読み取り時にトリガーされます。
OnReadyStateChange(int state) - 状態が変化したときに発生します。状態は、0=ロード中、1=未初期化、2=ロード済み、3=インタラクティブ、4=完了です。
具体的なヘルプについては、http://www.macromedia.com/support/flash/ を参照してください。
これは私の気まぐれな作品です。欠陥がある場合は修正してください。興味のある方は一緒に議論してください ([email protected])。