Показать сообщение отдельно
  #12  
Старый 24.05.2012, 07:30
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

Цитата:
Сообщение от bambooshoot
хотя мой, несмотря на его странность - тоже работает
работает, если не возвращаться вверх по тексту

Цитата:
Сообщение от bambooshoot
Число в р.y может быть любым, в зависимости от предпочтений
и при другом размере шрифта, число придётся тоже менять
хорошая практика, когда одно изменение вносится в одном месте
ещё есть антипаттерн

если сделать так, то от размера шрифта не будет зависеть:
PHP код:
p.:= (p.1) * Canvas.TextHeight('X') + 5

Код:
LineWidth(Memo1.Lines[p.y]+'X', p.x+1)
а это место мне самому не совсем понятно, но работает и ладно
Ответить с цитированием