Форум: "Основная";
Текущий архив: 2005.06.14;
Скачать: [xml.tar.bz2];
ВнизCaretPos Найти похожие ветки
← →
sofs © (2005-06-01 06:58) [0]вот пишу if s=8 then richedit1.CaretPos.y+1;Выдаётся ошибка.как правильно писать?
← →
ANB © (2005-06-01 07:04) [1]var NewCaretPos : TPoint;
begin
NewCaretPos := CaretPos;
NewCaretPos.Y := NewCaretPos.Y + 1;
RichEdit1.CaretPos := NewCaretPos;
end;
← →
Kerk © (2005-06-01 07:10) [2]sofs © (01.06.05 6:58)
Добрый совет. Купи книжку по Делфи и прочитай. :)
← →
ANB © (2005-06-01 07:27) [3]
> Kerk © (01.06.05 07:10) [2]
- не придирайся. Я сам месяца 3 назад на такую штуку нарвался. И опять забыл. Так как на SynEdit перешел. Удобная штука.
← →
Kerk © (2005-06-01 07:36) [4]ANB © (01.06.05 7:27) [3]
- не придирайся.
А кто придирается? Я же сказал - добрый совет :)
> Я сам месяца 3 назад на такую штуку нарвался. И опять
> забыл.
Хммм.. :))))
http://delphimaster.net/view/1-1117562166/
← →
sofs © (2005-06-01 07:37) [5]%^$%# че-то я совсем задолбался.Короче:for i:=1 to 50 do begin
simvol:=Myarray[i];
RichEdit1.Text:=RichEdit1.Text+"$"+inttohex(simvol,2)+" ";
if ((i mod 4=0)and (i<>0)) then RichEdit1.Text:=RichEdit1.Text+" ";
if ((i mod 8=0)and (i<>0)) then begin NCaretPos := RichEdit1.CaretPos;
NCaretPos.Y := NCaretPos.Y + 1;
RichEdit1.CaretPos := NCaretPos;
end;
Укажите мне на ошибку которая не даёт возможности перейти на след строку?
← →
ANB © (2005-06-01 07:48) [6]
> Kerk © (01.06.05 07:36) [4]
- ты был прав. Нужна книжка.
Кстати, твоя ссылка не работает. А чего там было ?
← →
Kerk © (2005-06-01 08:13) [7]ANB © (01.06.05 7:48) [6]
А чего там было ?........
Kerk © (31.05.05 21:58) [1]
TRichEdit.CaretPos или TRichEdit.SetCaretPos()
----------------------------
sofs © (31.05.05 22:01) [2]
И с какими параметрами его применять
Чё писать в скобках?
.......
← →
ANB © (2005-06-01 08:17) [8]
> Kerk © (01.06.05 08:13) [7]
- дамс. Серьезненько. Хелп уже не кошерно.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.06.14;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.034 c