Скачать: CL | DM;

Вызов диалога сохранения в Excel   Найти похожие ветки 

← →
UDolphin   (2005-03-31 21:53) [0]

Доброго времени суток. Вопрос мастерам следующий. Известно, что в Microsoft Office для каждого приложения можно получить соответствующие интерфейсы диалогов, чтобы затем вызывать их из собственной программы. Так вот, в Excel процедура вызова диалога сохранения сопровождается аж 30ю аргументами, названными Arg1, Arg2, Arg3 и т. д. Кто-нибудь, помогите разобраться в этом нагромождении, плиз!

---

← →
YurikGL ©   (2005-04-01 20:46) [1]

попробуй emptyparam понаставять. А где integer нужно попробуй нули забить.

---

← →
GanibalLector ©   (2005-04-02 12:00) [2]

2 UDolphin
Так 30-ю или 3-мя?
http://delphimaster.net/view/10-1110129548/
пост [3].Там правда для Word,но смысл примерно тот же.Проверь сам.

---

← →
UDolphin   (2005-04-02 22:30) [3]

Спасибо, YurikGL, GanibalLector! Действительно, 30-ю... Я в этом разобрался. Теперь для PowerPoint буду такую же штуку делать. Если кому еще интересно, могу код заслать... Кстати, никому не нужна программа резервного копирования документов Office "на лету"?

---

← →
GanibalLector ©   (2005-04-03 01:00) [4]

2 UDolphin   (02.04.05 22:30) [3]
>Если кому еще интересно, могу код заслать...
Ну,давай поглядим.

---

← →
UDolphin   (2005-04-03 14:53) [5]

sdresult:= XLA.Dialogs.Item[xlDialogSaveAs].Show(Wb.Name, EmptyParam,
     EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
     EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
     EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
     EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
     EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
     EmptyParam, EmptyParam, EmptyParam);

---

← →
GanibalLector ©   (2005-04-03 22:35) [6]

Рассмешил.Я думал, что ты описал и проверил 30 параметров.
Кстати,в случае позднего связывания  EmptyParam писать не нужно и код в [5] был бы намного компактнее.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c