![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Координатная плоскость [D5, Win95/98]
$tranger © (2004-04-13 09:11:00)Господа, подскажите как мне реализовать в своей программе координатную плоскость. В принципе мне нужна сама сетка. Я пробовал чарез Shape, но 900 штук - это перебор. Может есть готоввый компонент или альтернативное решение?.. Спасибо
$tranger (2004-04-15 15:02:00) [1]Господа, всем большое спасибо - очень помогли, особенно
> panov © (14.04.04 21:34) [10]
. Заодно и научился работать с Canvas'ом :)
Gero (2004-04-14 22:26:00) [2]
> Прорисовка окон в Windows так и работает, пока не заметно,
> чтобы тормозило особо...
Тормозит. Особенно в XP
:)
panov (2004-04-14 21:34:00) [3]procedure TForm1.FormPaint(Sender: TObject);
var
x,y: Integer;
REct: TRect;
begin
GetClipBox(Canvas.Handle,Rect);
Canvas.Pen.Style := psDot;
x := 20;
y := 20;
while x<Rect.Right do
begin
canvas.MoveTo(x,0);
Canvas.LineTo(x,Rect.Bottom);
Inc(x,20);
end;
while y<Rect.Bottom do
begin
canvas.MoveTo(0,y);
Canvas.LineTo(Rect.Right,y);
Inc(y,20);
end;
panov (2004-04-14 21:24:00) [4]>$tranger © (14.04.04 20:20) [7]
Т.е. вы предлагаете в событии Paint поставить цикл с рисованием... Интересная идея, но не будет ли тормозить при запуске на слабых машинах?
Прорисовка окон в Windows так и работает, пока не заметно, чтобы тормозило особо...
Gero (2004-04-14 20:46:00) [5]
> Интересная идея, но не будет ли тормозить при запуске на
> слабых машинах?
В любом случае 900 Shape будет тормозить НАМНОГО больше.
$tranger (2004-04-14 20:20:00) [6]Т.е. вы предлагаете в событии Paint поставить цикл с рисованием... Интересная идея, но не будет ли тормозить при запуске на слабых машинах?
тихий вовочка (2004-04-14 07:15:00) [7]У меня на работе плоскость из ячеек 256х64. Я рисую линиями
установив стиль пера в psDot. Очень красиво получается.
Думкин (2004-04-14 06:33:00) [8]> $tranger © (13.04.04 20:09) [3]
Ну так просто - берешь и линуешь. Например обрабатывай WM_Paint.
panov (2004-04-13 22:49:00) [9]так прямыми линиями сетку рисуй...
$tranger (2004-04-13 20:09:00) [10]Я раскопировал на самой форме 900 штук квадратов - вот и все...
> Думкин © (13.04.04 12:18) [1]
что значит "просто рисовать"
WondeRu (2004-04-13 12:29:00) [11]на чем рисуешь-то?
Думкин (2004-04-13 12:18:00) [12]А просто рисовать ее - пробовал?