blob: 5b0e4eba0fff15cc1f9cdfd18695c5bb8d7ad06e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
uses gvector;
type TVectorlli = specialize TVector<longint>;
var Buffer:TVectorlli; i:longint;
begin
Buffer := TVectorlli.Create;
{Push 5 elements at the end of array}
for i:=1 to 5 do
Buffer.PushBack(i);
{change 3rd element to 47}
Buffer[2] := 47;
{pop last element}
Buffer.PopBack;
{print all elements}
for i:=0 to Buffer.Size-1 do
writeln(Buffer[i]);
Buffer.Destroy;
end.
|
