Shembulli i Përdorimit të Ngjarjes "OnBeforePrint"

Shembulli i Përdorimit të Ngjarjes "OnBeforePrint"

për të demonstruar këtë ngjarje krijoni një raport që përfaqëson një listë klientësh. Ky raport do të përfshijë vetëm ato kompani të cilat emri i tyre fillon me shkronjën "A".

Le të krijojmë një projekt të ri, vendosni komponentin "TfrxDlDBTable" në formular dhe vendosni këto pronësi:

UserName = 'Subjektet'

Hapni dizajnerin e raportit dhe krijoni një raport si ky:

Zgjidhni grupin e të dhënave dhe kaloni në skedën “Ngjarjet” në inspektorin e objektit:

për të krijuar një menaxher ngjarjeje “OnBeforePrint” (i cili është më i përshtatshmi për ne) dyfish klikoni në fushën bosh në të djathtë të emrit të ngjarjes:

Kjo shton një menaxher bosh në skript dhe dizajneri kalon në skedën “Kod”.

Gjithçka që nevojitet tani është të shkruani kodin e mëposhtëm në trupin e menaxherit:

nëse  Kopjo(<Subjektet."acSubject">, 1, 1) = 'A' atëherë

  MasterData1.Visible := True

ndryshe

  MasterData1.Visible := False;

Ekzekutoni raportin dhe sigurohuni që skripti funksionon siç duhet:

Le të shpjegojmë disa gjëra. Një menaxher mund të caktohet për ngjarjet e më shumë se një objekti - parametri “Dërguesi” tregon se cili objekt ka iniciuar ngjarjen. Për të caktuar një menaxher ekzistues për një ngjarje, ose shkruani atë drejtpërdrejt në inspektorin e objektit, ose zgjidhni atë nga lista e rënies:

Një lidhje me një menaxher mund të fshihet lehtësisht - zgjidhni menaxherin e caktuar në inspektorin e objektit dhe shtypni çelësin “Fshi”.

Nëse menaxheri i ngjarjeve fshihet, kodi ende mbetet në raport, por nuk përdoret. Vetëm menaxheri i ngjarjeve mbetet gjithashtu asnjë kod nuk ekzekutohet dhe nuk ndodh ndonjë gabim.