realbasic-nug.fr
[Top] [All Lists]

Re: Place Disque

To: REALbasic NUG French <realbasic-nug dot fr at lists dot realsoftware dot com>
Subject: Re: Place Disque
From: frael <frael at marine-label dot com>
Date: Sat, 31 May 2008 01:10:23 +0200
Authentication-results: mx.google.com; spf=pass (google.com: domain of realbasic-nug dot fr-bounces at lists dot realsoftware dot com designates 66.116.103.65 as permitted sender) smtp dot mail=realbasic-nug dot fr-bounces at lists dot realsoftware dot com
Delivered-to: listarchive at realsoftware dot com
Delivered-to: realbasic-nug dot fr at lists dot realsoftware dot com
References: <92B01452-F417-4897-A327-0DFAB771F951 at marine-label dot com> <FBDA28E2-F4E2-4678-92C3-859D7E321A66 at widemann dot net>

Bon, avec vos idées (merci !) j'ai donc fait un AS "ASPlaceDisk.scpt" avec :

on run
        try
tell application "System Events" to return the (free space of startup disk) / 1024 / 1024 / 1024
        on error
                return "sproutch"
        end try
end run

Je fais laplace = ASPlaceDisk
Et ca me rend bien une string en Go (ca tombe bien, je n'ai besoin que du disque de démarrage)

Curieusement cette string arrive en UTF16 ?!
Je la passe en UTF8 et le resultat est correct, mais je ne pige pas le détour obligatoire par l'U16

Marc

------------------------------------------------

Le 30 mai 08 à 21:55, Benoit Widemann a écrit :


On 30 mai 08, at 16:49, frael wrote:


Bonjour, est-ce que quelqu'un sait trouver en RB la place disque dispo sur un volume donné ?

Marc



En Applescript :
tell application "System Events" to return the free space of startup disk

Si ce n'est pas le disque de démarrage c'est un poil plus compliqué, voir le dictionnaire de System Events.

B.

// http://www.widemann.net //









<Prev in Thread] Current Thread [Next in Thread>