Вставка растрового объекта

Автор AndreySt, 18.09.07, 07:47:32

« назад - далее »

0 Пользователи и 1 гость просматривают эту тему.

AndreySt

В SDK все описано и понятно НО
var
    ksRast: ksRasterParam;
    PlPar : ksPlacementParam;
    idoc  : ksDocument2D;
begin
  KompasApi := KompasObject(CreateKompasObject);
  if idoc = nil then idoc := ksDocument2D(KompasApi.ActiveDocument2D);
  if idoc = nil then exit;
  ksRast := ksRasterParam(KompasApi.GetParamStruct(ko_RasterParam));
  PlPar := ksPlacementParam(KompasApi.GetParamStruct(ko_PlacementParam));
  ksRast.Init;
  PlPar.Init;
  ksRast.fileName := 'D:\Picture\25a.jpg';
  ksRast.embeded := true;
  PlPar.xBase := 0;
  PlPar.yBase := 0;
  PlPar.scale_ := 0.5;
  PlPar.angle := 0;
  ksRast.SetPlace(PlPar);
  idoc.ksInsertRaster(ksRast);


  idoc.ksInsertRaster(ksRast); возвращает 0 почему :?: может я что то не то делаю :?: подскажите
заранее благодарен ;)