Описание процедур TopT и EndT

Процедуры выводят верхнюю или нижнюю часть «шапки» базы данных, для чего используются стандартные операторы вывода. Рамка таблицы выводится с помощью символов псевдографики «кодировка символов по стандарту ASCII». Вид рамки выбираете сами!

Описание процедуры InputFields(var Rec: RecType)

Процедура осуществляет ввод значения элементов полей записи Rec. Переменным Rec.naimt, Rec.stoimt, Rec.kolt, Rec.dmg.year, Rec.dmg.month, Rec.dmg.day присваиваются значения. Корректность вводимых значений обеспечивается следующими процедурами:

? Procedure InputReal(Var R: Real; Width: Byte; Inv: String) контролирует ввод вещественных данных R (ширина поля Width) с проверкой на допустимый символ и со строкой приглашения Inv;

? Procedure InputNumber(Var Number: Real; NumberMin, NumberMax: LongInt; Width: Byte; Inv: String) контролирует ввод целочисленных данных Number (ширина поля Width) с проверкой диапазона [NumberMin.. NumberMax] и со строкой приглашения Inv;

? Procedure InputString(Var S: String; LenNaimt: byte; Inv: String) контролирует ввод строки символов S с проверкой количества введенных символов [1..LenNaimt] и со строкой приглашения Inv.

Все эти процедуры предварительно выводят максимальное количество возможных позиций для данного поля цветом Color на фоне Fon (процедура OutPutString).

Описание процедуры OutputRec(rec: RecType)

Процедура осуществляет вывод значений элементов полей записи стандартными операторами вывода с использованием символов псевдографики.

Не нашли, что искали? Воспользуйтесь поиском: