link6532 link6533 link6534 link6535 link6536 link6537 link6538 link6539 link6540 link6541 link6542 link6543 link6544 link6545 link6546 link6547 link6548 link6549 link6550 link6551 link6552 link6553 link6554 link6555 link6556 link6557 link6558 link6559 link6560 link6561 link6562 link6563 link6564 link6565 link6566 link6567 link6568 link6569 link6570 link6571 link6572 link6573 link6574 link6575 link6576 link6577 link6578 link6579 link6580 link6581 link6582 link6583 link6584 link6585 link6586 link6587 link6588 link6589 link6590 link6591 link6592 link6593 link6594 link6595 link6596 link6597 link6598 link6599 link6600 link6601 link6602 link6603 link6604 link6605 link6606 link6607 link6608 link6609 link6610 link6611 link6612 link6613 link6614 link6615 link6616 link6617 link6618 link6619 link6620 link6621 link6622 link6623 link6624 link6625 link6626 link6627 link6628 link6629 link6630 link6631 link6632 link6633 link6634 link6635 link6636 link6637 link6638 link6639 link6640 link6641 link6642 link6643 link6644 link6645 link6646 link6647 link6648 link6649 link6650 link6651 link6652 link6653 link6654 link6655 link6656 link6657 link6658 link6659 link6660 link6661 link6662 link6663 link6664 link6665 link6666 link6667 link6668 link6669 link6670 link6671 link6672 link6673

Форум — Ответы     (  К темам )
 ?  ZvDoo: Подскажите пожалуйста как установить курсор в конец поля Memo при ... (08-01-2003 18:23:22)
Подскажите пожалуйста как установить курсор в конец поля Memo при поступлении в него данных, например из файла.(как в нормальных терминалах) ОЧЕНЬ НУЖНО!
 Павел (08-01-2003 23:34:16)
Подходит ?

Memo1->SetFocus();
long lg = Memo1->Text.Length();
Memo1->SelStart = lg;

Или в чем-то проблема ?
 ZvDoo (09-01-2003 05:22:27)
Да спасибо, это сработало, но при этом мне необходимо чтобы я видел нижнюю часть Memo. У меня получается, что я вижу самый верх поля, а курсор вместе с текстом как и надо смещается вниз!
 Владимир (09-01-2003 09:56:39)
Memo1->SetFocus();
long lg = Memo1->Text.Length();
Memo1->SelStart = lg;
PostMessage(Form1->Memo1->Handle,WM_KEYDOWN,VK_LEFT,0);
PostMessage(Form1->Memo1->Handle,WM_KEYDOWN,VK_RIGHT,0);
 Павел (09-01-2003 10:01:12)
А это пример из FAQ как программно прокрутить TMemo

re: Как получить доступ к линейке прокрутки в TMemo?
Если все, что тебе нужно, это скроллинг, то можно использовать со-общения EM_GETFIRSTVISIBLELINE — для получения номера пер-вой отображаемой строчки, и EM_SCROLL — собсвенно для скро-линга. Формат:
SendMessage(
Memo1->Handle,
EM_GETFIRSTVISIBLELINE,
0,0) — возвращает номер первой отображаемой строчки, где Memo1 — это твой объект типа TMemo.
SendMessage(
Memo1->Handle,
EM_SCROLL,
<Scroll Action>,
0);
Здесь <Scroll Action> — одно из следующих: B_LINEDOWN,SB_LINEUP,SB_PAGEDOWN,SB_PAGEUP.