Программирование в среде Delphi. Часть 2. Создание оконных приложений. Садовская О.Б. - 22 стр.

                                          22
ва н н ое Delphi описа н ие т ипа ф орм ы, кот орое след у ет после слова
type. З а тем описыва ет ся перем ен н а я Form1 д а н н ого типа .
       Ра зд ел реа лиза ции (implementation) н а чин а ет ся д ирект ивой {$R
*.DFM}, у ка зыва ю щей ком пиля т ору , чт о в ра зд ел реа лиза ции н а д о
вст а вит ь ин стру кции у ст а н овки зн а чен ий свойств ф орм ы, кот орые н а -
ход я тся в ф а йле с ра сш ирен ием .dfm, им я которого совпа д а ет с им е-
н ем м од у ля . Ф а йл в ф орм а т е DFM ген ериру ет ся Delphi н а осн ове
вн еш н его вид а ф орм ы.
       З а д ирект ивой {$R *.DFM} след у ет описа н ие процед у р об ра б от ки
соб ытий ф орм ы. Сю д а ж е програ м м ист м ож ет пом ест ит ь описа н ие
своих процед у р и ф у н кций, которые б у д у т вызыва т ься из процед у р
об ра б от ки соб ытий. В м од у ле м ож ет т а кж е сод ерж а т ься ра зд ел ин и-
циа лиза ции, который позволя ет выполн ит ь ин ициа лиза цию перем ен н ых
м од у ля . В д а н н ом прим ере ра зд ел ин ициа лиза ции отсу т ст ву ет вм ест е
с от крыва ю щим его словом begin.


                    2.3 Т екстовый редактор Memo
      Т екст овый ред а кт ор Memo в отличие от ст роки ввод а Edit м ож ет
сод ерж а т ь н е од н у , а лю б ое число ст рок. Осн овн ым свойст вом ком -
пон ен т а Memo я вля ет ся property Lines, которое за д а ёт список строк,
пом ещён н ых в ред а кт ор. Э т о свойст во им еет т ип TStrings. К ла сс
TStrings ин ка псу лиру ет поля и м етод ы д ля ра б оты со списка м и ст рок
и использу ет ся д ля опред елен ия свойст в соот вет ству ю щего типа во
м н огих ком пон ен та х Delphi. Особ ен н ост ью кла сса TStrings и его по-
т ом ков я вля ет ся то об стоя т ельст во, чт о э   лем ен т а м и списков слу ж а т
па ры ст рока -об ъект , в которых строка – соб ст вен н о строка сим волов,
а об ъект – э    т о об ъект лю б ого кла сса Delphi. Та ка я д войствен н ост ь
позволя ет сохра н я ть в TStrings об ъект ы с т екст овым и прим еча н ия м и,
сорт ирова т ь об ъект ы, от ыскива т ь н у ж н ый об ъект по его описа н ию .
К ром е того, в ка честве об ъект а м ож ет использова т ься пот ом ок
TStrings, чт о позволя ет созд а ва т ь м н огом ерн ые н а б оры ст рок. Позн а -
ком им ся с н екот орым и          свойст ва м и и м ет од а м и, опред елён н ым и в
кла ссе TStrings.
property Count : integer;
Опред еля ет число э      лем ен тов в списке.
property Strings[index:integer]:string;
Опред еля ет строку списка с ин д ексом index. И н д екс первой строки – 0.
property Text : string;
Сод ерж ит все строки списка , вклю ча я ра зд елители – сим волы возвра -
т а ка рет ки и перевод а строки (#13#10)
function Add(const s:string) : integer;
Д об а вля ет строку S в список и возвра ща ет поря д ковый н ом ер э              т ой
ст роки в списке.
procedure Clear;