CopyToClipBoard (TJSon)
De Wiki1000
(Différences entre les versions)
Syfre (discuter | contributions)
(Page créée avec « <source lang="delphi">procedure CopyToClipBoard;</source> Cette méthode copie le document dans le presse papier. Cela peut être utile en phase de mise au point. Exemp... »)
(Page créée avec « <source lang="delphi">procedure CopyToClipBoard;</source> Cette méthode copie le document dans le presse papier. Cela peut être utile en phase de mise au point. Exemp... »)
Version actuelle en date du 6 décembre 2013 à 16:24
procedure CopyToClipBoard;
Cette méthode copie le document dans le presse papier.
Cela peut être utile en phase de mise au point.
Exemples:
Dans cet exemple, json.AsString retourne un document équivalent au document parsé.
//Procedure JsonParser; var json:TJson; S,stag:string; idx:Integer; begin json := TJson.Create( '{ "employees": [ { "firstName":"John" , "lastName":"Doe" }, { "firstName":"Anna" , "lastName":"Smith" }, { "firstName":"Peter" , "lastName":"Jones" } ] }' ); json.CopyToClipBoard; showMessage(json.AsString); end;
Voir aussi:
Whos here now: Members 0 Guests 1 Bots & Crawlers 0 |