Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

Вниз

Таблиці в MS Word Знайти схожі гілки


som   (2001-12-19 12:40) [0]

Як змінити розмір стовпця в таблиці ???



borisich   (2001-12-19 13:45) [1]

unit ...;

інтерфейс

використовує
... Word2000, OleServer, Word97;

тип
TForm1 = class (TForm)
.
.
.
WordApplication1: TWordApplication;
WordDocument1: TWordDocument;
громадськість
procedure ChangeSizeColumn;
end;

було
Form1: TForm1;

реалізація

{$ R * .dfm}

Procedure Form1.ChangeSizeColumn;
було
Template,
NewTemplate,
ItemIndex: OleVariant;
par: Paragraph;
Tab: table;
colum: Column;
починати
// Запускаем ворду
WordApplication1.Connect;
WordApplication1.Visible := True;
Template := EmptyParam;
NewTemplate := False;
ItemIndex := 1;
WordApplication1.Documents.Add(Template, NewTemplate);
WordDocument1.ConnectTo (WordApplication1.Documents.Item (ItemIndex));
WordApplication1.Options.CheckSpellingAsYouType := False;
WordApplication1.Options.CheckGrammarAsYouType := False;
Par:=WordDocument1.Paragraphs.Add(EmptyParam);

//создаем таблицу
tabl := WordDocument1.Tables.Add(par.Range, 1, 2);
// 1 - кол-во строк, 2 - кол-во столбцов

// Выбираем столбец
colum:= tabl.Columns.Item(1);

// Устанавливаем его размер см переводим в pound
colum.Width := 3.78*28.35;


end;



сторінки: 1 вся гілка

Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

наверх









Пам'ять: 0.81 MB
Час: 0.021 c
1-22195
LNix
2001-12-15 20:00
2002.01.08
рядок


1-22187
mitry
2001-12-15 02:53
2002.01.08
Thread: Suspend / Resume & Synchronize


14-22386
дрімучий
2001-11-08 21:13
2002.01.08
Цікаво? Наскільки?


14-22364
Кречет
2001-11-06 00:22
2002.01.08
Якщо не врятуєте, то так і пропаде!


14-22378
модератор
2001-11-08 07:51
2002.01.08
> Merilin





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська