Bien, el problema es que el método "Execute" lo debes de usar así:
Código Delphi
[-]
if Opendialog1.Execute then
begin
end else
begin
end;
PD: Para incluir código en tus mensajes, hazlo dentro de las etiquetas [delphi][/delphi] se vera mucho mas claro.