Форум программистов, компьютерный форум, киберфорум
Наши страницы

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
ydnacsc
0 / 0 / 0
Регистрация: 31.03.2014
Сообщений: 7
#1

Морской бой (Delphi -> C++) - C++

11.04.2014, 14:28. Просмотров 199. Ответов 0
Метки нет (Все метки)

Ребята, для курсовой надо, помогите перевести с делфи в с++
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
procedure TfmBattle.FormActivate(Sender: TObject);
var i,j:integer;
begin
  if Fileexists('f1.stt')
    then
     begin
  AssignFile(stt,'f1.stt');
  Reset(stt);
  Read(stt,D);
  CloseFile(stt);
     end
    else
     for i:=0 to 9 do
       for j:=0 to 9 do
         D[i,j]:=0;
  nol:=true;
  shape5.Brush.Color:=rgb(238,180,34);
  shape6.Brush.Color:=rgb(205,38,38);
  for i:=0 to 210 do
   for j:=0 to 210 do
     begin
       myField.Canvas.Pixels[i,j]:=clAqua;
       cField.Canvas.Pixels[i,j]:=clAqua;
     end;
  for j:=0 to 210 do
    begin
      myField.Canvas.Pixels[j,0]:=clNavy;
      myField.Canvas.Pixels[0,j]:=clNavy;
      cField.Canvas.Pixels[j,0]:=clNavy;
      cField.Canvas.Pixels[0,j]:=clNavy;
      myField.Canvas.Pixels[j,209]:=clNavy;
      myField.Canvas.Pixels[209,j]:=clNavy;
      cField.Canvas.Pixels[j,209]:=clNavy;
      cField.Canvas.Pixels[209,j]:=clNavy;
    end;
  i:=21;
  While i<=210 do
    begin
      For j:=1 to 210 do
        begin
          myField.Canvas.Pixels[i,j]:=clNavy;
          cField.Canvas.Pixels[i,j]:=clNavy;
          myField.Canvas.Pixels[j,i]:=clNavy;
          cField.Canvas.Pixels[j,i]:=clNavy;
        end;
      i:=i+21;
    end;
  InitMas(A,B,C);
  GetB(B);
  ds1:=0;
  ds2:=0;
  S:=[];
  o:=1;
  pp:=2;
end;
Реально надо любая помощь, буду очень благодареню
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
11.04.2014, 14:28
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Морской бой (Delphi -> C++) (C++):

морской бой - C++
в моем классе не вызываются поля через точку.в чем проблема? #include&lt;iostream&gt; using namespace std; class Game { public: ...

Морской бой - C++
Нужна игра Морской бой. Месяц провалялся в больнице, ничего не выучил, а курсач горит. Надеюсь на ваше понимание:)

Морской бой - C++
Пытаюсь написать простейший морской бой на основе классов. В ходе работы программы игроки, стреляя по очереди, либо попадают - &quot;x&quot;, либо...

Морской бой C++ - C++
имеется следующий класс Text,в котором два метода drawText(...) который отвечает за прорисовку текста на экране i renderingText() - за...

Морской бой - C++
народ помогите нарисовать решётку (поле боя ) для морского боя никак не выходит через двухмерный массив

Морской бой - C++
Написал морской бой. Просьба прокоменнтировать, улучшить где возможно и помочь написать ИИ. Вот исходники: #include &lt;iostream&gt; ...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.04.2014, 14:28
Привет! Вот еще темы с ответами:

Морской бой - C++
Здравствуйте.Прошу помочь. Задался целью написать морской бой под консолью. Для начала решил рандомно заполнить поле игрока тремя...

C++ Морской бой - C++
Недавно начал изучать c++ и вот решил написать консольный морской бой, но вот в чём возникли проблемы: 1.Как сделать стрельбу для игрока...

Морской бой С++ - C++
Помогите пожалуйста.Нужно сделать так,чтобы обрисовало выстрелами все(вокруг убитого корабля) #include &lt;iostream&gt; #include...

Морской Бой - C++
как лучше организовать алгоритм хода компа в морском бое?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru