Posłuż się następującym kodem:
|
1 2 3 4 5 6 7 8 9 10 11 |
var wers : integer; // wers to numer linii begin wers := 3; Memo1.SelStart := Memo1.Perform(EM_LINEINDEX, wers - 1, 0); Memo1.SetFocus; end; |
Autor: Nakiel
Posłuż się następującym kodem:
|
1 2 3 4 5 6 7 8 9 10 11 |
var wers : integer; // wers to numer linii begin wers := 3; Memo1.SelStart := Memo1.Perform(EM_LINEINDEX, wers - 1, 0); Memo1.SetFocus; end; |
Autor: Nakiel