Такой вопрос - как программно установить прозрачность картинки, и прозрачный цвет? Через диалоговое окно устанавливается, а программно не хочет.

Я делаю так:
## Код:
```
TYPE
   Bitmap* = POINTER TO RECORD
      c: FormControllers.Controller;
      v: AbfMedia.View;
      l,t,b,r: INTEGER;
   END;

PROCEDURE NewBitmap*(path: ARRAY OF CHAR): Bitmap;
   VAR b: Bitmap; prop: AbfMedia.BrowseProp;
BEGIN
   NEW(b);
   prop := AbfMedia.NewBrowseProp()(AbfMedia.BrowseProp); 
   prop.transColor := 0;
   prop.transparent := TRUE;
   b.v := AbfMedia.dir.NewWithProp(prop);
   b.v.SetLink(path);
   RETURN b;
END NewBitmap;
```
