С линиями вроде бы разобрался, спасибо, подскажите еще пожалуйста по отрисовке типового площадного объекта.
Код |
---|
var
iSqre:IFillStyleDef;
iLnDef:ILineStyleDef;
begin
...
Fid := ObjType.id;//правильно ли так получать идентификатор типового площадного объекта?
iSqre := iLay.FillStyles.ItemById[Fid];
Lid := ObjectMode.ElemStyle.LineStyle;//правильно ли получен стиль линии для типового площадного объекта?
iLnDef := iLay.LineStyles.ItemById[LId];
//дальше что-то рисует, но не совсем понятно тот ли площадной объект отрисовывается
iSqre.DrawSampleImage(iStrm,48,32,1,1,0,clDefault,true,50,lnColor,clWhite,false,iLnDef,lnWidth,clRed);
...
end;
|
Подскажите еще описание параметров используемой функции
DrawSampleImage(
const Stream: IUnknown; Width: Integer; Height: Integer; SpaceX: Integer; SpaceY: Integer; Format: Integer; //-эти параметры как для линии
ImageBkColor: Integer; ImageTransparent: WordBool; // как получить эти свойства
Scale: Double;
Color: Integer; //цвет чего
BackColor: Integer;
Transparent: WordBool;
const BorderStyle: ILineStyleDef;
BorderWidth: Double;
BorderColor: Integer):
WordBool; safecall;