🚀 go-pugleaf

Dnia Thu, 19 Jan 2012 18:48:29 +0100, Wojciech "Spook" Sura napisał(a):

>> var
>>  SL : TStringList;
>> begin
>>  SL := GetStringListWithContent;
>>  result := 'Zawartosc listy: [' +
>>     (function (Str : TStrings) : string
>>      var
>>       s : string;
>>      begin
>>       for s in Str do s := s + CRLF;
>>       result := s;
>>      end;
>>     )(SL) + ']';
>>  SL.Free;
>> end;
> 
> {
>      std::vector<std::string > & SL = GetStringListWithContent();
> 
>      auto result = [&SL]() -> std::string
>      {
>          std::string tmp;
>          for (int i = 0; i < SL.size(); i++)
>              tmp += (SL[i] + "\n");
>          return tmp;
>      }();
> }


Ale jaka brzydka petla for :-P :-P

No dobra, ruki wierch, poddaje sie, nie znam C++ i troche pojechalem po
bandzie, ale chcialem pokazac co mozna zrobic w Delphi i to mnie czesciowo
tlumaczy :-)

ps. to jest tez funkcja anonimowa?


-- 
pozdro
R.e.m.e.K