Guten Tag,
wie kann eine Variable die unter Variablen angelegt wurde, im Script verwendet werden?
Beispiel:
Ich habe eine Variable "anfangssaldo" angelegt. Der Wert für diese Variable wird im
"OnGetValue" des Reports übergeben.
Code:
var
sumSoll: Extended;
sumHaben: Extended;
sumSaldoGuV: Extended;
procedure bukontoOnBeforePrint(Sender: TfrxComponent);
begin
bukonto.Text := IntToStr(<frxBuchungen."SOLKONTONR">) + ' - ' + <frxBuchungen."SOLKONTONAME">;
end;
procedure bubetragOnBeforePrint(Sender: TfrxComponent);
var
pBetrag: Currency;
begin
pBetrag := <frxBuchungen."SOLLBETRAG">;
if pBetrag < 0 then
begin
bubetrag.Font.Color := clRed;
bubetrag.Text := Format('%2.2m', [pBetrag]);
sumHaben := sumHaben + pBetrag;
end;
if pBetrag > 0 then
begin
bubetrag.Font.Color := clBlack;
bubetrag.Text := Format('%2.2m', [pBetrag]);
sumSoll := sumSoll + pBetrag;
end;
Einnahmen.Text := Format('%2.2m', [sumSoll]);
Ausgaben.Text := Format('%2.2m', [sumHaben]);
sumSaldoGuV := sumSoll + sumHaben + Get(<anfangssaldo>); // <<<<Hier ist die Variable
SaldoGUV.Text := Format('%2.2m', [sumSaldoGuV]);
end;
begin
sumSoll := 0;
sumHaben := 0;
sumSaldoGuV := 0;
end.
Hat jemand wissen wie den Wert dieser Variablen zugegriffen werden kann?.
Vielen Dank für Eure Hilfe.