프로시져 구성이 잘못된것 같은데 넘 초보라서 모르겠습니다.

동적 생성부분 (버튼이 약 120개정도 생성됩니다)
..............
with lineButton[edtIndex] do
  begin
    Parent := ScrollBox1;
    Left := 160;
    Top := edtTop;
    Width := 30;
    Height := 19;
    OnClick := lineButtonClick;
  end;
............

procedure TForm1.lineSynchButtonClick(Sender: TObject);
var
  i : Integer;
begin
    //dynamicCount : 생성된 버튼갯수
    for i := 0 to dynamicCount - 1 do
      begin
          if i = TButton(Sender).Tag then  
          begin
             lineButton[i].Caption := IntToStr(i);
             exit;
          end;  //end of if
      end; //end of for
end;

위처럼 이벤트 프로시져를 만들었는데요
생성된 버튼을 클릭시 버튼 자기자신Caption에 인덱스값으로 넣어볼려구 합니다.