Schleifen in Delphi

[Plague]

Hallo zusammen,

ich muss für eine Delphi Klausur am Mittwoch alle Arten von Schleifen können (sind ja nur 3 oder 4) die Delphi akzeptiert. Kann mir jemand diese mit jeweils einem Beispiel geben?

MfG
Plague

[Sharky]

Hai Plague,

hier also mein Beispiel einer Schleife:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  unsinn : Integer;

LABEL kuckkuck;

begin
  unsinn := 0;
  kuckkuck:
  Inc (unsinn);
  Label1.Caption := IntToStr  (unsinn);
  if (unsinn <10) then goto kuckkuck;
end;

:chat: :chat:

[ixtreme]

dann hätten wir ja deine hausaufgaben gemacht....
so lernt man doch aber nicht oder...Versucht doch mal selber
nen Ansatz zu finden. Im Berufsleben hilft dir auch nicht immer
jemand bei einer aufgabe...


gruß

ixtreme.de

[Plague]

Ich muss aber alle Schleifen können... Ich muss also schriftlich erklären was es für schleifen gibt und für was die gut sind...
Wäre nett wenn ihr mir da noch mal helfen würdet... :-D

[choose]

Zitat:

Zitat von Sharky

Delphi-Quellcode:

if (unsinn <10) then goto kuckkuck;

Ja, so war das wirklich mal, Plague... *Schwelg in Nostalgie...* (vielleicht etwas für die Geschichtsklausur)

[Sharky]

Hai Plague,

ein Vorschlag zur güte:

Schreib DU die Schleifen auf die Du kennst und wie sie funktionieren. Wenn dann EINE Fehlt wird dir sicher geholfen.
Ihr werdet das doch sicher in der Schule durchgenommen haben.

[Tyrael Y.]

Delphi-Quellcode:

for i:= Zahl to andereZahl do
begin
end;

Delphi-Quellcode:

repeat
until irgendwas = true;

Delphi-Quellcode:

while irgendwas = true do
begin
end;

[Tyrael Y.]

macht es doch dem junegn nicht unnötig schwer

die arbeit wird er schliesslich selbst schreiben


und lernen möchte er ja schon freiwillig

wer lernwillig ist soll auch ne hilfe kriegen

gruß

tyrael

[Tyrael Y.]

aufgabe an plague:

schreib hinter die schleifen, die ich aufgeschrieben habe, wozu sie gut
sind und wann du sie benutzen würdest

[Sharky]

Hai Choose,

Zitat:

Zitat von choose

....(vielleicht etwas für die Geschichtsklausur)

eigentlich nicht! Wenn er alle Schleifen können soll gehört diese dazu. Ob sie gut ist oder nicht ist ja ein ganz anderes Thema.


@Tyrale Y.: Helfen wollen wir ja jedem. Aber ohne etwas eigeninitiative lernt er auch nicht so viel.

[Tyrael Y.]

@sharky:

zum lernen braucht man ne grundlage und die scheint hier zu fehlen
und da bin ich mal so frei

nachher denkt er hier wollen ihn alle nur verar....

das wollte ich verhindern

[choose]

Zitat:

Zitat von Sharky

Wenn er alle Schleifen können soll gehört diese dazu.

Nun wird's aber spitz, find ich... Also, meine OH hat unter "Schleife" (Huhu, Smokey) nichts von Labels offenbart, ich würde Jumps aber auch sonst nicht zu den Schleifenkonstrukten einer Hochsprache zählen. Schließlich musst Du dir die Iterationslogik ja noch "basteln"...

Anderfalls könnte man man sonst was (zB eine Endrekursion) als Schleife gelten lassen:

Delphi-Quellcode:

  procedure Loop(const i: Integer);
  begin
    Label1.Caption := IntToStr(i);
    if i<10 then Loop(i+1);
  end;

begin
  Loop(1);
end;

oder wie wär es mit einer Komposition aus Command-Objekten?

EDIT: Rechtschreibung ;)

[Touchdown]

Fehlende Grundlagen haben noch niemals jemanden aufhalten können etwas zu lernen, bei fehlender Eigeninitiative sieht es schon anders aus :hi:

[Tyrael Y.]

im internet nach hilfe suchen ist auch eigeninitiative, oder? ;)

[Crazymodder]

Super thx jung hat mir echt geholfen ilove you hehehe

[merlin17]

Hier ist eine schöne Lektüre zum lernen und nicht cut%paste....:

http://www.delphibasics.co.uk/Article.asp?Name=Looping

:-) thomas