Wie viel Programmiert ihr denn so ?

[Neutral General]

Zitat von Alfi001:

Ausserdem: wenn ich nach Zeilenanzahl bezahlt würde dann würde sich mein Programmierstil extrem ändern!

"Schleifen? - Brauch ich nicht! - Wenn ich etwas 1000 mal ausführen will dann wird das ausprogrammiert."

Und wenn du zur Designzeit noch nicht weißt wie viele Schleifendurchläufe nötig sind?^^
Man könnte sowas machen:

Delphi-Quellcode:

Value := Spinedit1.Value;

if Value = 1 then
begin
  ShowMessage('Test');
end
else
if Value = 2 then
begin
  ShowMessage('Test');
  ShowMessage('Test');
end
else
if Value = 3 then
begin
  ShowMessage('Test');
  ShowMessage('Test');
  ShowMessage('Test');
end
else
// ...
end
else
if Value = High(Integer) then
begin
  ShowMessage('Test');
  ShowMessage('Test');
  ShowMessage('Test');
  ShowMessage('Test');
  // ...
  ShowMessage('Test');
end;