Forum: Object-Pascal / Delphi-Language
Delphi
by Klaus01,
20. Nov 2008
Hallo,
Du musst Da nur die Liste von Anfang bis zum Ende durchlaufen und
prüfen ob ein Feld dem Suchbegriff entspricht.
Soll dann die Zeigeradresse ausgegeben werden?
Grüße
Klaus
Forum: Object-Pascal / Delphi-Language
Delphi
by Klaus01,
17. Nov 2008
zu Deinem Punkt b, ein Feld ist immer dann vorhanden wenn die Liste nicht leer ist.
procedure TForm1.BitBtn3Click(Sender: TObject); // Elemente einschreiben in Liste
begin
new(h1);
h1^.id := StrToInt(Edit1.Text) +1;
h1^.titel := Edit2.Text;
Edit1.Text := IntToStr(h1^.id);
h1^.Next := NIL;
if anf = NIL then
Forum: Object-Pascal / Delphi-Language
Delphi
by Klaus01,
17. Nov 2008
So, jetzt mal Butter bei die Fische.
Der Übernehmen Button, was soll er machen?
a) Ein neues Element in die Liste einfügen?
b) Die Daten in ein bestehendes Listenelement schreiben?
Wie fügst Du neue Elemente in die Liste ein?
Aktuallisiertst Du immer den Pointer aktuell wenn Du dich
Forum: Object-Pascal / Delphi-Language
Delphi
by Klaus01,
17. Nov 2008
Vorausgesetzt der Pointer "aktuell" zeigt auf das aktuelle Listenelement:
//Button Klick
begin
//speichern
aktuell^.id:=StrToint(Edit1.Text);
aktuell^.titel:=Edit2.Text;
//if (wenn...) nächstes glied nicht leer/vorhanden/<> nil dann
if aktuell^.next <> nil then
Forum: Object-Pascal / Delphi-Language
Delphi
by Klaus01,
17. Nov 2008
Hallo,
wenn Du "nur" die Daten eines Feldes ändern willst und
aktuell der Zeiger auf das aktuelle Feld ist:
aktuell^.id:=IntToStr(edit1.Text);
aktuell^.titel :=Edit2.Text;
Die Zeiger auf das vorhergehende Element und das nachfolgende Element