MotlawaTech:Profile w FDBC i FC: Różnice pomiędzy wersjami

Z Motława
(Utworzył nową stronę „= Filtry = W module D_... w kreowaniu dodać (zakładamy ze istnieje filtr jako FC): <code> FC.Stored_Type := 200; FC.Stored_IDStored := 'cdsNAZWAODPOWIEDNIA'; F…”)
 
Linia 37: Linia 37:
 
pozostałe procedury muszą posiadać inherited !
 
pozostałe procedury muszą posiadać inherited !
  
−
[[Kategoria: MotlawaTech]]
+
[[Kategoria: MotlawaTech|Profile w FDBC i FC]]

Wersja z 13:21, 26 lis 2009

Filtry

W module D_... w kreowaniu dodać (zakładamy ze istnieje filtr jako FC): 

 FC.Stored_Type := 200;
 FC.Stored_IDStored := 'cdsNAZWAODPOWIEDNIA';
 FC.SaveProfileAfterDlg := True;

a na końcu kreowania: 

if Assigned(Profile) then
 begin
   Profile.StoredRead_Last(FC);
 end;

Całokształt FDBC

definicja FDBC wymaga zadeklarowania: 

 protected
   procedure ChldMayClose; override;
   procedure ChldMayOpen; override;
   procedure FinnalySection; override;

 public
   procedure ReadSetings; override;
   procedure WriteSetings; override;

zaś w kreatorze należy dopisać linie: 

 Form_IdStored := 'FDBCNazwamodulu';

pozostałe procedury muszą posiadać inherited !

Źródło „https://wiki.int.com.pl/index.php?title=MotlawaTech:Profile_w_FDBC_i_FC&oldid=6505”