Код:
if BitBtn1.Glyph=BitBtn2.Glyph then Edit1.Text:='yes';
я написала для примера, а так я уже организовала проверку с циклом:
for j:=0 to 3 do begin
for i:=0 to 2 do begin
if (ArBB[0+i+5*j].Glyph=ArBB[1+i+5*j].Glyph) and
(ArBB[1+i+5*j].Glyph=ArBB[2+i+5*j].Glyph) then
edit1.Text:='yes';
Админ: Пользуемся тегами для оформления кода!
у меня 20 компонентов BitBtn и все они занесены в массив типа TBitBtn - ArBB.