hi
habe eine frage: wieso gibt der folgende quellcode bei anfrage immer True zurueck, es sei denn der baum ist Leer?
ist wahrscheinlich sehr simple aber ich komme nicht drauf.
Delphi-Quellcode:
function TAVLBaum.KntnFinden(pItem: TItem): Boolean;
begin
if Leer then
Result := False
else begin
if Wurzel.isEqual(pItem) then
Result := True
else begin
if Wurzel.isLower(pItem) then
rechts.KntnFinden(pItem)
else
links.KntnFinden(pItem);
end;
end;
end;
function TAVLBaum.Leer():Boolean;
begin
Result := (Wurzel = nil);
end;
die wurzel beinhalted TDaten ... ich denke das die funktionen alle passen. trotzdem nochmal das ganze programm.
(teilweise sind noch sachen ausgeschaltet und generell nicht ganz korekt)