Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Программно повернуть лист Word в альбомный 
:(
    Опции темы
Нитонисе
Дата 1.3.2010, 11:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Надо повернуть лист Word в альбомный, для последующего создания там таблицы.

Попутно вопрос по таблице - там нужно будет объединять ячейки (смежные по горизонтали и по вертикали), как это делается?

Работаю с компонентом WordApplication.
PM MAIL   Вверх
chaos
Дата 1.3.2010, 11:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Серийный программист
****


Профиль
Группа: Завсегдатай
Сообщений: 2979
Регистрация: 7.7.2004
Где: Екатеринбург

Репутация: 1
Всего: 44



4 года назад надо было подобное.
помогла эта книга
user posted image
PM WWW   Вверх
Нитонисе
Дата 1.3.2010, 11:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Так это Дельфи.
PM MAIL   Вверх
Данкинг
Дата 1.3.2010, 11:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



chaos, у меня такая есть. smile 
Цитата(Нитонисе @  1.3.2010,  11:41 Найти цитируемый пост)
Так это Дельфи. 

А какая разница в данном случае? smile Тебе нужно свойство листа (ActiveSheet->PageSetup->Orientation) установить в xlLandscape. smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Нитонисе
Дата 6.3.2010, 18:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Открываю ворд, добавляю документ и пытаюсь его развернуть, но выскакивает ошибка.
Вот код:
Код

WordApplication1->Connect();
WordApplication1->set_Visible(true);
WordApplication1->Documents->Add();
WordApplication1->ActiveDocument->PageSetup->Orientation = wdOrientLandscape;

А вот ошибка.
user posted image

И что она означает?
PM MAIL   Вверх
Данкинг
Дата 6.3.2010, 18:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Нитонисе, если я не путаю, для параметров страницы в системе должен быть установлен принтер.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Нитонисе
Дата 6.3.2010, 18:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Данкинг @  6.3.2010,  18:26 Найти цитируемый пост)
Нитонисе, если я не путаю, для параметров страницы в системе должен быть установлен принтер.

То есть если не установлен принтер, то я не смогу повернуть лист? Либо это как-то можно иначе сделать?
PM MAIL   Вверх
Данкинг
Дата 6.3.2010, 19:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Цитата(Нитонисе @  6.3.2010,  18:31 Найти цитируемый пост)
то я не смогу повернуть лист?

Ну да. Как иначе - лично я не в курсе.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Нитонисе
Дата 6.3.2010, 20:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



А можно как нибудь установить фиктивный принтер? реального нет. Чтоб проверить.
PM MAIL   Вверх
Данкинг
Дата 6.3.2010, 20:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Цитата(Нитонисе @  6.3.2010,  20:16 Найти цитируемый пост)
А можно как нибудь установить фиктивный принтер?

dopdf - он даже бесплатный. При печати сохраняет в .pdf.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Нитонисе
Дата 7.3.2010, 00:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Данкинг @  6.3.2010,  20:29 Найти цитируемый пост)
dopdf - он даже бесплатный. При печати сохраняет в .pdf.

Установил эту программу, но результат тот же. Скорее всего дело не в установленном либо неустановленном принтере. 
А у вас такой код работает?
PM MAIL   Вверх
Данкинг
Дата 7.3.2010, 19:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



А если вместо константы (wdOrientLandscape) подставить её значение = 1 ?


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Нитонисе
Дата 7.3.2010, 20:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Данкинг @  7.3.2010,  19:50 Найти цитируемый пост)
А если вместо константы (wdOrientLandscape) подставить её значение = 1 ?

Та же самая ошибка. А попробуйте у себя этот мой код? Там всего четыре строчки, я их повесил на обработчик нажатия кнопки. У вас такая ошибка будет?
И может кто подскажет вариант разворота листа через OLE-технологию?
PM MAIL   Вверх
Данкинг
Дата 7.3.2010, 21:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Попробовал. Ошибок не выдаёт, но и не разворачивает. smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Нитонисе
Дата 7.3.2010, 23:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Данкинг @  7.3.2010,  21:30 Найти цитируемый пост)
Попробовал. Ошибок не выдаёт, но и не разворачивает.

Странно.

А как запустить ворд, открыть новый документ и повернуть лист в нем напрямую через OLE, а не через компоненты?
PM MAIL   Вверх
Данкинг
Дата 7.3.2010, 23:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Цитата(Нитонисе @  7.3.2010,  23:30 Найти цитируемый пост)
А как запустить ворд, открыть новый документ и повернуть лист в нем напрямую через OLE, а не через компоненты? 

