fastReport 3 Script

[kadirkurtoglu]

S.A. arkdaşlar fastreport 3 de pascal script konusunda bilgisi olan arkadaşlardan yardımlarını bekliyorum. bu script syntax olarak neleri esas alır. neleri kullanabiliriz. örnek vermem gerekirse...

Kod: Tümünü seç

begin
Page1.BackPicture := nil;
end.

şeklinde yazdığımda kod tam olarak çalışıyor ancak bu kodu ben yazdır işleminde kullanmak istiyorum. page1 in onafterprint işleminde çalışmıyor. yukarıdaki şekilde doğru çalışırken demo version açıklaması çıkıyor. olaya yazdığım kod ile demo version açıklaması çıkmıyor ancak kod çalışmıyor. burda çalışmıyordan kastım hata vermiyor. yukarıdaki şekilde kod işlevini yerine gtiriyor. ancak olaya yazdığımda işlevini yerine getirmiyor... script konusunda bilgisi olan arkadaşlardan yardımlarını bekliyorum...

[kadirkurtoglu]

yukarıdaki kod bloğu fastreport kod bloğu. bu blok aslında fastreportta sanırım genel bir blok. page nin onbeforeprint olayına çift tıkladığımda bu bloğa atıyor imleci. onafterprint olayında ise sender olarak parametre gösteriyor. bir türlü çözemedim.

[Fatih!]

bu scripti anladığıma göre tıpkı delphideki gibi procedure tanımlayabiliyorsun.
uses satırını ekleyerek delphideki unitleride kullanabiliyorsun.
yanılmıyorsam bir erde try except arasına yazılması gerektiği yazıyord

[kadirkurtoglu]

hocam denedim ancak nafile bişey değişmiyor. varsayılan blokta çalışıyor ancak onafterprint olayında çalışmıyor. sanıyorum varsayılan blok onbeforeprint çünkü önizlemede göstermiyor. gelen demo unregistered version açıklaması da script in çalıştığı manasına geliyor. benim onafterprint olayına yazdığım kod çalışsa demo uyarısının gelmesi gerekiyor ancak gelmiyor. tabi buna bağlamak anlamsız ancak ben öyle düşünüyorum çünkü adam demo uayrısını varsayılanda yapıyor. bu iş demo version olması nedeniyle mi oluyor tam çözemedim.