Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

svojstvo za referencijalni integritet

7 views
Skip to first unread message

AureliusMaticus

unread,
Aug 5, 2011, 3:11:42 AM8/5/11
to
Radim komponentu za Lazarus/FPC, koja je nasljednik TBufDataseta i
želim omogućiti referencijalni integritet.
Svrha svojstva je definiranje vanjskog ključa za osiguravanje
referencijalnog integriteta. Dakle, na osnovu vrijednosti svojstva,
provodilo bi se insert/update/delete prema nadređenima ili podređenima
objektima istog tipa.
Dakle, to svojstvo je u suštini lista ili niz koja sadrži polja:

MasterDataSet:TDataSet
MasterFieldName:String
ReferentialIntegrityKind:TReferentialIntegrityKind=set of
(rikInsert, rikUpdate, rikDelete);

Dakle svaki Item u listi predstavlja jedan vanjski relacijski ključ.
Kada bih vrijednosti dodavao samo kroz kod, mogao bih to svojstvo
definirati kao npr. niz zapisa (array of record) ili nešto slično.
Ali, ja želim da svojstvo bude editabilno kroz object inspector.
Kako da napravim to svojstvo, a da se može uređivati iz sučelja?

Unaprijed hvala.

Zlatko

AureliusMaticus

unread,
Aug 5, 2011, 3:17:23 AM8/5/11
to

AureliusMaticus

unread,
Aug 19, 2011, 11:44:46 AM8/19/11
to

Odustao bio od rješavanja referencijalnog ključa kroz svojstvo
TZMQueryDataset-a, a problem riješio uvođenjem nove komponente
TZMReferentialKey, koja definira relacijsku vezu i povezuje dva
TZMQueryDataSeta.
Ako koga zanima, zmsql paket i izvorni kod se može skinuti ovdje:
http://www.4shared.com/file/B8SDbOQ1/TZMSQL-015.html

a tema se raspravlja na Lazarusovom forumu ovdje:
http://lazarus.freepascal.org/index.php/topic,13821.15.html

0 new messages