Я на Билдере этого никогда не делал, только на Дельфи, но уверен на 99% что на форуме работа с Word'ом из Билдере где-нибудь да описывалась.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Нитонисе
Дата 7.3.2010, 23:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Данкинг @  7.3.2010,  23:40 Найти цитируемый пост)
Я на Билдере этого никогда не делал, только на Дельфи, но уверен на 99% что на форуме работа с Word'ом из Билдере где-нибудь да описывалась.
Да принцип-то работы есть, но вот конкретно поворота листа - нет.

PM MAIL   Вверх
Данкинг
Дата 8.3.2010, 00:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Так аналогично: создаёшь OLE-объект и задаёшь ему нечто вроде
Код

word->ActiveDocument->PageSetup->Orientation=1;





--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Нитонисе
Дата 8.3.2010, 00:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Данкинг @  8.3.2010,  00:07 Найти цитируемый пост)
Так аналогично: создаёшь OLE-объект и задаёшь ему нечто вроде

Не, напрямую с OLE сам не разберусь... все же хотелось бы через компоненты. Что ж тут не так-то... Плохо что документации нету нигде по этим компонентам.
PM MAIL   Вверх
Нитонисе
Дата 8.3.2010, 23:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Попробовал через напрямую через OLE подключиться к ворду и повернуть в нем лист
Код

Variant App,Docs,Doc;
App=CreateOleObject("Word.Application");
App.OlePropertySet("Visible",true);
Docs=App.OlePropertyGet("Documents");
Docs.OleProcedure("Add");
Doc=Docs.OleFunction("Item",1);
Doc.OlePropertyGet("PageSetup").OlePropertySet("Orientation",1);

Последняя строчка кода не выполняется. Ошибка с сообщением - "вызов был отклонен". Как переписать эту строчку, чтобы она работала?
PM MAIL   Вверх
Usper
Дата 9.3.2010, 09:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 325
Регистрация: 13.4.2007

Репутация: 15
Всего: 15



Параметры страницы нужно устанавливать не для документа, а для таблицы:
Код
#include  <ComObj.hpp>

    Variant vVarApp, vVarBooks, vVarBook, vVarSheets, vVarSheet, vVarCells,
        vVarCell;
    try
    {
        vVarApp=CreateOleObject("Excel.Application");
    }
    catch (...)
    {
        Application->MessageBoxA("Не могу запустить сервер Microsoft Excel. Продолжение невозможно.",
            "Ошибка", MB_ICONERROR);
        return;
    }
    vVarApp.OlePropertySet("Visible",true);
    vVarBooks=vVarApp.OlePropertyGet("Workbooks");
    vVarApp.OlePropertySet("SheetsInNewWorkbook",3); //создаём 3 листа в книге
    vVarBooks.OleProcedure("Add");
    vVarBook=vVarBooks.OlePropertyGet("Item",1);
    vVarSheets=vVarBook.OlePropertyGet("Worksheets");
    vVarSheet=vVarSheets.OlePropertyGet("Item",1);
    vVarSheet.OleProcedure("Activate");
    vVarSheet.OlePropertyGet("PageSetup").OlePropertySet("Orientation",2);


И обратите внимание, что для альбомного режима параметру ориентация нужно присвоить значение 2, а не 1.


--------------------
На посохе волшебном нехилый набалдашник, большой такой, огромный, нехилый набалдашник.
PM MAIL   Вверх
Нитонисе
Дата 9.3.2010, 12:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Usper @  9.3.2010,  09:34 Найти цитируемый пост)
Параметры страницы нужно устанавливать не для документа, а для таблицы:
Так мне надо вордовский лист развернуть, а не эксель.

PM MAIL   Вверх
Usper
Дата 9.3.2010, 12:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 325
Регистрация: 13.4.2007

Репутация: 15
Всего: 15



Ой  smile . Тогда я не знаю почему не работает, у меня этот кусок кода выполняется без ошибок. Какая версия ОС и оффиса?


--------------------
На посохе волшебном нехилый набалдашник, большой такой, огромный, нехилый набалдашник.
PM MAIL   Вверх
Нитонисе
Дата 9.3.2010, 12:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Usper @  9.3.2010,  12:39 Найти цитируемый пост)
Ой   . Тогда я не знаю почему не работает, у меня этот кусок кода выполняется без ошибок. Какая версия ОС и оффиса?

