|
Registriert seit: 23. Jun 2003
416 Beiträge
Delphi 2006 Professional
|
Re: Name aus Liste löschen
14. Nov 2005, 22:07
Ich hab' deine if's mal ein bisschen entwirrt 
Delphi-Quellcode:
// ...
while (lauf^.nachher <> nil) and (such <> lauf^.name) do
lauf := lauf^.nachher;
if (lauf^.name = such) then
begin
if (lauf = oben) then
oben := lauf^.nachher
else
lauf^.vorher^.nachher := lauf^.nachher;
if (lauf^.nachher <> nil) then
lauf^.nachher^.vorher := lauf^.vorher;
Dispose(lauf);
ausgabe;
end
else
ShowMessage('Springer nicht in der Liste!');
[edit] Free in Dispose geändert. [/edit]
"Electricity is actually made up of extremely tiny particles called electrons, that you cannot see with the naked eye unless you have been drinking." (Dave Barry)
|