Построить график любой функции+как задать условие

[Kornegi]

Господа, а как быть со вторым вопросом? Например:

f:=sin(x) 
x1:=StrToInt(Edit2.Text);
x2:=StrToInt(Edit3.Text);

Как построить график функции на промежутке от x1 до x2, но выполнить проверку y=0 в точке x2, если нет, то достроить до ближайшего пересечения с OX