ОС - XP SP 2
Word 2002.

У тебя мой код работает без ошибок и поворачивает лист?
PM MAIL   Вверх
Данкинг
Дата 9.3.2010, 12:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130



Нитонисе, а в самом Ворде параметры страницы (альбомный вид т.е.) нормально выставляются, без ошибок? Бывает ещё, что "офис" тупит.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Нитонисе
Дата 9.3.2010, 12:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Данкинг @  9.3.2010,  12:44 Найти цитируемый пост)
Нитонисе, а в самом Ворде параметры страницы (альбомный вид т.е.) нормально выставляются, без ошибок? Бывает ещё, что "офис" тупит.

В самом ворде все работает. Вот так выглядит макрос.
Код

Sub Макрос12()
    With ActiveDocument.Styles(wdStyleNormal).Font
        If .NameFarEast = .NameAscii Then
            .NameAscii = ""
        End If
        .NameFarEast = ""
    End With
    With ActiveDocument.PageSetup
        .LineNumbering.Active = False
        .Orientation = wdOrientLandscape
        .TopMargin = CentimetersToPoints(3)
        .BottomMargin = CentimetersToPoints(1.5)
        .LeftMargin = CentimetersToPoints(2)
        .RightMargin = CentimetersToPoints(2)
        .Gutter = CentimetersToPoints(0)
        .HeaderDistance = CentimetersToPoints(1.25)
        .FooterDistance = CentimetersToPoints(1.25)
        .PageWidth = CentimetersToPoints(29.7)
        .PageHeight = CentimetersToPoints(21)
        .FirstPageTray = wdPrinterDefaultBin
        .OtherPagesTray = wdPrinterDefaultBin
        .SectionStart = wdSectionNewPage
        .OddAndEvenPagesHeaderFooter = False
        .DifferentFirstPageHeaderFooter = False
        .VerticalAlignment = wdAlignVerticalTop
        .SuppressEndnotes = False
        .MirrorMargins = False
        .TwoPagesOnOne = False
        .BookFoldPrinting = False
        .BookFoldRevPrinting = False
        .BookFoldPrintingSheets = 1
        .GutterPos = wdGutterPosLeft
    End With
    ShowVisualBasicEditor = True
End Sub



Все больше склоняюсь к тому чтобы поставить себе ворд 2007. Уже бы давно поставил, мне в нем не нравится цвет черного шрифта на белом фоне страницы - он какой-то размытый, глаза устают. А в этом ворде - четкий.
PM MAIL   Вверх
Usper
Дата 9.3.2010, 14:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 325
Регистрация: 13.4.2007

Репутация: 15
Всего: 15



Цитата(Нитонисе @  9.3.2010,  12:43 Найти цитируемый пост)
У тебя мой код работает без ошибок и поворачивает лист?

Да, так и есть.
Прежде чем переходить на другую версия офиса я советую проверить его работоспособность с уже существующем кодом. Я уже сталкивался с тем, что одна и та же моя программа нормально работает с Excel 97-2003, но начинает глючить с Excel 2007.  При том, что макросы, генерируемые для выполнения нужных действий, одинаковы для разных версий Excel. Нужные мне действия просто не выполняются без сообщений об ошибке со стороны 2007 версии Excel :(.



--------------------
На посохе волшебном нехилый набалдашник, большой такой, огромный, нехилый набалдашник.
PM MAIL   Вверх
Нитонисе
Дата 9.3.2010, 19:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Usper @  9.3.2010,  14:44 Найти цитируемый пост)
Да, так и есть.

А проверьте этот код
Код

WordApplication1->Connect();
WordApplication1->set_Visible(true);
WordApplication1->Documents->Add();
WordApplication1->ActiveDocument->PageSetup->Orientation = wdOrientLandscape;

Все то же самое, только через компоненты билдера.

У меня был установлен Office XP, переустановил на Office 2003, а потом и на Office 2007 - везде одна и та же ошибка.
PM MAIL   Вверх
sawfish
Дата 10.3.2010, 06:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 150
Регистрация: 30.7.2008
Где: Новосибирск

Репутация: 8
Всего: 8



У меня Ваш код работает. Но разворот выполняется с задержкой около 10 сек.
XP Pro SP2
Word 2003 SP1
PM MAIL   Вверх
Usper
Дата 10.3.2010, 09:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 325
Регистрация: 13.4.2007

