unit Unit1;
interface
uses
Windows, Messages, SysUtils, DBClient, ..., CDSExt;
type
TForm1 = class( TForm )
...
DataSetProvider1: TDataSetProvider;
ClientDataSet1: TClientDataSet;
DataSource1: TDataSource;
...
implementation
procedure TForm1.Button1Click( Sender: TObject );
begin
ClientDataSet1.ReadRecord;
end;
procedure TForm1.Button2Click( Sender: TObject );
begin
ClientDataSet1.WriteRecord( True ); end;
...