Форум: "Начинающим";
Текущий архив: 2010.12.26;
Скачать: [xml.tar.bz2];
ВнизГрафика Найти похожие ветки
← →
Ghost del vonte (2010-10-02 22:56) [40]Удалено модератором
Примечание: Один вопрос, одна тема.
← →
Anatoly Podgoretsky © (2010-10-02 23:42) [41]
> у меня Винда Виста, она не поддерживает справочную систему
> Дельфи 5 или 7!
Она поддерживает
← →
Германн © (2010-10-03 01:30) [42]Не нашел в TDrawGrid чего-то подобного MultiSelect.
Как там у Плохиша что-то получается не понятно.
← →
Германн © (2010-10-03 01:43) [43]Забыл ещё сказать автору. (Замучен своей проблемой).
Если уж DefaultDrawing:= false, то надо самому рисовать всегда! А не только в некоторых случаях типаif gdSelected in State
.
Да для ряда компонент из библиотеки VCL такое может пройти и даже действительно проходит. Но не надо полагаться на случай.
← →
Плохиш © (2010-10-03 13:38) [44]
> Германн © (03.10.10 01:30) [42]
>
> Не нашел в TDrawGrid чего-то подобного MultiSelect.
Options значение goRangeSelect, по-умолчанию включено. Ячейки выделяются стандартным для вындовса способом, мышкой или стрелками с шифтом.
← →
Ghost del vonte © (2010-10-03 16:09) [45]
> Забыл ещё сказать автору. (Замучен своей проблемой).
> Если уж DefaultDrawing:= false, то надо самому рисовать
> всегда! А не только в некоторых случаях типа if gdSelected
> in State .
> Да для ряда компонент из библиотеки VCL такое может пройти
> и даже действительно проходит. Но не надо полагаться на
> случай.
Если не сворачивать программу, или не переключаться на другие окна, то, все прекрасно, но ведь пользователь обязательно ее свернет, что уже делать не знаю.... придется оставить как есть и предупредить пользователей чтобы сохраняли перед сворачиванием или переключением на другие окна.....
← →
бумбум (2010-10-03 17:51) [46]Выложи куда- нибудь с архивированный свой проект с глюком
← →
Ghost del vonte © (2010-10-03 19:16) [47]
> Выложи куда- нибудь с архивированный свой проект с глюком
Могу на емайл прислать, программа у меня использует компоненты: XPControls, ZLib (поставляется с Дельфи версии 3), TPNGObject, всех их тоже могу прислать, программа пока еще в виде черновика....
← →
Virgo_Style © (2010-10-03 21:59) [48]
> что уже делать не знаю.
Попытаться понять то, что тебе пишут.
← →
Ghost del vonte © (2010-10-04 17:06) [49]
>
> Попытаться понять то, что тебе пишут.
А я по вашему развлекаюсь здесь чтоли? Я не пробовал все что здесь пишут и приводят? Говорю исчезает, все неверят, выложу потом главный юнит в двух частях!
← →
Ghost del vonte © (2010-10-04 17:07) [50]Удалено модератором
Примечание: Давай портянки публиковать в другом месте, а это оставим для общения.
← →
Ghost del vonte © (2010-10-04 17:08) [51]Удалено модератором
← →
Ghost del vonte © (2010-10-04 17:28) [52]Удалено модератором
Примечание: Обсуждение модерирования
← →
Плохиш © (2010-10-04 17:48) [53]
> то может подкинете идею тогда?
Подкидываю идею - надо нанять программиста.
← →
Ghost del vonte © (2010-10-04 17:53) [54]
> Подкидываю идею - надо нанять программиста.
Того, что создавал компонент TDrawGrid?
Я серьезно! Я перепробовал все, что только мог, и все то, что здесь советовали, - толку нет! Ладно, разберусь сам, кроме насмешек, ничего не вижу.... не верите и ладно! Спасибо всем за отнятое время!
← →
Anatoly Podgoretsky © (2010-10-04 18:00) [55]Прощай
← →
Andy BitOff © (2010-10-04 18:08) [56]> Ghost del vonte ©
Выложи куда-нибудь весь свой проект и компоненты/библиотеки, которые нужны, чтобы проект скомпилировался, кто-нибудь да посмотрит у нас есть тут добрые люди (пока еще) =)
> не верите и ладно
Мы тут не вопросы веры обсуждаем. Это тебе на другой форум. Тебе говорят, что все работает, если ты утверждаешь обратное - доказывай. Причем здесь вера? Показывай ВЕСЬ код. Сдается мне, что у тебя в другом месте ошибка, а ты к гриду привезался.
← →
Ghost del vonte © (2010-10-04 18:10) [57]
> Мы тут не вопросы веры обсуждаем. Это тебе на другой форум.
> Тебе говорят, что все работает, если ты утверждаешь обратное
> - доказывай. Причем здесь вера? Показывай ВЕСЬ код. Сдается
> мне, что у тебя в другом месте ошибка, а ты к гриду привезался.
>
Возможно, сделаю....
← →
Плохиш © (2010-10-04 18:16) [58]
> Ghost del vonte © (04.10.10 17:53) [54]
> Я серьезно! Я перепробовал все, что только мог, и все то,
> что здесь советовали, - толку нет!
Я создал новый проект, бросил на форму TDrawGrid, создал обработчик OnDrawCell, скопировал в него приведённый здесь код, запустил проект на выполнение. Текущая ячейка отрисовалась красным, минимизировал форму, востановил - ячейка отрисовалась красным. Выделил несколько ячеек - они отрисовались красным, минимизировал - востановил форму - ячейки всё-равно отрисовались красным.
Так кому я должен верить, вам или своим глазам?
← →
Ghost del vonte © (2010-10-04 18:18) [59]
> Я создал новый проект, бросил на форму TDrawGrid, создал
> обработчик OnDrawCell, скопировал в него приведённый здесь
> код, запустил проект на выполнение. Текущая ячейка отрисовалась
> красным, минимизировал форму, востановил - ячейка отрисовалась
> красным. Выделил несколько ячеек - они отрисовались красным,
> минимизировал - востановил форму - ячейки всё-равно отрисовались
> красным.
> Так кому я должен верить, вам или своим глазам?
А разве я говорил вам что неверю тому, что вы говорите? Я просто не пойму почему у меня так не получается....
Вот архив моего проекта со всеми компонентами для его правильной работы, может вы сможете найти эту ошибку, которая мешает отрисовке!
http://files.mail.ru/WOO0B0
← →
Плохиш © (2010-10-04 19:25) [60]
> Ghost del vonte © (04.10.10 18:18) [59]
Не надо пытаться обмануть систему
или включи DefaultDrawing
или тебе в [43] же сказали
procedure TfmLora.DrawGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if gdSelected in State then
begin
DrawGrid1.Canvas.Brush.Color:= DColor;
//FillRect(DrawGrid1.Canvas.Handle, Rect, 0);
DrawGrid1.Canvas.FillRect(Rect);
//InvalidateRect(DrawGrid1.Canvas.Handle, nil, false);
//DrawGrid1.Invalidate;
//Bitmap.Canvas.Brush.Color:= Panel1.Color;
//Bitmap.Canvas.FillRect(Rect);
StatusBar1.Panels[1].Text:= "Col: "+IntToStr(ACol)+" , Row: "+IntToStr(ARow);
end
else
begin
DrawGrid1.Canvas.Brush.Color:= DrawGrid1.Color;
DrawGrid1.Canvas.FillRect(Rect);
StatusBar1.Panels[1].Text:= "Col: "+IntToStr(ACol)+" , Row: "+IntToStr(ARow);
end;
end;
Страницы: 1 2 вся ветка
Форум: "Начинающим";
Текущий архив: 2010.12.26;
Скачать: [xml.tar.bz2];
Память: 0.56 MB
Время: 0.005 c