Delphi » FAQ » Tekst

3 komentarzy

Dwie noce szukałem. Dz :)

Polecam przemodyfikowac kod:

procedure ScrollDown(Memo: TMemo);
begin
Memo.CaretPos := Point(0,Memo.Lines.Count-1);
Memo.Perform(EM_SCROLLCARET, 0, 0);
end;

W tej chwili - memo bedzie scrollowac do ostatniej dodanej linii (np tak jak jest w czatach ;))

Mam problem ze znalezieniem odpowiedzi wieć napiszę tutaj.
Po wczytaniu długiego tekstu do memo zawsze kursor zostaje na ostatniej linii, mam scroll ale nie wiem jak zrobic żeby automatycznie po wczytaniu wróciło do pierwszej linii.

Proszę o pomoc.