посмотри в ббиблию delphi, там вроде это было
Не нужно никуда смотреть, подсказка была дана:если а[итый] больше 100 и в то же время меньше 50 то ошибка
for i:=1 to 20 do
begin
a[i]:=strtoint(stringgrid1.Cells[i-1,0]);
if (a[i]>100) and (a[i]<50) then
Showmessage('ошибка!');
end
{or - это когда удовлетворяется как минимум одно из двух дает true, and- когда оба правдивы дает true}
Zhassulan_B_A
Zhassulan_B_A
Регистрация: 05.07.2012, 02:18Offline Активность: 09.07.2012, 16:16