List index out of bounds (2 стринглиста воюют :D)

[FleXik]

Здравствуйте, нужна помощь... есть два стринглиста, если к примеру в тхт файле первого стринглиста больше строчек чем в тхт файле второго стринглиста, выскакивает ошибка List index out of bounds(4), ранее сталкивался уже с этой ошибкой, но ранее просто грузил равное количество строчек в два стринглиста, как сделать чтобы если в первом стринглисте больше строчек (конечно после того как до этих строчек доходит очередь, т.к ошибка не в самом начале а когда уже очередь доходит) то поток останавливался, или как лучше сделать? Спасибо

2 стринглиста работают на одном integer'е

while i<первыйстринглист.Count-0 do 
код...

пробовал менять знак < на > и так же = , чето не работает...

[Кольша]

for i:=0 to первыйстринглист.Count-0 do 
код...

или

i:=0;
while i<=первыйстринглист.Count-0 do 
код...

[FleXik]

i:=0;
while i<=первыйстринглист.Count-0 do 
код...

спасибо сейчас попробую по поводу "<=" так и думал, но чето не решился проверить.

[Аватар]

  for i:=0 to Min(s1.Count,s2.Count)-1 do

[FleXik]

Аватар, [Error] Unit2.pas(54): Undeclared identifier: 'Min'

[Аватар]

Undeclared identifier: 'Min'

Вот ёлы-палы. А глянуть в хелпе или в исходниках дельфи поискать в каком юните эта функция?

[FleXik]

Сообщение от Аватар

Вот ёлы-палы. А глянуть в хелпе или в исходниках дельфи поискать в каком юните эта функция?

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

[FleXik]

нагуглил что надо было всего лишь Math дописать в uses... Аватар, спасибо большое, все работает!!!

Кольша, не работает.

[Аватар]

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

Ну и ни чего хорошего. В хелпах и в демках 99% необходимой информации. И гораздо быстрей чем на форумах ответа дожидаться

[FleXik]

как сделать этот же код:

for i:=0 to Min(s1.Count,s2.Count)-1 do

только на 3 стринглиста? добавляю новый стринглист, пишет что слишком много параметров указано, спасибо.

можно и так (но будет ли оно работать без ошибок), не то что ниже как и ранее (выдает: List index out of bounds(4)):

for i:=0 to Min(s1.Count,s2.Count)-1 and s3.Count-1 do