Código Delphi [-] ListBox1.Canvas.TextRect(Rect, 0, 0, Str); // el código correcto debiera ser: ListBox1.Canvas.TextRect(Rect, Rect.Left, Rect.Top, Str);
ListBox1.Canvas.TextRect(Rect, 0, 0, Str); // el código correcto debiera ser: ListBox1.Canvas.TextRect(Rect, Rect.Left, Rect.Top, Str);