var
  AButtons: array[0..15] of TSpeedButton;
begin
  for i := 0 to 15 do
    AButtons[i] := TSpeedButton(FindComponent('SpeedBut' + IntToStr(i)));

  for i := 0 to 15 do
    AButtons[i].ImageIndex := <원하는 값>;
end;

kkm 님이 쓰신 글 :
: 폼에 speedBut이 있고 이것의 각 네임은 speedbut0 ~ 15번까지 입니다.
: 이럴경우 외부의 배열을 받습니다. 예를 들어 temp[0..15] 받습니다.
:
: 이경우 각 스피드 버튼에 값을 적용할려고 합니다.
: 그러면 다쓰기 그렇고 해서 제생각에는
: for count :=0 to 15 do
: begin
:  speedbtn'Count'.ImageIndex := temp[count];
: end;
:
: 이렇게 하는게 제생각에는 맞는거 같아 햇더니 안되더군요......
: 위에처럼 되면은 템프로 받은 상태값이 실제 화면에서는 그림으로 변경이 가능해서
: gui환경에 맞는거 같아 만들어 볼려고 했습니다...
: 아직까지 델파이 실력이 부족하다는 걸 이럴때 많이 느낌니다..
: 솔직히 노가다로 각 배열과 일일이 숫자 대입을 하면될거 같은데.
: 그렇게 하기에는 코드가 너무 지저분해 보이기도 해 그렇습니다.
: 이에 질문 드립니다.