컨트롤배열을 흉내내는 방법인데여....컴포넌트의 Tag 속성을 이용합니다.
10개의 Label에 Tag 속성에 0부터9까지 입력 하구여...
j := 0; //<-- 컨트롤배열의 인덱스비교를 위한 변수
for i := 0 to Form.ComponentCount - 1 do begin
if Form.Components[i] is TLabel then begin
if TLabel(Form.Components[i]).Tag = j then begin
TLabel(Form.Components[i]).Caption := '집어넣을 켑션';
Inc(j);
end;
end;
end;
10개의 Label에 Tag 속성에 0부터9까지 입력 하구여...
j := 0; //<-- 컨트롤배열의 인덱스비교를 위한 변수
for i := 0 to Form.ComponentCount - 1 do begin
if Form.Components[i] is TLabel then begin
if TLabel(Form.Components[i]).Tag = j then begin
TLabel(Form.Components[i]).Caption := '집어넣을 켑션';
Inc(j);
end;
end;
end;
즐프하세여..^^;;