Скачать: CL | DM;

SOS !!! зачет сегодня, 2 маленьких вопроса.   Найти похожие ветки 

← →
s.dog ©   (2002-02-15 12:47) [0]

1. Для чего используется следующая конструкция:

Application.OnHint:=ShowHint;


2. Для чего используется (вернее почему, для чего понятно):

procedure TForm1.PaintBox1Paint(Sender: TObject);
var i:integer;
begin
for i:=0 to length(circles)-1 do
begin
PaintBox1.Canvas.brush.Color:=circles[i].color ;
PaintBox1.Canvas.Ellipse(circles[i].rect);
end;
end;

---

← →
gek   (2002-02-15 12:57) [1]

1.для назначению Application.OnHint процедуры ShowHint
т.е при возникновении Application.OnHint будет вызывааться
ShowHint
2.рисует разные эллипсы с разным цветом

---

← →
Johnmen ©   (2002-02-15 13:00) [2]

>gek : Давайте зачетку ! ;0)))

---

← →
dog   (2002-02-15 13:10) [3]

Спасибо, только если можно поподробнее:

1.что это за Application.OnHint? когда он возникает?

2.почему енти эллипсы не будут без этого рисоваться?
нельзя ли их нарисовать используя другие методы?

---

← →
Johnmen ©   (2002-02-15 13:17) [4]

>dog : Садитесь - два !

---

← →
dog   (2002-02-15 13:20) [5]

а мне что-то не весело :(
ну не программист, я, только преподу параллельно как-то.

---

← →
Serghei   (2002-02-15 14:05) [6]

1. Application.OnNint возникает при перемещении курсора на компонент - для всплывающей подсказки (тобишь Hint"a) (клоуз, минимайз итд итп) OnHint определяешь для того чтобы указать системе какие действия должны быть предприняты в данном случае (например подсказка появляется не как всплывающая а ее текст помещен в статус баре)
2. ?
Надеюсь не ошибся!

---

← →
Serghei   (2002-02-15 14:21) [7]

2. Это процедуры для отрисовки эллипсов на канве. Можешь конечно нарисовать их посредством точек, расчитывая их координаты (точек), если эти не подходят! А отрисовываются они в данной процедуре PaintBox-a потому что она вызывается каждый раз когда твое окно перекрывается другим или когда ты сам даешь команду на перерисовку! Таким образом элипсы всегда будут видны!

---

← →
IronHawk ©   (2002-02-15 14:27) [8]

>>> Serghei

5

>>> dog

расскажи преподу то что сказал Serghei и получишь свой зачет !

---

← →
dog   (2002-02-15 16:26) [9]

Большое спасибо всем !!!!!!!!!

Я наконец-то сдал сессию !!!!!!!!! Приступаем к магистерской работе : )
Если кто-нить живет в Риге пишите - сегодня будет веселье !!!

---

← →
Johnmen ©   (2002-02-15 16:33) [10]

П о з д р а в л я ю !!!

---

← →
Serghei   (2002-02-15 16:52) [11]

Прими и мои поздравления, счастливчик!!! :0)))))

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.007 c