Скачать: CL | DM;

Проблема с TList.   Найти похожие ветки 

← →
mm0 ©   (2003-07-05 00:24) [0]

Какой код нужен для того чтобы, например запись Rec
добавить,заменить в TL:TList?
Rec=record
a,b:Integer;
s:string;
end;

---

← →
default ©   (2003-07-05 01:25) [1]

если TList - это класс, обслуживающий массив указателей, стало быть нужно добавить адрес записи данного типа

---

← →
SilverAlex   (2003-07-05 01:41) [2]

type
PRec=^Trec;
TRec=record
a,b:Integer;
s:string;
end;
procedure AddOrEdit(fA,fB: Integer;fStr: String;
aItem: Integer; aEdit: Boolean=false);
var
aRec:PRec;
begin

new(aRec);
try
if aEdit then
aRec:=List.Items[aItem]; //Или другой способ поиска
with arec^ do
begin
a:=fA;
b:=fB ;
s:=fStr;
end;
if not aEdit then
List.Add(arec)
finally
Dispose(arec);
end;
end

Если я правильно понял.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c