大家看看是什么意思 ( 积分: 100 )

procedure TForm1.Button1Click(Sender: TObject);
begin

if Self.OpenDialog1.Execute then

begin

Self.WebBrowser1.Navigate(Self.OpenDialog1.FileName);
end;

end;

end.
例子做完了 完全不明白是什么意思
例子是 通过控件 打开本地的 gif文件
但是 代码的 意思我不明白
大家给讲解下
代码的意思是不是 Self.WebBrowser1.Navigate( );
调用了 Self.OpenDialog1.Execute 啊？
没有分了 大家就忍了把

if Self.OpenDialog1.Execute then

如果“打开文件”执行成功
Self.WebBrowser1.Navigate(Self.OpenDialog1.FileName);
浏览器就显示“打开文件对话框”中选定的文件。

他的运行机制是什么

Self.OpenDialog1.Execute,路径正确.
Self.WebBrowser1.Navigate( );
打开文本.
Self.OpenDialog1.FileName;取文本名.

恩。。。