string[]-Problem

[konda]

Hallo,
ich will einen String ungefähr so zusammen bauen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var wort: string[5];
begin
  wort[1]:= 'h';
  wort[2]:= 'a';
  wort[3]:= 'l';
  wort[4]:= 'l';
  wort[5]:= 'o';
  label1.Caption:= wort;
end;

Wenn ich nun aber das Programm teste, zeigt das Label nichts an. Was mache ich falsch?

[3_of_8]

Probiers mal so:

Delphi-Quellcode:

var wort: string[5];
begin
  wort[1]:= 'h';
  wort[2]:= 'a';
  wort[3]:= 'l';
  wort[4]:= 'l';
  wort[5]:= 'o';
  label1.SetTextBuf(nil);
  label1.SetTextBuf(@wort[1]);
end;

[Grishnak]

[edit]gelöscht, weil Unsinn![/edit]

[kingflo]

wie er zeigt bei dir nichts an?

Wenn ich die procedure so benutze ist label1.caption hallol÷

[Matze]

Wenn du string[6] nimmst, dann geht's. Aber frag mich bitte nicht wieso, vielleicht muss ans Ende, wie beim Char etwas angehängt werden.

[Die Muhkuh]

Zitat von Grishnak:

SetLength(wort, 5); Sonst hat der String immer noch die Länge 0 und deine Zuweisungen schreiben irgendwo in den Speicher!

IMHO hat er mit string[5] schon eine fixe Länge und braucht kein SetLength.

[edit] Was für ein Sinn hat das eigentlich? [/edit]

[Grishnak]

in wort[0] muss die momentan genutze Länge stehen (als "char")=> "wort[0]:=#5;"

[konda]

Zitat von Matze:

Wenn du string[6] nimmst, dann geht's. Aber frag mich bitte nicht wieso, vielleicht muss ans Ende, wie beim Char etwas angehängt werden.

Das funktioniert! Danke.

 in wort[0] muss die momentan genutze Länge stehen (als "char")=> "wort[0]:=#5;" [edit]So funktionierts ebenfalls![/edit]

[3_of_8]

Mit meiner Methode (siehe oben) gehts auch.

[konda]

Zitat von 3_of_8:

Mit meiner Methode (siehe oben) gehts auch.

Bei mir kommt dann aber raus: 'hallo|'