[icWasya]

TfmExample писать не надо

Код:

Edit1.Text:=ColorToString(Canvas.Pixels [X,Y] );