Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Динамический массив и БД [D5, dBase, FoxPro]


Black Shark ©   (2003-07-10 12:38:00) 

Поможете люди добрые.
Подскажите как перемещенные некоторые данные из БД в динамический массив, и после обработки, удалить старые данные из БД и записать новые. И вот еще, массив в ходе выполнения программы может менять свой размер?
Заранее благодарен.


Johnmen   (2003-07-10 12:52:00) [1]

Это обширная тема...
Зачем вообще использовать дин.массив в данном случае ?


Mike1 Kouzmine1   (2003-07-10 12:51:00) [2]

type
t = record
ID : Integer;
D : String;
end;

At = Array of t

var
A : At;
I : Integer;
t.First;
SetLength(A,t.RecordCount);
I := 0;
while not t.eof do
begin
A[I].ID := t["ID"].Value;
A[I].D := t["D"].Value;
Inc(I);
t.Next;
end;

for I := 0 to High(A) - 1 do
begin
if t.FindKey([A[I].ID]) then
begin
t.Edit;
t["D"].Value := A[I].D;
t.Post;
end;
end;
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо