PDA

Просмотр полной версии : График функции


Пиу Пиуу
17.11.2012, 23:49
with Form8.Canvas do
begin
MoveTo(1,100); //начальные координаты
LineTo(round(200),round(100)); //координаты конца прямой
end;
можно ли как то для этого графика(ну как графика..) , к этой прямой сделать условие к примеру , если х<200 , то сделать там какое то действие , например вывести сообщение , подскажете как осуществить? и возможно это сделать if ' ом?

SunRRRice
18.11.2012, 00:02
var
X,Y:Integer;
.........................................
with Form8.Canvas do
begin
X:=200;
Y:=100;
MoveTo(1,100);
LineTo(X,Y);
if X<100 then
ShowMessage('трололо');

Вот так ;)

VeTaL_UA
18.11.2012, 00:07
Можно нескромный вопрос? На хрена "round"?

Добавлено через 5 минут
Предлагаю вам ещё прикольнее сделать
X:=round(trunc(int(200+frac(200)))) div 1;
Y:=round(trunc(int(100+frac(100)))) div 1;