Inversarea numerotării în memorie

Bună, pot face ca liniile cu cel mai mic indice în memorie să fie în partea de jos.

Dar ce vă împiedică să completați MEMO-ul în ordinea inversă a rândurilor și apoi să vă referiți la aceste linii prin intermediul funcției speciale?







funcția MyGetStringFromMemo (Memo: TMemo; Index: Integer): String;
începe
# xA0; cu Memo do
# xA0; Rezultat: = Linii [Prev (Lines.Count) - Index];
se încheie;

În program, memoria este utilizată ca formă pentru ieșirea textului și este situată în partea de jos a ecranului, expusă pe prima linie. Dacă memoria este umplută de sus în jos, textul nou nu va fi pur și simplu vizibil.

> tickler # xA0; (26.04.06 13:11) [2]







> noul text pur și simplu nu va fi vizibil.

Adăugați linii ca de obicei, dar după fiecare adăugare, derulați textul până la capăt, aceasta este întreaga întrebare.

În general, acest lucru este necesar pentru programul de afișare a subtitrărilor, astfel încât sub-ferestrele să fie întotdeauna în partea de jos a ecranului.

1. Corectați legătura.
2. Urmăriți partea din spate a liniei Memo - soluția obișnuită?

Când inversați numerotarea liniilor? Cum funcționează așa?

Elementar, Yuri. dacă se introduc linii noi în linia zero a inserției.

Aici este o notă cu numărătoarea inversă:

Iată un extras din subtitrări:

alo
Numele meu este
Vasya

Ca rezultat, obținem:

> tickler # xA0; (26.04.06 14:40) [7]

E un vis. Și realitatea este că memo-ul standard va arăta liniile în ordinea numerotării lor în Linii și nimic altceva. În ce ordine și exact unde le veți pune acolo - aceasta este o afacere a maestrului, dar acestea vor apărea oricum în ordinea numerotării. Adică, după introducerea a 3 linii de inserție în linia zero, obținem:

Memorie: 0,73 MB
Durată: 0,072 secunde







Trimiteți-le prietenilor: