[mpdasa]

Сообщение от PS11011010

Код:

for i := 0 to RichEdit1.Lines.Count - 1 do
 if MaxWidth < RichEdit1.Canvas.TextWidth(RichEdit1.Lines.Strings[i]) then
   MaxWidth := RichEdit1.Canvas.TextWidth(RichEdit1.Lines.Strings[i]);

Один дилетанский вопрос. Когда я вставил ваш код и запускаю прогу то выдается сообщение

undeclared identifier: 'Canvas'

Это при том, что у меня есть строка:

Код:

var canvas: TCanvas;