j'ai cette procedure pour test de transfer des donnée entre deux clientdataset, via memorystream
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
procedure TForm4.Button1Click(Sender: TObject);
var
     strm:TMemoryStream;
begin
     ClientDataSet1.DisableControls;
     strm:=TMemoryStream.Create;
     try
        LocalCD.SaveToStream(strm);  //LocalCD un autre TCLientDataset
        showmessage(inttostr(strm.Size));
        sleep(1);
        ClientDataSet1.LoadFromStream(strm);
        ClientDataSet1.Active:=true;
        ClientDataSet1.EnableControls;
     finally
       strm.Free;
     end;
end;
et j'ai eu ce message d'erreur:
notification d'une exception du débogeur:
le projet1.exe a provoqué une clsse d'exception EDatabaseerror avec le message 'Clientdataset1: fournisseur de données ou paquet de données manquant', Processus stoppé,
svp aidé moi, merci