Pada contoh sebelumnya, data source dihubungkan dengan datasetnya dengan cara menetapkan properti DataSet pada waktu desain. Pada waktu runtime, Anda dapat men-switch dataset pada komponen data source jika diperlukan.
Contoh, kode berikut ini menukar dataset komponen data source CustSource (dataset Customers dan Orders) :
with CustSource do
begin
if (DataSet = Customers) then
DataSet := Orders
else
DataSet := Customers;
end;
Anda juga dapat menetapkan properti DataSet ke dataset pada form lainnya untuk mensinkronkan data control pada dua form. Contoh :
procedure TForm2.FormCreate (Sender : TObject);
begin
DataSource1.Dataset := Form1.Table1;
end;
No comments:
Post a Comment
Silahkan tinggalkan pesan