ActiveDelphi

[ombrerico]

for k:=0 to 5 do begin
Mxk:=FindComponent('S1_'+IntToStr(k));
Mxk.Color:=clBlack;
end;
erro: Incompatible string and Tcomponent

[leo_cj]

Esse erro ocorre pois você está tentando atribuir um valor do tipo TComponent para uma variável do tipo String, em qual linha esse erro ocorre?

se for no trecho citado, verifique se a variável Mxk é do tipo TComponent

[ombrerico]

Obrigado amigo, foi de extrema utilidade para mim

Mxk : TMemo
Mxk:=TMemo(FindComponent('S1_'+IntToStr(k)));

Assim funcionou, grato.