ResetValue toggles values

This commit is contained in:
zueuk
2006-09-06 12:33:00 +00:00
parent c768ad8195
commit 8289fc9b91
2 changed files with 5 additions and 2 deletions
+2 -1
View File
@@ -355,7 +355,8 @@ function TVariationJulian.ResetVariable(const Name: string): boolean;
begin
Result := False;
if Name = var_n_name then begin
N := 2;
if N = 2 then N := -2
else N := 2;
Result := True;
end
else if Name = var_c_name then begin
+3 -1
View File
@@ -391,6 +391,7 @@ begin
end
else if Name = var_c_name then begin
c := value;
Result := True;
end;
end;
@@ -398,7 +399,8 @@ function TVariationJuliaScope.ResetVariable(const Name: string): boolean;
begin
Result := False;
if Name = var_n_name then begin
N := 2;
if N = 2 then N := -2
else N := 2;
Result := True;
end
else if Name = var_c_name then begin