Программный модуль учебного назначения по разделу математики "Многогранники"
Дипломная работа - Компьютеры, программирование
Другие дипломы по предмету Компьютеры, программирование
a>
then Form1x.Image1.Tag:=0// к вопросу есть иллюстрация
beginx.Image1.Tag:=1;:=copy(s,2,length(s));x.Image1.Picture.LoadFromFile(b+ifn);E:EFOpenError do.tag:=0;
end;;
// Читаем варианты ответов:=1;:=;// читаем текст варианта ответа
readln(f,s);:=Decode(false,s);(s[1] ,)buf:=buf+s+ ;(s[1]=,)or(s[1]=});
// прочитан альтернативный ответ(s[2],score[i],code);
case i of
: frm.Label1.caption:=buf;
: frm.Label2.caption:=buf;
: frm.Label3.caption:=buf;
: frm.Label4.caption:=buf;;:=i+1;s[1]=};
// здесь прочитана иллюстрация и альтернативные ответы
// текст вопроса уже выведенForm1x.Image1.Tag =1 // есть иллюстрация к вопросу
then begin(Form1x.Image1);x.Image1.Visible:=TRUE;;
">// вывод альтернативных ответовForm1x.Label1.Caption <>
begin.Label2.top:=frm.Label1.top+frm.Label1.height+5;.RadioButton2.top:=frm.Label2.top;.Label2.visible:=TRUE;.RadioButton2.visible:=TRUE;;Form1x.Label3.Caption begin.Label4.top:=frm.Label3.top+ frm.Label3.height+5;.RadioButton4.top:=frm.Label4.top;.Label4.visible:=TRUE;.RadioButton4.visible:=TRUE;;;
Copyright © 2008-2014 geum.ru рубрикатор по предметам рубрикатор по типам работ пользовательское соглашение