Репутация: 15
Всего: 15



Аналогично, оба варианта работают, Win XP SP2 + Office 2003 и Office 2007.


--------------------
На посохе волшебном нехилый набалдашник, большой такой, огромный, нехилый набалдашник.
PM MAIL   Вверх
Нитонисе
Дата 10.3.2010, 10:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Интересно. У меня через OLE-технологию все так же не работает, а вот через компоненты срабатывает, но только если выставить свойство компонента WordApplication1->ConnectKind = ckRunningOrNew. У этого свойства есть недостаток - при закрытия моей программы закрываются и все открытые вордовские документы. Мне более удобно WordApplication1->ConnectKind = ckNewInstance. При установке этого свойства закрываются только те вордовские документы, которые были открыты из моей программы. Тоже не очень удобно, но как сделать чтобы ворд не закрывался вместе с закрытием моей программы - не придумал.

Добавлено через 14 минут и 50 секунд
Посмотрите эту тестовую программку по развороту листа.
В каких режимах работает, а в каких нет?


Присоединённый файл ( Кол-во скачиваний: 6 )
Присоединённый файл  TestWord.zip 197,74 Kb
PM MAIL   Вверх
Usper
Дата 10.3.2010, 11:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 325
Регистрация: 13.4.2007

Репутация: 15
Всего: 15



Все три варианта нормально сработали.


--------------------
На посохе волшебном нехилый набалдашник, большой такой, огромный, нехилый набалдашник.
PM MAIL   Вверх
Нитонисе
Дата 18.3.2010, 21:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Вот какая штука получается. Оказывается метод разворота листа компонентами и у меня работает
Код

WordApplication1->ActiveDocument->PageSetup->Orientation = wdOrientLandscape;

Этот метод не хочет работать только с первым листом ворда, который создается. Со вторым и всеми последующими - работает. У других все нормально работает и с первым листом, очевидно что это проблема моего ворда. Вот какая у него есть особенность - когда я запускаю его из своей программы и создаю первый лист, то он создается, но при этом выскакивает вот такая ошибка

user posted image

второй и все последующие листы создаются без этой ошибки.
Точно такая же ошибка выскакивает когда я открываю ворд и из других программ от других разработчиков, значит дело не в программных приемах, а в самом ворде.
В чем может быть дело? Что э это за ошибка такая, которая мне не позволяет развернуть первый создаваемый лист ворда? 
Создавать два листа, использовать для отчета второй, а первый потом удалять - очень уж кривое решение для создания отчета.
PM MAIL   Вверх
borisbn
Дата 19.3.2010, 07:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 4875
Регистрация: 6.2.2010
Где: Ростов-на-Дону

Репутация: 18
Всего: 135



Нитонисе, по поводу "неверно указана единица измерения" - попробуй в начале программы ( например, в конструкторе главной формы ) написать
Код

DecimalSeparator = '.';



--------------------
Женщины отличаются от программистов тем, что у них чары состоят из стрингов
PM MAIL Jabber   Вверх
chaos
Дата 19.3.2010, 07:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Серийный программист
****


Профиль
Группа: Завсегдатай
Сообщений: 2979
Регистрация: 7.7.2004
Где: Екатеринбург

Репутация: 1
Всего: 44



удалено

Это сообщение отредактировал(а) chaos - 19.3.2010, 07:42
PM WWW   Вверх
Usper
Дата 19.3.2010, 08:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 325
Регистрация: 13.4.2007

Репутация: 15
Всего: 15



Нитонисе, тут уже надо смотреть Ваш код, может быть никакой ошибки и нет. В ворде параметры страницы могут применяться как ко всему документу, так и к текущему разделу. Я пользуюсь этой особенностью когда мне необходимо только часть листов из документа повернуть.
Хотя если не работает код из поста от 9.3.2010, 19:57...
Как вариант ещё может быть какой-то косяк в шаблоне Normal, который используются по-умолчанию со всеми документами. Попробуйте создать документ своей программой и потом просмотреть непечатаемые знаки в документе.


--------------------
На посохе волшебном нехилый набалдашник, большой такой, огромный, нехилый набалдашник.
PM MAIL   Вверх
Нитонисе
Дата 19.3.2010, 12:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(borisbn @  19.3.2010,  07:35 Найти цитируемый пост)
Нитонисе, по поводу "неверно указана единица измерения" - попробуй в начале программы ( например, в конструкторе главной формы ) написать

