Характерни свойства на основната форма на наследство шрифта
При използване бележка компонент да влезе в стойността на всеки елемент масив на масива трябва да се прилага в една линия и след всеки масив елемент за натискане. Достъпът до терена намира в Memo ред от текста, можете да използвате свойствата на линиите. посочва в скоби желания номер линия (линия номерирани от 0). Следната програма, текстът на която е показана на Обява 5.5 демонстрира използването на компонент Memo да въведете знак масив. Основната линия вход характер набор от процедури бележка компонент може да изглежда като: за I: = 1 до размер направя [I]: = Memo1.Lines [Ь];
където: размер - име константа, която определя размера на масива; и - масив; Memo1 - Мемо-компонент име; Линии - Memo компонент имот, който е масив, всеки елемент от които съдържа един ред намира в текста на бележката. Формата на програмата е показано на фиг. 5.4. Memo допълнение поле съдържа команден бутон (Button1), когато се натисне, на която входните стойности на елементи от масива на поле Memo.
Фиг. 5.4. В диалоговия прозорец за влизане масив за кандидатстване
Обявата 5.5. Входни линии с бележка масив компонент
Windows, Съобщения, SysUtils, Уроци, графика, контроли, форми, диалогови прозорци, менюта, StdCtrls;
процедура Button1Click (Sender: TObject);
процедура TForm1.Button1Click (Sender: TObject);
SIZE = 5; // размер на масива
а: масив [1..SIZE] на низ [30]; // масив
п: цяло число; // броя на редовете въвежда в поле бележка
I: цяло число; // индекс на елемент на масива
ShowMessage ( "Първоначалните данни са вписани! ');
Exit; // изход процедура събитие
// в Мемо поле е текст
ако п> РАЗМЕР тогава
ShowMessage ( "надвишава броя на редовете на масива. ');
п: = РАЗМЕР; // ние ще влезе само първите РАЗМЕР линии
на [Ь]: = Form1.Memo1.Lines [I-1]; // Допълнителни линии са номерирани от нула
// отпечатване на масива в клетка съобщение
край. Основната част от работата се извършва процедура TForm1.Button1Click. който първи проверки, за да се види дали Memo1 текст в полето. Ако текстът (в този случай, на свойствата на znĂ Lines.Count по-голяма от нула), процедурата се сравняват текущата броя на редовете и размера на масива. Ако тази сума надвишава размера на масива, програмата се променя в п. по този начин получаване на първия вход само размер редове. Фиг. 5.5 е изглед на диалоговия прозорец въведете масива за кандидатстване. След като кликнете появи прозорец за въвеждане на командния бутон (фиг. 5.6), която съдържа стойностите на елементите на масив, получени от Memo -field.
Фиг. 5.5. Заявление прозорец Въвеждане масив
Фиг. 5.6. Array вход от Memo -field
Свързани статии