Как работать с двусвязными списками в delphi?

Question

[Максим Ромашко]

В паскале все норм изучил.

type  celltype = record 
		info: reki; 
		next, previous: ^ celltype 
	end; 
	list = ^ celltype; 
	position = ^ celltype;

Как данный код перевести в делфак?
Курсач начался, хочу претендовать на 9-10, так что пожалуйста, люди добрые, помогите
Или подкиньте чтива, что бы хотя бы не быть "лохом" в данном вопросе..

Answer 1

[Mercury13]

В Delphi языком записей — в точности так же.
Языком классов…

type  
  TCell = class
   public
    info: TReki; 
    next, previous: TCell;
  end; 
  TList = TCell;
  TPosition = TCell;

Да, об именовании типов. В Си мы пишем Cell cell, а в Паскале cell : Cell нельзя, он регистронезависимый. Общепринято, что тип начинается на T, указатель — на P. Иногда добавляют другие префиксы (event — Ev, dynamic array —Da), но типы без префикса — плохой тон.

Comments

[Максим Ромашко]

Можно пожалуйста без классов?

[Mercury13]

В принципе, будет работать и имеющийся код. Только именование типов крайне дрянное.
То есть, лучше celltype → TCell, list → TList, и т.д.

[Mercury13]

type  
  PCell = ^TCell;
  TCell = record 
    info: TReki; 
    next, previous: PCell;
  end; 
  list = PCell; 
  position = PCell;