Fastreport 3.0 a fonksiyon ekleme

[ademcicek]

herkese merhaba.arkadaşlar fastreport 3.0 kendim bir fonksiyon ilave emek istiyorum.ama bir türlü hangi dosyaya yazacağımı bulamadım fonksiyonu.fastreporta kendi fonksiyonu nu ekleyen varmı.
kolay gelsin.

[rsimsek]

Kendi fonksiyonunu eklemeden kasıt nedir? Pascal Script'i içerisine (Kod) kısmına istediğin şekilde bir fonksiyon/procedure yazabilirsin.. Her kayıt için kullanmıyacaksan ;

Kod: Tümünü seç

procedure TFRM_Rapor15.BTN_PrintClick(Sender: TObject);
var
  X: TfrxComponent;
  Toplam_Bedel: double;
begin
  Toplam_Bedel := GetFooterValues(VIW_Chart_15, 0);

  X := frxRPT_Chart_15.Report.FindObject('frxLBL_Toplam_15');
  if X <> nil then
    TfrxMemoView(X).Memo.Text := FormatFloat('0.00', Toplam_Bedel);

  X := frxRPT_Rapor15.Report.FindObject('frxLBL_Alt_Yazi15');
  if X <> nil then
    TfrxMemoView(X).Memo.Text := 'Toplam Tutar: ' +
      FormatFloat('#,##0.00', Toplam_Bedel);

  frxRPT_Rapor15.ShowReport;

end;

şeklinde delphi içinden istediğin foksiyon/değeri rapor formu içindeki herhangi bir nesneye atayıp kullanabilirsin

[vkamadan]

merhaba ,
zamanında benimde böyle bir ihtiyacım doğmuştu ve saolsun @t-hex iyi bir örnekle olayı özetlemişti
viewtopic.php?t=11943&highlight=fast+report
iyi çalışmalar.