FastReport Degiskene nasıl parametre gönderilir

[adelphiforumz]

S.A.

Fast Report üzerinde bulunan PascalScript(Code) kısmında var altında tanımlanan degiskenlere
delphi içerisinden nasıl parametre gönderebilrim.

Aşağıdaki şekilde denedim fakat olmuyor
yardımcı olabileceklere teşekkürler

frxReport1.Variables.Variables['xxx'] := 20
frxReport1.FindObject('xxx') := 20;

[m_ekici]

FR ver 4 için 1. yaptığın doğru fakat 20 yi tektırrnak içine alman lazım.

Report.Variables.Variables['SAYI'] := QuotedStr(IntToSr(20))

Fast Repor ver 2 için versiyon

Report.Dictionary.Variables['MUS'] :=#39+MUS.Text+#39;

(Fast Reportun Variables bölümündeki değişkenler içindir. )

[csunguray]

İki trlü değişken vardır Rapor değişkenleri ve Script değişkenleri.

Kod: Tümünü seç

Report.Variables.Variables['SAYI'] := QuotedStr(IntToSr(20))

Bu şekilde sadece "Rapor > Değişkenler" menüsünden girdiğimiz bölümdeki önceden tanımlamış olduğumuz rapor değişkenlerine ulaşabiliriz.

Script içerisindeki var kısmında tanımlı değişkenlere ulaşmak için

Kod: Tümünü seç

Report.Script.Variables['DegiskenAdi'] := 'test';

kullanmalısınız. Bu durumda FastReport aynı isimde bir değişken yoksa değişkeni oluşturacak ve değeri bu değişkene atayacaktır. String değerler için ekstradan tırnak kullanmanıza gerek yoktur.

Ayrıca raporun

Kod: Tümünü seç

procedure TForm1.frxReport1GetValue(const VarName: String; var Value: Variant);
begin
  if CompareText(VarName, 'DegiskenAdi') = 0 then Value := 'test'
end;

olayını kullanarak önceden bir tanım yapmaksızın bazı değerleri FastReport içerisine göndermek mümkün.

[adelphiforumz]

S.A.
csunguray belirtmiş olduğun aşağıdaki ifade, var olmayan değişkeni oluşturup kullanıyor, ben daha önceden oluşturulmuş olan bir değişkene değer atamak istiyorum
bu değer global var olarak tanımlanmış bir değişken
yardımcı olabilirmisiniz

Script içerisindeki var kısmında tanımlı değişkenlere ulaşmak için
Kod: Tümünü seçReport.Script.Variables['DegiskenAdi'] := 'test';
kullanmalısınız. Bu durumda FastReport aynı isimde bir değişken yoksa değişkeni oluşturacak ve değeri bu değişkene atayacaktır. String değerler için ekstradan tırnak kullanmanıza gerek yoktur.

[csunguray]

Değişken önceden varsa zaten sorun yok. Atama işlemi çalışacaktır. Değişkeni bulamadığı takdirde önce oluşturacaktır sonra atama işlemini gerçekleştircektir..

[adelphiforumz]

S.A.
"Identifier redeclared: xfield"
Eger değişkenleri daha önceden rapor içinde tanımlarsam yukarıdaki şekilde hata alıyorum

ben rapor içindeki tanımlamamalarımı
aşağıdaki gibi yapıyorum
Const
...

Var
xField : Integer = 0;
yField : String = 'xxxx';

Begin
....
end.

proc...
begin
end;

func...
begin
end;

[adelphiforumz]

S.A.

Eğer raporun değişkenlerine değer atamadan önce
frxReport1.PrepareReport;
dersem herşey düzgün çalışıyor
bu ifadenin anlamı nedir bilen varmı acaba