Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.06.06;
Скачать: CL | DM;

Вниз

Помогите пожалуйста найти правильное решение   Найти похожие ветки 

 
Smok_er   (2002-05-24 11:56) [0]

Уважаемые мастера! Подскажите пожалуйста, каким способом можно организовать таблицу вида Name Value1 Value2 Value3 etc. в памяти и по возможности с быстрым доступом к этим полям, например по имени.
Пробовал создавать такое количество стринг листов, сколько этих самых полей, но не сильно удобно, начинается путаница и т.д.


 
onix ©   (2002-05-24 12:18) [1]

Попробуй в одном TStringlist"е сохранять объекты в которых будут твои поля. К примеру:
type

TMyObject = class
field1 : string;
field2 : integer;
.
.
end;

Затем где-то в программе:

procedure Sample;
var MyObj : TMyObject;
begin
MyObj := TMyObject.Create;
MyStrinfList.Items.AddObject("String1", MyObj);
.....
.....
end;


 
Shaman_Naydak ©   (2002-05-24 13:23) [2]

var
Arr: array of record
Name: string;
Value1: Integer;
Value2: string;
etc
end;
+ через TList, реализовать одно/двунаправленный списое
Вариантов можно организовать до чертиков...


 
Smok_er   (2002-05-25 22:46) [3]

А можно поподробнее про эти 2 варианта?
Дело в том, что я в классах полный профан (к сожалению) и никак не могу получить значение в первом случае.

И интересно, как обращаться к элементам списка во втором случае?

Помогите пожалуйста...


 
KilkennyCat ©   (2002-05-25 23:38) [4]

я бы второй пример написал бы по-понятнее:

Type TArr = record
Name: string;
Value1: Integer;
Value2: string;
etc
end;

var
Arr : array of TArr

Доступ:

SetLength(Arr, 2);
Arr[2].Value1 := ...



 
Smok_er   (2002-05-26 00:10) [5]

Вся проблема в том, что количество возможных записей неизвестно :(. Можно использовать этот метод при неизвестном количестве записей?


 
KilkennyCat ©   (2002-05-26 09:19) [6]

Да, можно. SetLength устанавливает необходимое число записей, то есть это - работа с динамическим массивом, размеры которого могут быть ограничены только типом переменной размера и ресурсами.



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

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

Наверх




Память: 0.48 MB
Время: 0.012 c
1-18014
SRGWizard
2002-05-24 11:34
2002.06.06
Не могу выполнить CreateOleObject в процедуре (class(TService))


1-17980
Johnny Smith
2002-05-23 18:32
2002.06.06
Карта наследования (ссылка)


1-18019
Qwer
2002-05-24 01:45
2002.06.06
Порядковый номер дня в году


4-18177
Керик
2002-03-31 07:48
2002.06.06
Перехват сообщения приложению


3-17819
lexx@demon
2002-05-15 19:45
2002.06.06
Мастера... помогите..... как поместить картинку в базу данных