くだすれDelphi(超初心者用)その48

くだすれDelphi(超初心者用)その48 at TECH

183:デフォルトの名無しさん
08/11/17 19:26:44
Delphiのimplements指令がいまいちわかりません。

下記サイトでサンプルコードがあったのですが、
An Introduction to COM Programming with Delphi (3 / 6)
URLﾘﾝｸ(delphi.about.com)

結局、implementsを書いたクラスは一度interfaceにキャストしないと
メソッドよめないんでしょうか？

var
　Test: TTest;
　Foo: IFoo;
begin
　Test := TTest.Create;
　Foo := Test;
　Foo.Bar;　　// FooにキャストしないとBarに呼べない

次ページ

続きを表示

1を表示