Модераторы: Snowy, Alexeis, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> TChart 
:(
    Опции темы
Delphist
  Дата 11.10.2005, 17:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

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



На TChart'е выводится 8 линий разного цвета справа от графика располагается описание цвета каждой линии. Мне нужно на TChart'е пронумеровать каждую линию 1, 2, 3..8 а справа заместо описаний цвета линий написать описание номера линий


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Zero
Дата 11.10.2005, 18:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

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



Цитата(Delphist @ 11.10.2005, 17:58)
нужно на TChart'е пронумеровать каждую линию 1, 2, 3..8

Последовательность действий:
1. Щелчок првой кнопкой мыши по компоненту TChart
2. в открывшемся диалоговом меню, выбрать пункт "Edit Chart"
3. Там будет структура, вкладок, и на ней ещё одна структура вкладок... На верхней структуре выбери вкладку "Series"
4. на нижней структуре выбери (под)вкладку "Marks"
5. в группе "Style", выбери стиль "X Value" (в самом низу)
Цитата(Delphist @ 11.10.2005, 17:58)
располагается описание цвета каждой линии.

Это не описание цвета, а там показано сколько значений в ходит в соответствующий накопитель.
PM MAIL ICQ   Вверх
Delphist
  Дата 12.10.2005, 16:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

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



Цитата(Zero @ 11.10.2005, 18:38)
Цитата(Delphist @ 11.10.2005, )
нужно на TChart'е пронумеровать каждую линию 1, 2, 3..8

Последовательность действий:
1. Щелчок првой кнопкой мыши по компоненту TChart
2. в открывшемся диалоговом меню, выбрать пункт "Edit Chart"
3. Там будет структура, вкладок, и на ней ещё одна структура вкладок... На верхней структуре выбери вкладку "Series"
4. на нижней структуре выбери (под)вкладку "Marks"
5. в группе "Style", выбери стиль "X Value" (в самом низу)

Что-то не помагает. Может ты неправильно понял вопрос. Посмотри рисунки pic.jpg - это как у меня сейчас; pic1.jpg - как надо только на треугольники, квадратики и т.п. не обращай внимания их не должнл быть.

Ещё я хотел бы узнать:
1) какое свойство есть у TChart позволяющий прятать или отображать точки соединения (кружки, треугольники, квадратики и т.п.)
2) Как мне обнулять состояние TChart т.е. я рисую комплекс линий№1 на TChart'е затем их
увеличиваю, уменьшаю, двигаю влево, вправо, вниз, вверх. После этого старую группу линий
стирая и рисуя новую - нарисованные линии не соответствуют их положению т.е. положение
линий деформируются т.е. выглядят не так как если бы я эту группу линий№2 рисовал перед линиями№1.
3) Можно ли как-нибудь в TChart'e управлять выводом координат по оси абциис-ось OX т.е.
выводить только те точки, которые расчитывались в проге.
4) Как сделать экспорт TChart в MS Word

Это сообщение отредактировал(а) Delphist - 12.10.2005, 16:12

Присоединённый файл ( Кол-во скачиваний: 12 )
Присоединённый файл  picture.rar 105,31 Kb


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Zero
Дата 12.10.2005, 22:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

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



Цитата(Delphist @ 12.10.2005, 16:04)
Что-то не помагает. Может ты неправильно понял вопрос.

Да, я до этого использовал не Line, а Bar... smile
Ну с линиями так:
Последовательность действий:
1. Щелчок првой кнопкой мыши по компоненту TChart
2. в открывшемся диалоговом меню, выбрать пункт "Edit Chart"
3. Там будет структура, вкладок, и на ней ещё одна структура вкладок... На нижней структуре выбери вкладку "Legend"
4. В поле со списком "Text Style", выбери стиль "X Value" (в самом низу)
Цитата(Delphist @ 11.10.2005, 17:58)
Мне нужно на TChart'е пронумеровать каждую линию 1, 2, 3..8

