Форум: "Основная";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];
ВнизКак закрашивать TTabSheet? Найти похожие ветки
← →
TankMan (2003-07-01 22:19) [0]Создал TPageContol и динамически добавляю туда TTabSheet, и сколько ни пытался я закрасить всю эту TPaceContol в месте с TTabSheet но закрашиваются только закладки, если поставить OwnerDraw на TPageContol... а сами Щиты да же и не думают... вот парился парился, но так и не до пер, каким таким хитрым образом его закрашивать :(... поможите люди добрые :)
← →
Makhanev A.S. (2003-07-02 23:45) [1]JediVCL: PageControl - закладки красит как надо.
Можешь скачать всю библиотеку: http://jvcl.sourceforge.net
← →
TankMan (2003-07-10 03:00) [2]А что на счет всетаки со стандартными PageControl-ами? Не уж-то они не красятся?...ставил обработчик OnPaint... красит все... кроме самой области TabSheet-ов... а как их область найти, если они создаются динамически...у меня эта проблема уже пол месяца стоит... я пока другими занимаюсь, но всетаки, весь дизайн программы к чертям из-за этих серых Щитов :(((... компонент попробую... просто экспириенса хотелось бы... в этом деле (закрашивания)
← →
Babay (2003-07-10 04:40) [3]Поробуй повесить на onShow и onEnter для TabSheet - ов вот такой код
Var dc:Hdc;
c:TCanvas;
begin
dc:=GetDc(TTabSheet(Sender).Handle);
C:=TCanvas.Create;
c.Handle:=dc;
c.Brush.Color:=ClRed;// твой цвет
c.FillRect(TTabSheet(Sender).ClientRect);
c.Free;
ReleaseDC(TTabSheet(Sender).Handle,dc);
end;
← →
TankMan (2003-07-20 04:53) [4]>>Babay
Спасибо большое... начал писать закрашивающийся компонент - потомок PageControl и TabSheet...эх...:) (а может их объединить?...)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c