Цитата:
|
Сообщение от Pcrepair
есть такой вариант
Код:
for i := 0 to 2 do
T2.Add(T1[i])
и все хорошо но такой косячок обнаружился:
если написать по простому: for i := 0 to 2 do компиляция в норме, но если число строк в Т1 менее 3-х выскакивает исключение List index out of bonds() с указание строки в скобках, которой нехватает до 3-х |
Ну а если как следует подумать???
Код:
for i := 0 to min(2,T2.Count-1) do
...