projemde bir form içinde forma özel datamodule yaratıyorum. Bu form üzerindeki bir listedeki kaydın düzenlenmesi için oluşturduğum başka bir formu açtığımda yine aynı sınıf datamodule bağlı olan yeni formun üzerindeki database nesnelerini ait olduğu formun datamodule'üne yönlediremiyorum.
Kayıt için kullandığım ikinci form açıldığında ekrandaki nesnelerin datasource bağlantısını yönlendirebilirim (aşağıdaki **** ile işaretlenmiş satır) ancak form üzerindeki nesnelerin sayısı fazla olduğunda veya Lookup tanımlamalarının da üzerinden geçmek gerekecek. Açılan ikinci formu ana ekrandaki datamodule'e yönlendirebilir miyim.
Değerleri fikir ve önerileriniz için şimdeden teşekkürler.
Örnek
Kod: Tümünü seç
TfrmListe = class(TForm)
grd: TcxGrid;
grdView: TcxGridDBTableView;
grdLvl: TcxGridLevel;
....
public
dmListe : TdmListe;
end;
.....
procedure TfrmListe.FormCreate(Sender: TObject);
begin
dmListe := TdmListe.Create(Self);
dmListe.Name := Self.Name+'_dmListe';
end;
procedure TfrmListe.KayitFormuAc;
begin
frmKayit := TfrmKayit.Create(Self, dmListe);
with dmListe do
try
dmListe.mdListe.Append;
frmKayit.ShowModal;
finally
frmKayit.Free;
end;
end;
Kod: Tümünü seç
TfrmKayit = class(TForm)
vg: TcxDBVerticalGrid;
....
end;
constructor TfrmKayit.Create(AOwner: TComponent; AdmListe: TdmListe);
begin
inherited Create(AOwner);
vg.DataController.DataSource := AdmListe.dsTblListe; //****
end;