Thema: Delphi Listboxen

Einzelnen Beitrag anzeigen

oldmax

Registriert seit: 27. Apr 2006
Ort: Gieboldehausen
167 Beiträge
 
#4

Re: Listboxen

  Alt 4. Nov 2008, 05:40
Hi
Nun ja, ein paar Grundlagen wären da wohl nicht schlecht...
Ich fahr ja auch nicht nach China und erwarte, das die mich verstehen, wenn ich irgendwas vor mir her quatsche.
Sorry, aber hier fehlt es wohl an allem und man kann erst mal einen Lehrgang abhalten. Habt ihr keinen Lehrer, den ihr erst mal fragen könnt ?
Das mußte ich erst mal loswerden. Zuerst: Programmcode sollte ein wenig formatiert werden. Das ist glaub ich der 1937te Hinweis auf Einrücken. Nun zu den Fehlern:
Zitat:
meine idee...km:array[1..8]of integer; <------- Fehlermeldung!!!


deswegen habe ich einfach

procedure TForm1.Button1Click(Sender: TObject);
begin
for n:=1 to 8 do
begin
Listbox1.items.add(edit1.text);
end;
end;
Eine Variable darf nicht Meine Idee..km heißen. Punkte und Leerzeichen sind nicht erlaubt. Wenn du da eine sichtbare Trennung möchtest, nimm einen Unterstrich
z. B. Meine_Idee_km

In einem Buttonclick-Ereignis wird selbstverständlich die Schleife immer neu 8 mal durchlaufen und wenn du die Listbox nicht leerst, wird natürlich immer wieder was dazugefügt.
Daher wär's richtig:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
Var n : Integer; // Laufvariable lokal deklarieren !
begin
  Listbox1.Items.Clear; // Listbox leeren !
  for n:=1 to 8 do // einrücken !
  begin
    Listbox1.items.add(edit1.text);
  end; // end For
end; // end Procedure
und dann wär da noch
Zitat:
for n:=1 to 8 do
begin;
Listbox1.items.add(namen[n]);
end;
end;
Hinter einem begin darf kein Semikolon stehen.
Vielleicht hilft es dir ein wenig. Programmieren ist kein Hexenwerk, abeer man sollte sich tunlichst hüten, so einfach drauflos zu schludern...
Gruß oldmax
Noch ist mein Rechner mir zu Diensten.... ansonsten habe ich die Macht ihn zu vernichten !
  Mit Zitat antworten Zitat