Wahlweise Code abarbeiten

[Lemmy]

Zitat von Gutelo:

lol, das ist ein einfacher if-then-else Zweig, ich will aber viel code entweder mit einer geschachtelten For-Loop oder mit einer repeat-until schleife abarbeiten ohne den langen Code doppelt zu schreiben.

*g* dann schreib den Code in eine Textdatei und lad diese an der entsprechenden Stelle mit einer Include-Anweisung rein.

Delphi-Quellcode:

if choice then
  for i = 0 to Max do
    for j = 0 to Max do
     {$I MeineBerechnung}     
  else
  repeat
   {$I MeineBerechnung}     
  until xxx

Ansonsten gebe ich meinen Vorrednern recht