| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

как правильно обратиться к полю? [D6, XP]

Страницы:   < 1 2 >

brother_home ©   (2011-08-29 09:55:00) 

Приветствую!
есть:
 TPlayer = record
   No: byte;
   Name: string;
   ...
 end;

TM = class(TObject)
 private
   FActivePlayer: byte;
   ...
   function GetActivePlayer: TPlayer;
  ...
 public
   ...
   Player: array [1..MaxPlayers] of TPlayer;
   ...
   property ActivePlayer: TPlayer read GetActivePlayer write ???
   ...
 end;

function TM.GetActivePlayer: TPlayer;
begin
 if FActivePlayer in [1..6] then
   result:= Player[FActivePlayer]
 else
   result:= PlayerNull;
end;

данная конструкция позволяет только читать поля активного игрока,
а как реализовать запись, например:
ActivePlayer.Name = 'Игрок1';
пока пишу так:
if FActivePlayer in [1..6] then Player[FActivePlayer].Name = 'Игрок1';

---

Медвежонок Пятачок   (2011-08-29 10:32:00) [21]

гетактивплеер.нэйм = '';

---

brother_home   (2011-08-29 10:15:00) [22]

может ссылку?

---

Страницы:   < 1 2 >

Наверх