Als erstes nen frohes neues Jahr. Konnte das folgende Problem leider nicht im alten lösen
Folgendes Problem: Ich gebe der Funktion Insert eine globale Variable (soll nicht überschrieben werden, deswegen wird diese Extra übergeben). Mein Problem liegt bei der procedure Replace. Diese ändert aus einen mir unbekannten Grund sowohl die Variable Term als auch die globale Variable, die bei Term übergeben wurde.
Zur Info ist ein Programm was Terme vereinfachen soll.
Delphi-Quellcode:
function Insert(Term:tFkt;const v:char;const y:Extended):String;
procedure Replace(index:Integer);
var i :Integer;
begin
with Term[index] do begin
if Length(x)>0 then
for i:=0 to Length(x)-1 do
if x[i]=v then
Term[index].x[i]:=FloatToStr(y);
if Length(Terms)>0 then
for i:=0 to Length(Terms)-1 do
Replace(Terms[i]);
end;
end;
begin
Replace(0);
//...
end;
Schon mal danke im Vorraus
