Цвет текста в Мемо через Handle

[rpy3uH]

Sion

Динамически создаются некое число объектов TMemo каким макаром поменять цвет текста зная только HANDLЕы. (Размер, шрифт и пр. всё меняется)

[rpy3uH]

если ты создаёшь сам эьти объекты в своей программе
то тебе проще изменять цвет не пользуясь хендлом
таким методом
[I]var

memos:array[1..n] of tmemo;
...
for i:=...
begin
memos[i]:=tmemo.create(self);
memos.font.......
end;

потом всё это создаёшь и через массив обращаешься в ним
если количество мемок неограниченное то можно пользоваться объектом TList
var
LST:Tlist
OBJ:TMEMO;
....
lst:=tlist.create;
for i:=....
begin
OBJ:=Tmemo.create;
LST.add(pointer);
end;

потом к ним обращаешься через
lst.items[index] или lst[index]