Крестики-нолики

[Анжеликааа]

Привет всем! делаю курсовую "Крестики-нолики" в делфи, практически сделала ее, но один вопрос есть. как сделать так, что бы при запуске игры выбивалось кем я хочу играть крестиком или ноликом? и там я уже выбирала и игра начиналась с крестиков, независимо играю я крестиком или ноликом. ПОМОГИТЕ ПОЖАЛУЙСТА!

[revizor]

наверно должна быть переменная, которая и будет показывать кто в данный момент должен ходить. крестик или нолик

[Анжеликааа]

вот это меня и интересует. какую процедуру нужно сделать?

[revizor]

напиши процедуру, где игрока будут просить ввести число. 0-первые ходят нолики, 1-первые ходят крестики. и это число запиши в глобальную переменную. тогда в любом месте программы можно узнать чей сейчас ход. вот так)

можно что-нибудь другое придумать

вот еще что забыл. при каждом ходе нужно менять значение этой переменной

[Анжеликааа]

может поможешь это сделать? а то я там запутаюсь

[Serge_Bliznykov]

Выложите исходники вашего проекта (в архиве) на форум.
Тогда Вам можно ожидать КОНКРЕТНУЮ помощь в виде правки вашего кода.
Иначе это всё пустые разговоры...

p.s. Простите за нескромный вопрос, а Вы программу самостоятельно писали?..

[Анжеликааа]

Нет, не сама. взяла исходник и начала его изменять на более простой вариант.

МОЯ КУРСОВАЯ.rar

[Serge_Bliznykov]

ну, для начала, Вы уверены, что в случае, когда никто из игроков не построил линию из трёх фишек ("tie" переводится как ничья), нужно засчитывать поражение игроку?!! o_O

        if (win='tie') then
                begin
               // winTw.Caption:=inttostr(strtoint(winTw.Caption)+1);
           //     winTw1.Caption:=winTw.Caption;
                Theend(9);
                if (messagebox(0,'Вы проиграли, хотите сыграть еще раз?','Крестики-нолики',mb_YESNO)=7) then close;
                ReloadClick(Sender);
                end;

[Анжеликааа]

спасибо, а я и не заметила это. исправила ошибку

[Serge_Bliznykov]

я немножко поглумился над вашим кодом.
Если что не так - я не виноват, прошу тапками не бросаться...
Будут вопросы - задавайте...