ListBox Namen hoch-und runterscrollen

[Perlsau]

Zitat von EWeiss:

Zitat:

Ich mag es nicht, angelogen zu werden. Unter diesen Umständen bin ich nicht bereit, dir weiterhin behilflich zu sein. Vielleicht mag dir ja ein anderer helfen ...

Immer diese überreaktionen.. Dann lass es doch einfach es zwingt dich niemand dazu.
gruss

Selbstverständlich habe ich freiwillig zu helfen versucht und nicht gezwungenermaßen. Ich habe die Unit, die Delphinee gepostet hat, exakt kopiert, habe vier Buttons, eine Listbox und ein Editfeld auf der Form. Die Ereignisbehandlung von Button2, die angeblich funktioniert, habe ich eben aus "meinem" Code kopiert:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var counter: integer;
    speicher: string ;
    i: integer;
 begin
  Speicher:= Listbox1.Items[0];


 For i:= 0 to 8 do
 ListBox1.Items[i]:=ListBox1.Items[i+1];
 ListBox1.Items[9]:=speicher;
end;

Da wird ein Item mit dem Index 8 angesprochen, das zu diesem Zeitpunkt noch gar nicht existiert, wenn ich nicht vorher mindestens 9 Einträge in die Listbox eingegeben habe. Das kann nicht funktionieren! Wenn jemand was anderes behauptet, dann lügt er (oder sie). Und das mag ich nicht. Und ich nehme mir die Freiheit, das auch zu sagen, dieses Recht steht mir zu! Das ist noch lange keine Überreaktion! Und nun bin ich raus aus diesem Thread!

[EWeiss]

Zitat:

Und ich nehme mir die Freiheit, das auch zu sagen, dieses Recht steht mir zu! Das ist noch lange keine Überreaktion! Und nun bin ich raus aus diesem Thread!

OT!

Das steht dir natürlich frei habe auch kein problem damit.
War auch nur eine spontane bemerkung von mir die jedem frei steht zu interpretieren wie er will.

Ich für meinen Teil bin da etwas ruhiger geworden und nehme solche dinge nicht so tierisch ernst.
Nichts für ungut.

gruss

[stahli]

@Perlsau

Ich hatte auch einen längeren Beitrag fertig, aber Du warst schneller.
Da wir ähnliche Antworten hatten, habe ich mein Geschreibsel dann verworfen.

Ich hatte jedoch die Vermutung, dass der TE die Listbox schon im Designer gefüllt hatte. Dann hätte man schon mal andere Bedingungen als mit einer leeren Listbox.

Aber egal, wenn die Zielstellung jetzt erfüllt ist, dann passt das doch für´s erste.

Ist ja nicht einfach am Anfang (und später auch nicht )...

[p80286]

Kommen wir mal zum eigentlichen Thema zurück.
"Aufwärts" funktioniert. Für "Abwärts" fehlt Dir jede Idee?
Wo ist der Unterschied?

[OT]
Auch wenn aller Anfang schwer ist, diese Stolperstellen sollten, wenn man sie sieht benannt werden, nichts ist frustrierender als nach den ersten Erfolgserlebnissen vollkommen unvermutet vor die Wand zu laufen.
[/OT]

gruß
K-H

[mkinzler]

Zitat von Perlsau:

Zitat von EWeiss:

Zitat:

Ich mag es nicht, angelogen zu werden. Unter diesen Umständen bin ich nicht bereit, dir weiterhin behilflich zu sein. Vielleicht mag dir ja ein anderer helfen ...

Immer diese überreaktionen.. Dann lass es doch einfach es zwingt dich niemand dazu.
gruss

Selbstverständlich habe ich freiwillig zu helfen versucht und nicht gezwungenermaßen. Ich habe die Unit, die Delphinee gepostet hat, exakt kopiert, habe vier Buttons, eine Listbox und ein Editfeld auf der Form. Die Ereignisbehandlung von Button2, die angeblich funktioniert, habe ich eben aus "meinem" Code kopiert:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var counter: integer;
    speicher: string ;
    i: integer;
 begin
  Speicher:= Listbox1.Items[0];


 For i:= 0 to 8 do
 ListBox1.Items[i]:=ListBox1.Items[i+1];
 ListBox1.Items[9]:=speicher;
end;

Da wird ein Item mit dem Index 8 angesprochen, das zu diesem Zeitpunkt noch gar nicht existiert, wenn ich nicht vorher mindestens 9 Einträge in die Listbox eingegeben habe. Das kann nicht funktionieren! Wenn jemand was anderes behauptet, dann lügt er (oder sie). Und das mag ich nicht. Und ich nehme mir die Freiheit, das auch zu sagen, dieses Recht steht mir zu! Das ist noch lange keine Überreaktion! Und nun bin ich raus aus diesem Thread!

Ich glaube nicht, dass er dich absichtlich angelogen hat! Es liegtgt eher an seiner mangelnden Erfahrung. Man sollte das m.E. einem Anfänger nachsehen.