Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Werkzeuge (https://www.delphipraxis.net/63-sonstige-werkzeuge/)
-   -   Variable in Fastreport im Code ansperechen (https://www.delphipraxis.net/198958-variable-fastreport-im-code-ansperechen.html)

NoName1 14. Dez 2018 11:04

Variable in Fastreport im Code ansperechen
 
Guten Tag,
mit Fastreport komme ich soweit ganz gut klar.
Ich habe eine Variable "jahr" im Menü "Report ==> Variablen definiert"
Nun möchte ich per Code auf den übergeben Wert dieser Variablen zurückgreifen,
ich weiss aber nicht wie und mit welchem Befehl dies geschehen soll.
Versucht habe ich dieses:

Delphi-Quellcode:
procedure CheckBox1OnBeforePrint(Sender: TfrxComponent);
var
 pGebJahr: Word;
 pGebMonat: Word;
 pGebTag: Word;
 pGebDatum: TDateTime;
 pAlter: Integer;                                  
begin
   DecodeDate(<frxDBGeburtstagsListe."GEBORENAM">, pGebJahr, pGebMonat, pGebTag);
   pAlter := [B]Variablen['jahr'][/B] //<< Fehler undefinierter Fehler: Variablen                                                                                  

  if pAlter mod 5 = 0 then                                                        
  CheckBox1.Checked := True
  else
  CheckBox1.Checked := False;
end;
PascalScript/Fastreport kennt "Variablen" nicht. OK. Aber mit welchem Befehl kann man darauf zurückgreifen?
Es ist überhaupt möglich im Code auf eine Variable zurück zugreifen und wenn ja wie?
Vielen Dank für Eure Hilfe

Gollum 14. Dez 2018 11:59

AW: Variable in Fastreport im Code ansperechen
 
Hallo,

so müsste es funktionieren:
Delphi-Quellcode:
...
begin
  ...
  pAlter:=StrToInt('[jahr]');
  ...
end;

madas 14. Dez 2018 12:34

AW: Variable in Fastreport im Code ansperechen
 
Zitat:

Zitat von NoName1 (Beitrag 1420857)
Guten Tag,
mit Fastreport komme ich soweit ganz gut klar.
Ich habe eine Variable "jahr" im Menü "Report ==> Variablen definiert"
Nun möchte ich per Code auf den übergeben Wert dieser Variablen zurückgreifen,
ich weiss aber nicht wie und mit welchem Befehl dies geschehen soll.
Versucht habe ich dieses:

Delphi-Quellcode:
procedure CheckBox1OnBeforePrint(Sender: TfrxComponent);
var
 pGebJahr: Word;
 pGebMonat: Word;
 pGebTag: Word;
 pGebDatum: TDateTime;
 pAlter: Integer;                                  
begin
   DecodeDate(<frxDBGeburtstagsListe."GEBORENAM">, pGebJahr, pGebMonat, pGebTag);
   pAlter := [B]Variablen['jahr'][/B] //<< Fehler undefinierter Fehler: Variablen                                                                                  

  if pAlter mod 5 = 0 then                                                        
  CheckBox1.Checked := True
  else
  CheckBox1.Checked := False;
end;
PascalScript/Fastreport kennt "Variablen" nicht. OK. Aber mit welchem Befehl kann man darauf zurückgreifen?
Es ist überhaupt möglich im Code auf eine Variable zurück zugreifen und wenn ja wie?
Vielen Dank für Eure Hilfe

Code:
pAlter := <jahr>;

NoName1 14. Dez 2018 15:12

AW: Variable in Fastreport im Code ansperechen
 
[QUOTE=madas;1420867]
Zitat:

Zitat von NoName1 (Beitrag 1420857)

Code:
pAlter := <jahr>;

Danke Euch Beiden,
dies <jahr> funktioniert.
Vielen Dank nochmals.


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:24 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz