chcialem zrobic warunki, ktore po spelnieniu dodaja odpowiednia ilosc punktowmam taki kod
procedure TForm1.Button1Click(Sender: TObject);
begin
if losowanie1.ItemIndex = 0 then
begin
if liczba.value < 12 then
liczba.Value:= liczba.Value + 3
else if liczba.value >= 12 then
liczba.Value:= liczba.Value + 2
else if liczba.value >= 20 then
liczba.Value:= liczba.Value + 1;
end;
end;
end;
dzialaja warunki do 2 gdy dochodzi w spinedit do 20 to zamiast dodawac 1 dodaje mi 2, korzystajac z debugera wiem ze chodzi o linijke
if liczba.value >= 20 then
tylko ze wlasnie probowalem na rozne sposoby dodajac else w roznych miejscach i zawsze nie zostaje spelniony warunek 3 i nie wiem jak zapisac to poprawnie zeby 3 warunki zostaly spelnione prosze o pomoc
Moja zawartość
Nie podano
