Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Delphi


Новое направление Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг

Народное голосование ПРЕМИИ РУНЕТА-2007!
Голосуем за RusFAQ.ru >>

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 976
от 12.11.2007, 14:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 448, Экспертов: 66
В номере:Вопросов: 3, Ответов: 5


Вопрос № 108256: Здравствуйте! Извинте, что отвлекаю по пустякам, но маленькая проблема возникла. Я нарисовал на Canvas какой-то график по точкам, так вот а теперь хочу его как нибудь сохранить. Это возможно? И ещё вопрос. Я загрузил картинку в инспекторе объектов(Pi...
Вопрос № 108266: Помогите пожалюйста! Как определить в Word с помощю Delpi номер текущей страници?...
Вопрос № 108269: Здравствуйте! Подскажите, пожалуйста. У меня в программе на Делфях я рисую на Канве график. Потом я хочу его увеличить, т.е. растягиваю окно, а канва не растягивается. Уже всё что знаю перепробавал: и ставил TImage.Align:=alClient, перерисовывать с н...

Вопрос № 108.256
Здравствуйте! Извинте, что отвлекаю по пустякам, но маленькая проблема возникла. Я нарисовал на Canvas какой-то график по точкам, так вот а теперь хочу его как нибудь сохранить. Это возможно? И ещё вопрос. Я загрузил картинку в инспекторе объектов(Picture), а потом когда начинаю работать с Canvas выдаёт ошибку(Project .. .exe raised exeption class EInvalidOperation with message 'Can only modifyan image if it contains a bitmap'. Process stopped и т.д.), подскажите как убить 2-х зайцев. Когда не работаю с Canvas, то картинка была, захотел поработать-она исчезла. Заранее СПАСИБО!
Отправлен: 06.11.2007, 14:05
Вопрос задал: Полянский Дмитрий Александрович (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Стома С.С.
Здравствуйте, Полянский Дмитрий Александрович!

По поводу сохранения картинки

Image.Picture.SaveToFile('name.bmp');

по поводу ошибки попробуйте подключить модуль JPEG

Uses ......, jpeg;
Ответ отправил: Стома С.С. (статус: 1-ый класс)
Ответ отправлен: 06.11.2007, 16:30


Вопрос № 108.266
Помогите пожалюйста! Как определить в Word с помощю Delpi номер текущей страници?
Отправлен: 06.11.2007, 15:21
Вопрос задала: Степанок Ольга Александровна (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 4)

Отвечает: Gh0stik
Здравствуйте, Степанок Ольга Александровна!

При использовании объекта WordApplication (вкладка Servers), чтобы "достучаться" до номера текущей странице достаточно воспользоваться такой командой:
...
var WordApp: TWordApplication;
...
   with WordApp.Selection do
    ShowMessage(Information[wdActiveEndPageNumber]);
...


Если же Вам еще необходимо знать количество страниц, то Вам поможет такой подход:
...
var WordApp: TWordApplication;
...
   with WordApp.Selection do
    ShowMessage(Information[wdNumberOfPagesInDocument]);
...


Конечно же более рационально получить эти данные одновременно, напрмер так:
...
var WordApp: TWordApplication;
...
   with WordApp.Selection do
    ShowMessage(format('%s/%s', [Information[wdActiveEndPageNumber], Information[wdNumberOfPagesInDocument]]));
...


И ответ будет выглядеть, например, в виде: 3/17.

Good Luck!!!
---------
Господь Бог - это всего лишь сверхмощный генератор случайных чисел, в соответствии с которыми сочетаются события на Земле. Генератор случайных чисел - и только.
Ответ отправил: Gh0stik (статус: Профессор)
Украина, Славянск
Организация: Славянский государственный педагогический университет (Кафедра алгебры)
ICQ: 289363162
----
Ответ отправлен: 07.11.2007, 20:27


Вопрос № 108.269
Здравствуйте! Подскажите, пожалуйста. У меня в программе на Делфях я рисую на Канве график. Потом я хочу его увеличить, т.е. растягиваю окно, а канва не растягивается. Уже всё что знаю перепробавал: и ставил TImage.Align:=alClient, перерисовывать с новыми увеличенными координатами,а конва не меняется по размеру,только её расположение на экране. Как сделать, что бы Канва и следовательно всё что на ней увеличивалось вместе с TImage и окном. Подскажите, пожалуйста кто знает.Заранее большое СПАСИБО!
Отправлен: 06.11.2007, 15:33
Вопрос задал: Полянский Дмитрий Александрович (статус: Посетитель)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Vas177
Здравствуйте, Полянский Дмитрий Александрович!

Если рисуете на TImage, то у него есть замечательное свойство Stretch.
Если установить его в True (можно в Object Inspector), то содержимое Image растянется.
Ответ отправил: Vas177 (статус: 1-ый класс)
Ответ отправлен: 06.11.2007, 15:46
Оценка за ответ: 3
Комментарий оценки:
Всё равно каряво рисует, выходит за пределы экрана. Но спасибо.

Отвечает: Igor_
Здравствуйте, Полянский Дмитрий Александрович!

Я когда-то с таким сталкивался, не уверен, что на 100% ответ правильный, но на сколько я помню, у меня сработало..

У Image есть еще Picture
Т.е. при изменении размера окна нужно еще для Picture размеры изменить
Image.Picture.Height := ...
Image.Picture.Width := ...

Надеюсь, поможет..
Ответ отправил: Igor_ (статус: 4-ый класс)
Ответ отправлен: 06.11.2007, 16:48

Отвечает: Стома С.С.
Здравствуйте, Полянский Дмитрий Александрович!

Можно в Bitmap скопировать картинку и далее отслеживать изменения формы
и выполнять следующий код

Image.Canvas.CopyRect(Rect(0, 0, Image.Width, Image.Height), BitMap.Canvas, Rect(0, 0, BitMap.Width, BitMap.Height));

Rect(0, 0, Image.Width, Image.Height) - координаты прямоугольника в который выводится изображение, единственное если надо соблюдайте масштаб по высоте и ширине
Ответ отправил: Стома С.С. (статус: 1-ый класс)
Ответ отправлен: 06.11.2007, 17:50


Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.62.0 от 08.11.2007
Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное