Imagelist - bug ?

[uligerhardt]

Da ich nicht weiß, wo du deine Codefragmente aufrufst, hab ich mir mal schnell einen OnDrawCell-Handler gebaut:

Delphi-Quellcode:

procedure TForm62.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  if ACol = 0 then
    ImageList1.Draw(StringGrid1.Canvas, Rect.Left + 2, Rect.Top + 2, ARow);
end;

Auf die Art hab ich dein Artefakt nicht. Wenn das dein Problem nicht löst, bitte mehr Infos.

Uli.