На счёт этого я незнаю... smile Да и с точки зрения реализации, как это можно представить, ведь конкретного места, то у этого твоего квадрата то нету. smile
Цитата(Delphist @ 12.10.2005, 16:04)
1) какое свойство есть у TChart позволяющий прятать или отображать точки соединения (кружки, треугольники, квадратики и т.п.)

Последовательность действий:
1. Щелчок првой кнопкой мыши по компоненту TChart
2. в открывшемся диалоговом меню, выбрать пункт "Edit Chart"
3. Там будет структура, вкладок, и на ней ещё одна структура вкладок... На верхней структуре выбери вкладку "Series"
4. на нижней структуре выбери (под)вкладку "Point"
5. в группе без названия установи флажок Visible(что соответствует спрятать/показать)
Цитата(Delphist @ 12.10.2005, 16:04)
2) Как мне обнулять состояние TChart

Код

chart1.Series[<номер серии которую хочешь очистить>].Clear

Цитата(Delphist @ 12.10.2005, 16:04)
3) Можно ли как-нибудь в TChart'e управлять выводом координат по оси абциис-ось OX т.е.
выводить только те точки, которые расчитывались в проге.
Код

for x:=1 to 50 do //здесь описываются значения пересекаемые с осью Ox
    begin
      y:=f(x);  //Здесь определяется значение по оси Oy, для текущего значения х
      chart1.Series[0].AddXY(x,y,'',clred);  //Здесь устанавливаются соответствующие значения
    end;

Цитата(Delphist @ 12.10.2005, 16:04)
4) Как сделать экспорт TChart в MS Word

Ни разу такое не делал, поэтому ХЗ... smile А вообще универсальный способ, это делаешь скриншот, и вставляешь куда хочешь.
PM MAIL ICQ   Вверх
Alexeis
Дата 13.10.2005, 09:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

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



Мне нужно на TChart'е пронумеровать каждую линию 1, 2, 3..8
Вообще, можно получить доступ к канве TChart
и попытатья сделать что нибудь вручную.
Как сделать экспорт TChart в MS Word
Анологично можно скопировать содержимое канвы в TBitMap,
сохранить картинку и вставить затем в Word.



--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
Delphist
  Дата 13.10.2005, 11:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphist Эксперт
****


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

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



Цитата(alexeis1 @ 13.10.2005, 09:19)
Мне нужно на TChart'е пронумеровать каждую линию 1, 2, 3..8
Вообще, можно получить доступ к канве TChart
и попытатья сделать что нибудь вручную.
Как сделать экспорт TChart в MS Word
Анологично можно скопировать содержимое канвы в TBitMap,
сохранить картинку и вставить затем в Word.

Подробнее можно...


--------------------
ProcessInfo 1-ая моя программа (аналог spyxx.exe с гораздо большим функц-ом - внедрение dll в адр. простр. процесса, перехват API-функций, разбор приложения на окна мн.др).
Когда-то давным-давно использовал это...
PM MAIL ICQ   Вверх
Alexeis
Дата 13.10.2005, 12:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

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



Вообщем код примерно такой
Код

procedure TForm1.Button1Click(Sender: TObject);
  var
    b : TBitMap;
    cnv : TCanvas;
begin
  b := TBitMap.Create;
  b.Width  := 200;
  b.Height := 200;

  cnv := TCanvas.Create;
  cnv.Handle := GetDC(Chart1.Handle);

  b.Canvas.CopyRect(Rect(0,0,199,199), cnv, Rect(0,0,199,199));
  b.SaveToFile('1.bmp');
  b.Free;

end;


cnv хранит канву TChart и создается по причине явного отсутствия
таковой у TChart
Первый Rect Bitmapa , второй канвы сnv
Размеры нужно уточнить(chart1.Width, chart1.Height). smile

Это сообщение отредактировал(а) alexeis1 - 13.10.2005, 12:35


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Звук, графика и видео"
Girder
Snowy
Alexeis

Запрещено:

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

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

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

FAQ раздела лежит здесь!


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

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Звук, графика и видео | Следующая тема »


 




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


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

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