Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.17;
Скачать: 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 вся ветка

Текущий архив: 2003.07.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.016 c
3-55455
mikl2002
2003-06-25 07:17
2003.07.17
Не соединяеся с FireBird 1+Linux из winxp


14-55829
Centurion
2003-07-01 15:04
2003.07.17
DevExpress for Delphi 7


1-55598
Alexandr CH_
2003-07-03 11:06
2003.07.17
Dialogs по русски


1-55600
VISA
2003-07-03 15:05
2003.07.17
Проигрывание *.gif на форме


14-55744
vopros
2003-06-30 11:49
2003.07.17
Какую карту видео лучше купитб до 90$