Сделать вызов настроек вьюера из основного окна UC
Добавлено: Вт сен 23, 2008 5:04 pm
кажется, я разобрался, как сделать вызов настроек Universal Viewer из основного окна UC.
Вот код, добавить в UFormView.pas:
Вот код, добавить в UFormView.pas:
Код: Выделить всё
//----------------------------------------------
procedure OpenUniversalViewerOptions; //+
var
Form: TFormViewUV;
begin
Application.CreateForm(TFormViewUV, Form);
with Form do
try
FileName:= '';
mnuOptionsConfigureClick(Form);
finally
Release;
end;
end;