![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Ограничения в Memo [D5, D7, 2000]
Lagrima © (2006-12-06 11:37:00)Здравствуйте.
Подскажите пожалуйста, как при вводе в memo ограничить число строк и ограничить число символов в строке, чтобы в каждой строке можно было вводить определенное число символов, а при достижении данного числа происходил переход на след строку.
Спасибо.
Elen (2006-12-06 12:19:00) [1]
> Lagrima
Всегда будьласка
Lagrima (2006-12-06 12:14:00) [2]
> Elen © (06.12.06 11:58) [5]
Спасибо большое!!!
Elen (2006-12-06 11:58:00) [3]
> Lagrima
Лови :
procedure TForm1.Memo1Change(Sender: TObject);
begin
if Memo1.CaretPos.X>9 then Memo1.Lines.Insert(Memo1.CaretPos.Y+1,'');
end;
Где 9 ограничение колва символов в строке
Jeer (2006-12-06 11:50:00) [4]
> agrima (06.12.06 11:45) [3]
Считай.
Lagrima (2006-12-06 11:45:00) [5]Мне нужно немного по-другому.
Например:
В мемо в одной строке помещается 80 символов, а мне необходимо чтобы при наборе в строке 60-го символа происходил перенос на след строку.
Jeer (2006-12-06 11:43:00) [6]Считать ?
А за общее число символов отвечает maxlength.
Elen (2006-12-06 11:41:00) [7]
> ограничить число символов в строке
Во первых расчитай сколько символов будет в строке для данного размера мемо учитывая шрифт. и умнож на нужное колво строк. Получиш число подставь его в MaxLength