Реферат: Разработка приложений базы данных "Командировка"

case Tag of

1: with RedForm do begin

Label1. Caption:='Номер документа';

Label2. Caption:='ФИО';

Label3. Caption:='Должность';

Label4. Caption:='Телефон';

Label5. Caption:='Название отдела';

Label6. Caption:='Специализация';

Label7. Visible:=false;

DBEdit1. DataField:='№ документа';

DBEdit2. DataField:='ФИО';

DBEdit3. DataField:='Должность';

DBEdit4. DataField:='Телефон';

DBEdit5. DataField:='Название отдела';

DBEdit6. DataField:='Специализация';

DBEdit7. DataField:='';

DBEdit7. Visible:=false;

DBEdit6. Visible:=true;

Label6. Visible:=true;

end;

2: with RedForm do begin

Label1. Caption:='Номер запроса';

Label2. Caption:='Суточные';

Label3. Caption:='Оплата проезда';

Label4. Caption:='Оплата труда';

Label5. Caption:='Количество человек';

Label6. Caption:='Итого';

Label7. Visible:=false;

DBEdit1. DataField:='№ запроса';