StringList

Delphi

26/09/2003

Em um stringlist eu atribuo 5 linhas com 10 posiçoes cada.
USo o seguinte mas ele só traz os valores da primeira linha, com faço para pegar os valores das outras linhas

for X := 0 to Tempo.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 }


Havilux

Havilux

Curtidas 0

Respostas

Biscalquini

Biscalquini

26/09/2003

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


GOSTEI 0
Marcelo Saviski

Marcelo Saviski

26/09/2003

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]]


GOSTEI 0
POSTAR