On Thursday 21 November 2013 07:56:12 Ivanko B wrote: > Unneeded extra variables incl stack ones & stuff lines, smth like : > ------------------------ > procedure strfunc(): msestring; > begin > result:= 'The string result:' > if 1 <> 2 then > result:= result + 'mumu'; > else > result:= result + 'koko'; > end; > end; > I do not like the not clear definition of 'result', is it a 'var' or 'out' variable? What happens here:
" procedure strfunc(): msestring; begin if 1 <> 2 then result:= result + 'mumu'; else result:= result + 'koko'; end; end; "? I think it is worth the additional two lines for the variable declaration. I do not like much the terminating 'return' statement, but " sub strfunc(): msestring; var result: msestring; begin result:= 'The string result:' if 1 <> 2 then result:= result + 'mumu'; else result:= result + 'koko'; end; end:= result; " probably is too exotic. ;-) Martin Martin ------------------------------------------------------------------------------ Shape the Mobile Experience: Free Subscription Software experts and developers: Be at the forefront of tech innovation. Intel(R) Software Adrenaline delivers strategic insight and game-changing conversations that shape the rapidly evolving mobile landscape. Sign up now. http://pubads.g.doubleclick.net/gampad/clk?id=63431311&iu=/4140/ostg.clktrk _______________________________________________ mseide-msegui-talk mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
