CwGetBitmapInfo

Sintassi:

call CwGetBitmapInfo path, stem

        ("stem" è il nome di una variabile stem in cui vengono 
         immagazzinati i risultati. Questa variabile ha due campi da riempire.)

        path            (stringa) Il percorso al file bitmap.

        stem.width      (numerico) L'ampiezza corrente (in pixel) della bitmap
                        così com'è immagazzinata nel file.

        stem.height     (numerico) L'altezza corrente (in pixel) della bitmap
                        così com'è immagazzinata nel file.

Descrizione:

Questa funziuone ritorna informazioni su una bitmap. La bitmap viene identificata tramite il suo nome di file. Comunque la bitmap deve essere caricata in memoria perché questa funzione lavori. Così, il modo ideale per ottenere il nome di una bitmap è estrarre la proprietà "Image" di un oggetto bitmap già esistente.

Esempio:

/* Restore a bitmap to its correct aspect ratio.*/
bm = CwGetSelectedObject()
t = CwGetProperty(bm, "tool type")

if t \= "Bitmap" then do
        say "Must select a bitmap."
        exit
        end

bt = CwGetTool(bm)
bmp = CwGetProperty(bt,"image")

call CwGetBitmapInfo bmp, 'bminfo'
r = bminfo.width / bminfo.height

call CwGetPosition bm, bmdim
nheight = bmdim.width/r
call CwSetPosition bm, bmdim.x, bmdim.y, bmdim.width, ,
        nheight, bmdim.rotation, bmdim.xshear


Funzioni per NOME

Indice

Funzioni per SCOPO