Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.07.17;
Скачать: [xml.tar.bz2];

Вниз

Проблема с 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.008 c
1-55594
Брат
2003-07-03 12:13
2003.07.17
Как вызвать ошибку EOverFlow?


3-55457
Weare
2003-06-12 12:06
2003.07.17
Печать из базы штрих-кода


14-55740
Ajax
2003-07-01 09:22
2003.07.17
НТВ+


14-55821
Andryk
2003-06-30 18:32
2003.07.17
Скоро премьера. Будет ли Т-3 лучше чем Т-1 и Т-2.


3-55412
Evgenij Kardash
2003-06-22 19:18
2003.07.17
Запрос по двум таблицам





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский