Hallo miteinander.
Ich habe hier ein Problem, bei dem ich leider nicht mehr weiterkomme. In einem Programm habe ich eine Funktion, der ich drei Integer übergeben will. Da es wichtig ist, diese Werte häufig zu verändern, habe ich drei Trackbars benutzt und wollte nun im Onchange diese Funktion ausführen lassen. Zusätzlich habe ich einen Button der diese Funktion auch aufruft und dabei die Positionen der Trackbars übergibt. Das funktioniert wunderbar, nur wenn ich diese Funktion mit den gleichen Argumenten im Onchange aufrufen will, bekomme ich gleich mehrere AVs hintereinander.
Delphi-Quellcode:
procedure TFprob.Button1Click(Sender: TObject);
begin
draw(veg,tbstart.Position,tbstep.Position,tbshift.Position,img); // Das funktioniert
end;
Delphi-Quellcode:
procedure TFprob.tbstepChange(Sender: TObject);
begin
draw(veg,tbstart.Position,tbstep.Position,tbshift.Position,img); // Das leider nicht
lstep.Caption:= inttostr(tbstep.Position);
end;
Hat da jemand eine Ahnung, warum das nicht funktioniert?