Код:
Edit1.BorderStyle:=bsNone;
Edit1.Color:=GetFormImage.Canvas.Pixels[PageControl1.Left + TabSheet1.Left, PageControl1.Top + TabSheet1.Top];
Но это сработает не всегда, только если TabSheet видим, ничем не перекрыт, и находится в пределах формы (не выходит за ее границы). |