CopyFrom (binary type)
De Wiki1000
(Différences entre les versions)
(Page créée avec « <source lang='delphi'>procedure CopyFrom(Soure:TfwBinary; iMode:Integer);</source> Cette méthode copy le contenu à partir d'un autre type binaire. {|class="wikitable" ... ») |
m |
||
(3 révisions intermédiaires par un utilisateur sont masquées) | |||
Ligne 1 : | Ligne 1 : | ||
− | <source lang='delphi'>procedure CopyFrom( | + | <source lang='delphi'>procedure CopyFrom(Source:TfwBinary; iMode:Integer);</source> |
Cette méthode copy le contenu à partir d'un autre type binaire. | Cette méthode copy le contenu à partir d'un autre type binaire. | ||
Ligne 23 : | Ligne 23 : | ||
|} | |} | ||
+ | {{Warning|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 | 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> | ||
Ligne 34 : | Ligne 48 : | ||
{{Footer|Binaire (type)}} | {{Footer|Binaire (type)}} | ||
[[category:Type de donnée binaire]] | [[category:Type de donnée binaire]] | ||
− | [[ | + | [[Category:Version700]] |
Version actuelle en date du 14 mars 2016 à 15:43
procedure CopyFrom(Source: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 |
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
Whos here now: Members 0 Guests 0 Bots & Crawlers 1 |