CopyFrom (binary type)

De Wiki1000
(Différences entre les versions)
Ligne 27 : Ligne 27 :
 
Exemple
 
Exemple
 
<source lang='delphi'>
 
<source lang='delphi'>
 +
//Procedure TestCopy;
 +
var inst:WFNPBlob;
 
begin
 
begin
 +
  // load myself blob
 +
  binary.loadfromfile('C:\Tulips.jpg');
 +
  showMessage(Format('Size:%d',[binary.Size]));
 +
  // Create a clone
 +
  inst := WFNPBlob.Create;
 +
  //inst.binary.Assign(binary);
 +
  inst.binary.CopyFrom(binary,bcmShare);
 +
  showMessage(Format('Size:%d',[inst.binary.Size]));
 +
  // Clear;
 +
  inst.binary.Clear;
 +
  showMessage(Format('Size:%d',[binary.Size]));
 
end;
 
end;
 
</source>
 
</source>

Version du 20 octobre 2014 à 12:03

procedure CopyFrom(Soure:TfwBinary; iMode:Integer);

Cette méthode copy le contenu à partir d'un autre type binaire.

Source Le type binaire contenant les données à copier.
iMode Le mode de copie des données.

Le mode de copie peut être :

bcmCopy Les données sont copiées par duplication
bcmShare Les données sont partagées
Exclam-20px.png Attention : Dans le cas d'une copie par partage les données sont partagées, ceci implique qu'elles peuvent être effacées par l'un ou l'autre des objets, par exemple quand une des deux instances est libérée.

Exemple

//Procedure TestCopy;
var inst:WFNPBlob;
begin
  // load myself blob
  binary.loadfromfile('C:\Tulips.jpg');
  showMessage(Format('Size:%d',[binary.Size]));
  // Create a clone
  inst := WFNPBlob.Create;
  //inst.binary.Assign(binary);
  inst.binary.CopyFrom(binary,bcmShare);
  showMessage(Format('Size:%d',[inst.binary.Size]));
  // Clear;
  inst.binary.Clear;
  showMessage(Format('Size:%d',[binary.Size]));
end;

Voir aussi

Binaire (type)Développement DSM





Whos here now:   Members 0   Guests 0   Bots & Crawlers 1
 
Outils personnels