Программный модуль учебного назначения по разделу математики "Многогранники"

Дипломная работа - Компьютеры, программирование

Другие дипломы по предмету Компьютеры, программирование



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   рубрикатор по предметам  рубрикатор по типам работ  пользовательское соглашение