[Delphi] usuniecie tablicy

0

jak usunac tablica[x].cos z rekordu tak aby tablice nastepne przesunely sie na miejsce usunietej??

0

var i:integer;
ostatnie_pole_tablicy:integer;
pom:jakis_rekord;
do_usuniecia:integer;
begin
for i:=Do_usuniecia to Ostatnie_pole_tablicy-1 do
begin
tablica[i+1]:=pom;
tablica[i]:=pom;
end;
end;
o to chodzi ????

0

tablica[i+1]:=pom;
tablica[i]:=pom;
...
o to chodzi ????

Na pewno nie :) Delphi powie Ci mniej więcej coś takiego:
Variable pom might be not initialized :)

A jeżeli chodzi o pytanie to jak można mieć tablice w rekordzie i potem przesuwać tablice?
Chyba chodzi o tablicę rekordów i przesuwanie poszczególnych rekordów w tablicy?

0

Ale to powinno dzialac:

var i:integer;
ostatnie_pole_tablicy:integer;
pom:jakis_rekord;
do_usuniecia:integer;
begin
for i:=Do_usuniecia to Ostatnie_pole_tablicy do
begin
pom:= tablica[i+1];
tablica[i]:=pom;
end;
end;

o to chodzi ????

No i ja tez tak mysle ze chodzi tu o przesuwanie rekordow wiec dlatego tak napisalem

0

A nie można by od razu dać:
tablica[i]:=tablica[i+1];

przecież to jest czytelniejsze.

0

Można także wykorzystać typ TList, wszystko ładnie opisane w helpie :)

1 użytkowników online, w tym zalogowanych: 0, gości: 1