Fórum StringList #184498

for X := 0 to Tempo.Lines.Count -1 do
begin
Tempo.Strings[X];
CodAtl := StrToInt( Tempo.Text[1]+Tempo.Text[2]+Tempo.Text[3]+Tempo.Text[4]+Tempo.Text[5] );
ShowMessage( IntToStr( CodAtl ) );
end;{ for }

é só incluir o Lines antes do count, creio que vai funcionar

for X := 0 to Tempo.Count -1 do [color=blue:83505085eb]/Correto[/color:83505085eb]
begin [color=blue:83505085eb]/Correto também [/color:83505085eb]:D
Tempo.Strings[X]; [color=blue:83505085eb]/Isso não faz nada
só teria utilidade se vc estivese fazendo> VarString := Tempo.Strings[X];
[/color:83505085eb]CodAtl := StrToInt( Tempo.Lines[X][1]+Tempo.Lines[X][2]+Tempo.Lines[X][3]+Tempo.Lines[X][4]+Tempo.Lines[X][5] );
ShowMessage( IntToStr( CodAtl ) );
end;{ for }

Note: Tempo.Lines[[color=blue:83505085eb]nº da linha[/color:83505085eb]][[color=blue:83505085eb]nº do caracter[/color:83505085eb]]