Не компилируется (перебор по Edit)

[Stilet]

проблема была тут

Наверное лишний end стоял

[kta87]

Stilet, совершенно верно (точнее не там где нужно), потом все компилировалось, но вылетало с ошибкой, но там я просто сам затупил:

(FindComponent('Edit'+IntToStr(i)) as TEdit).OnKeyPress := EditKeyPress;
 LoadComboBoxItems;

засунул в

With StringGrid1 do

ну типа что бы условие не писать 2 раза... ага 2 часа сидел... Edit чере StrigGrid спаривал
Всем спасибо за советы...