как изменить шрифт в колонке штампа

Автор white, 02.09.08, 13:06:29

« предыдущая - следующая »

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

white

здраствуйте! ни кто не знает как при помощи SetItemFont  поменять шрифт? Мне бы кусочек кода посмотреть. заранее спасибо!

Prog1

var Stamp:ksStamp;
    Item :ksTextItemParam;
    Font :ksTextItemFont;
.
.
.
  Stamp:=ksStamp(Doc.GetStamp);
  Item:= ksTextItemParam(Kompas.GetParamStruct(ko_TextItemParam));
  Item.Init;
  Font:= ksTextItemFont(Item.GetItemFont);
  font.fontName:='GOST....';
  font.height:=...
  Font.SetBitVectorValue( NEW_LINE, true );


white