Цитата:
Сообщение от Vladimr
Вариант написанный на коленке
Код:
If strtofloat(Label1.caption)<0 then
begin
Label2.caption:='плохо';
Label2.color:=clred;
end
else
if (strtofloat(Label1.caption)>5)and(strtofloat(Label1.caption)<=10) then
begin
Label2.caption:='хорошо';
Label2.color:=clFuchsia;
end
else
begin
Label2.caption:='удовлетворительно';
Label2.color:=clYellow;
end;
Админ: Пользуемся тегами при оформлении кода!
|
Спасибо большое! Но код почему - то не срабатывает =(
Последний раз редактировалось Irina_alex, 26.03.2021 в 02:50.
|