Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.04.2010, 09:07   #1
Татьяна Валерьевна
 
Регистрация: 16.01.2008
Сообщений: 3
По умолчанию Canvas и Tabsheet

Помогите пожалуйста.
Мне нужно нарисовать линию на TabSheet. не знаю как то сделать.
То есть если рисую на форме то вот:
Код:
Form1.Canvas.MoveTo(x,y);
Form1.Canvas.LineTo(x,y);
А как сделать с помощью канваса тоже самое только на Tabsheet, Как ни пыталась все время рисует на PageControl, где сами вкладки. Вообще на Tabsheet возможно нарисовать линии?
Если не то как можно сделать?
У меня есть массив из списка с фамилиями и данными я сделала чтобы фамилии отображались на форме так:

ФИО1
_____

ФИО2
_____

ФИО3
_____

А рядом находиться PageControl с вкладками на которых располагаются данные разных типов относящихся к фамилии и мне нужно чтоб получилось след. образом:


Последний раз редактировалось Stilet; 19.04.2010 в 09:29.
Татьяна Валерьевна вне форума Ответить с цитированием
Старый 19.04.2010, 09:11   #2
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,527
По умолчанию

на Таbsheet поместить панель (TPanel c основной вкладки) и рисовать на ней Panel.Canvas думаю должно получиться
программа — запись алгоритма на языке понятном транслятору
evg_m на форуме Ответить с цитированием
Старый 19.04.2010, 13:46   #3
Татьяна Валерьевна
 
Регистрация: 16.01.2008
Сообщений: 3
По умолчанию

Спасибо большое!
Татьяна Валерьевна вне форума Ответить с цитированием
Старый 19.04.2010, 16:18   #4
Татьяна Валерьевна
 
Регистрация: 16.01.2008
Сообщений: 3
По умолчанию

К сожалению на Panel тоже не рисует, а надо чтобы отсматривать данные удобно было в большом списке. Как можно еще сделать?
Татьяна Валерьевна вне форума Ответить с цитированием
Старый 20.04.2010, 10:10   #5
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

На DrawGrid отрисовывай.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 20.04.2010, 11:34   #6
SERG1980
Участник клуба
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
По умолчанию

А может и не надо отрисовывать ничего а использовать StringGrid
SERG1980 вне форума Ответить с цитированием
Старый 20.04.2010, 11:35   #7
eoln
Старожил
 
Аватар для eoln
 
Регистрация: 26.04.2008
Сообщений: 2,645
По умолчанию

Непосредственно канвы у TabSheet'a и его предков нет (по крайней мере до 3-его колена), но если уж нужно именно там, то можно воспользоваться классом TControlCanvas
Код:
var
  Sheet1: TControlCanvas;
begin
  Sheet1 := TControlCanvas.Create;
  Sheet1.Control := TabSheet1;
  Sheet1.MoveTo(0, 0);
  Sheet1.LineTo(100, 100);
  Sheet1.Free
end;
eoln вне форума Ответить с цитированием
Старый 17.05.2010, 02:02   #8
sanuich
 
Регистрация: 13.05.2010
Сообщений: 4
По умолчанию 1

а не работает
sanuich вне форума Ответить с цитированием
Старый 17.05.2010, 11:20   #9
sanuich
 
Регистрация: 13.05.2010
Сообщений: 4
По умолчанию

сорри заработало
только при запуске проги не отрисовывается, а только после того как нажмешь на кнопку какую нибудь - это моя проболема с канвами.
sanuich вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
работа с Объектом {TabSheet} Rebel123 Общие вопросы Delphi 7 09.09.2009 15:52
destroy динамического tabSheet-a-? havok Общие вопросы Delphi 2 29.08.2009 19:41
Динамически созданный tabSheet S@fer Общие вопросы Delphi 7 08.04.2009 12:03
TabSheet one Компоненты Delphi 0 10.03.2007 07:38