newbie, hvorfor virker det ikke

Jeg har 3 * edit på min form + en listbox + en paintbox1

Koden skal tegne en parabel.


void __fastcall TForm1::Button1Click(TObject *Sender)
{
float a = StrToFloat( Edit1->Text );
float b = StrToFloat( Edit2->Text );
float c = StrToFloat( Edit3->Text );
float y = 0;
float x = 0;

for (float x = 0; x == 100 ; x++)
{
  y = a*x*x + b*x + c;
  ListBox1->Items->Add( FloatToStr(x) + ':' + FloatToStr(y));
  PaintBox1->Canvas->Pixels[x][y] = ColorBox1->Selected;

}


}
//---------------------------------------------------------------------------


men der kommer ingen ting.
PS. som hobby sidder jeg og piller i Delphi.