У меня точка установлена в системе как разделитель целой и дробной части. Странно что такая ошибка выскакивает только при создании первого документа. При этом она почти ни на что не влияет, вот разве что мешает этот самый первый лист развернуть в альбомный.



Цитата(Usper @  19.3.2010,  08:44 Найти цитируемый пост)
Нитонисе, тут уже надо смотреть Ваш код, может быть никакой ошибки и нет.

Да код простой - те самый четыре строчки, создающих сервер Word и открывающих там документ, который затем нужно развернуть. Так дело то в том, что скорее всего дело не в коде, потому что точно такая же ошибка с неверной единицей измерения появляется если ворд запустить из какой-нибудь другой программы. Вот у меня есть программа с базой данных документов. Все документы в вордовском формате. Когда я запускаю какой-либо документ - появляется эта ошибка. Но второй и все последующие документы запускаются из этой программы уже без ошибки.


Цитата(Usper @  19.3.2010,  08:44 Найти цитируемый пост)
Попробуйте создать документ своей программой и потом просмотреть непечатаемые знаки в документе.

Это как это посмотреть непечатаемые знаки?
PM MAIL   Вверх
Usper
Дата 19.3.2010, 12:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 325
Регистрация: 13.4.2007

Репутация: 15
Всего: 15



Цитата

Для отображения или скрытия знаков форматирования можно также выбрать в меню Сервис команду Параметры, а затем установить или снять соответствующие флажки в группе Знаки форматирования на вкладке Вид.

Поставьте галку "все" и смотрите есть ли в документе "Разрыв раздела" или что-то подобное.


Это сообщение отредактировал(а) Usper - 19.3.2010, 12:46


--------------------
На посохе волшебном нехилый набалдашник, большой такой, огромный, нехилый набалдашник.
PM MAIL   Вверх
Нитонисе
Дата 19.3.2010, 14:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Usper @  19.3.2010,  12:44 Найти цитируемый пост)
Поставьте галку "все" и смотрите есть ли в документе "Разрыв раздела" или что-то подобное.

Ну вот, у меня появился только такой символ

user posted image
PM MAIL   Вверх
Usper
Дата 19.3.2010, 16:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 325
Регистрация: 13.4.2007

Репутация: 15
Всего: 15



Это нормальное состояние нового документа. Значит дело не в разделах документа. Попробуйте переустановить офис.


--------------------
На посохе волшебном нехилый набалдашник, большой такой, огромный, нехилый набалдашник.
PM MAIL   Вверх
Нитонисе
Дата 19.3.2010, 16:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Usper @  19.3.2010,  16:13 Найти цитируемый пост)
Это нормальное состояние нового документа. Значит дело не в разделах документа. Попробуйте переустановить офис

Так пробовал. Был установлен Office XP, потом установил Office 2003, потом Office2007, потом снова Office2003. Всегда одно и то же.
PM MAIL   Вверх
Usper
Дата 19.3.2010, 21:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 325
Регистрация: 13.4.2007

Репутация: 15
Всего: 15



Остаётся радикальный метод - переустановка системы.  smile 
Хотя для начала лучше проверить всё это в виртуальной машине, Virtual Box'е, например.


--------------------
На посохе волшебном нехилый набалдашник, большой такой, огромный, нехилый набалдашник.
PM MAIL   Вверх
Нитонисе
Дата 19.3.2010, 22:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 917
Регистрация: 5.11.2009

Репутация: 2
Всего: 2



Цитата(Usper @  19.3.2010,  21:48 Найти цитируемый пост)
Остаётся радикальный метод - переустановка системы.

Да я сколько помню у меня всегда в офисе такая ошибка выскакивала. Раньше просто она не напрягала, а сейчас вон оно как - лист не дает повренуть  smile 
PM MAIL   Вверх
6pahan6
Дата 20.3.2010, 02:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 4
Регистрация: 18.3.2010

Репутация: нет
Всего: нет



http://letitbit.net/download/7701.ebc7039d....part2.rar.html
http://letitbit.net/download/9765.9fe2b319....part1.rar.html

вот две ссылки, там выложены видосы, которые помогут в изучении С++, желаю удачи в изучении...
PM MAIL   Вверх
Страницы: (3) [Все] 1 2 3 
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »


 




[ Время генерации скрипта: 0.1527 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.