How to get float numbers from string list and sum them all?

[5tr1x]

well, sorry for the hazing but: how can i get the numbers with positive and negative values ​​from a text list and sum them all

[lucamar]

Not very robust, since it requires all lines to contain a correctly formatted number, but somethig like this should do the trick:

Code: Pascal  [Select][+][-]

1. function AddEmUp(const AList: TStringList): Double;
2. var
3.   sv: String;
4. begin
5.   Result := 0.0;
6.   for sv in AList do
7.     Result :=  Result + StrToFloat(sv);
8. end;

[5tr1x]

thank you lucamar , I think that this example function that you recommend can serve me well. Greeting

[Remy Lebeau]

how can i get the numbers with positive and negative values ​​from a text list and sum them all

The same question was asked in the Embarcadero Delphi forum yesterday (I assume by you?), and the same answer given here was given there, too - use StrToFloat().

[Thaddy]

how can i get the numbers with positive and negative values ​​from a text list and sum them all

The same question was asked in the Embarcadero Delphi forum yesterday (I assume by you?), and the same answer given here was given there, too - use StrToFloat().

Actually, use TryStrtoFloat when reading from a text file. That is safer. See the manual (Delphi compatible): https://www.freepascal.org/docs-html/rtl/sysutils/trystrtofloat.html
Alternatively, use one of the helpers for simple types:
yourstring.ToSingle
yourstring.ToDouble
yourstring.ToExtended.

Also Delphi compatible after XE3, I believe.

Must include sysutils for all options.

Code: Pascal  [Select][+][-]

1. {$mode delphi}
2. uses sysutils;
3. var a: string = '0.12345678';
4. begin
5.   writeln(a.ToDouble);
6.   // or even
7.   writeln('0.12345678'.ToDouble);
8. end.

[Remy Lebeau]

Actually, use TryStrtoFloat when reading from a text file. That is safer.

That is a matter of opinion.  If you know the file contents are accurate, then there is no difference between TryStrToFloat() vs StrToFloat().

Alternatively, use one of the helpers for simple types

Those don't provide Try versions, nor do they provide support for different locale formats.