For-schleife und Loop

[huyennguyen]

Hallo
Ich bin neu in Delphi und möchte euch etwas fragen. Ich brauche wirklich eure Hilfe:(

In der Aufgabe, ein Wort wird gegeben. Jedes mal wird Button geklickt, werden die Wortteile eingetragen:
1.mal: "w"
2.mal: "wo"
3.mal: "wor"
4.mal: "wort"
5.mal: "w" - und geht weiter

Ich hab geschrieben:

Delphi-Quellcode:

w:=Edit1.text;
st:='';
for k:= 1 to length(w) do
 begin
  st:=st + w[k];
  Edit2.text:=st;
 end;

das geht leider auch nicht

Kann jemand mir helfen? Danke im Voraus!

[Frank Ranis]

Hallo huyennguyen (hä, was für ein Benutzername) ,

Zitat:

Zitat von huyennguyen (Beitrag 1393134)

Hallo
Ich bin neu in Delphi und möchte euch etwas fragen. Ich brauche wirklich eure Hilfe:(

In der Aufgabe, ein Wort wird gegeben. Jedes mal wird Button geklickt, werden die Wortteile eingetragen:
1.mal: "w"
2.mal: "wo"
3.mal: "wor"
4.mal: "wort"
5.mal: "w" - und geht weiter

Ich hab geschrieben:

Delphi-Quellcode:

w:=Edit1.text;
st:='';
for k:= 1 to length(w) do
 begin
  st:=st + w[k];
  Edit2.text:=st;
 end;

das geht leider auch nicht

Kann jemand mir helfen? Danke im Voraus!

deine Ausgabeschleife ist an sich ist ja funktionstüchtig.
Du mußt aber bedenken , das der Rechner etwas flotter ist , als dein Auge.
Die Schleife wird ja innerhalb von Sekundenbruchteilen durchlaufen.
Also baut man zu Testen erst mal eine kleine Wartestelle ein.

Delphi-Quellcode:

  
 sleep(200); // <- damit die Schleife nicht rasend schnell durchlaufen wird eine kuze Pause machen

Und dann werden die Bildschirmelemente immer erst aktuallisiert , wenn die Application mal Zeit dafür findet.
Man muß dann eine Ausgabe erzwingen.

Delphi-Quellcode:

 
  edit2.Update;    // <- Das Edit 2 sofort ausgeben / updaten

Alles zusammen in der folgenden Routine.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var w,st:string;
    k:integer;
begin
w:=Edit1.text;
st:='';
for k:= 1 to length(w) do
 begin
  st:=st + w[k];
  Edit2.text:=st;
  edit2.Update;    // <- Das Edit 2 sofort ausgeben / updaten
  sleep(200); // <- damit die Schleife nicht rasend schnell durchlaufen wird eine kuze Pause machen
 end;
end;

Gruß

Frank

[DeddyH]

Wenn die Vervollständigung durch den Click auf einen Button schrittweise erfolgen soll, ist die Schleife doch komplett sinnlos.

[Redeemer]

Zitat:

Zitat von DeddyH (Beitrag 1393159)

Wenn die Vervollständigung durch den Click auf einen Button schrittweise erfolgen soll, ist die Schleife doch komplett sinnlos.

Das ist korrekt.

Es wäre aber ganz gut, wenn der TE mehr als "das geht leider auch nicht" (vor allem verwendet er das Wort "auch", obwohl er sein vorheriges/anderes Vorgehen nicht beschreibt) schreiben würde. Wir wissen hier zwar alle, was die Schleife tut, aber Probleme sollten in folgender Art beschrieben werden:
"Ich habe das gemacht: [Quelltext].
Es passierte dieses: [was passiert ist].
Ich will aber jenes: [was ich möchte]."

Lösung wäre, dass der TE einer Variable für die Anzahl der auszugebenden Zeichen einbaut.

[CCRDude]

Zitat:

Zitat von Frank Ranis (Beitrag 1393158)

Hallo huyennguyen (hä, was für ein Benutzername) ,

Huyen ist ein vietnamesischer Vorname, Nguyen ist ein häufiger vietnamesischer Nachname. Sagt ja auch keiner "hä" zu "Frank Ranis", oder?

Zitat:

Zitat von Frank Ranis (Beitrag 1393158)

Delphi-Quellcode:

sleep(200); // <- damit die Schleife nicht rasend schnell durchlaufen wird eine kuze Pause machen

Auch mit dem folgenden Update ist das gepfuscht, weil das Sleep ja dafür sorgt, dass in den 200 ms das UI einfriert.