Տուն
Top.Mail.Ru Moscow
Ֆորում: «Գլխավոր»;
Ընթացիկ արխիվը `2002.01.08;
Բեռնել: [xml.tar.bz2];

Down

Սեղաններ MS Word- ում Գտնել նմանատիպ մասնաճյուղեր


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

Ինչպե՞ս չափափոխել սյունակը աղյուսակում ???



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

միավոր ...;

ինտերֆեյս

uses
... Word2000, OleServer, Word97;

տիպ
TForm1 = դաս (TForm)
.
.
.
WordApplication1` TWordApication;
WordDocument1` TWordDocument;
հասարակություն
կարգը ChangeSizeColumn;
վերջը.

էր
Form1- ը `TForm1;

իրականացում

{$ R * .dfm}

Ընթացակարգի ձև .1.ChangeSizeColumn;
էր
Ձևանմուշ,
NewTemplate,
ArticleIndex` OleVariant;
par: պարբերություն;
Ներդիր ՝ սեղան;
սյուն `սյուն;
սկսել
// Գործարկել բառը
WordApplication1.Connect;
WordApplication1.Visible: = Trueիշտ;
Կաղապար: = EmptyParam;
NewTemplate: = կեղծ;
ItemIndex: = 1;
WordApplication1.Document.Add (ձևանմուշ, NewTemplate);
WordDocument1.ConnectTo (WordApplication1.Document.Item (ArticleIndex));
WordApplication1.Options.CheckSpellingAsYouType. = Կեղծ;
WordApplication1.Options.CheckGrammarAsYouType: = կեղծ;
Պար `= WordDocument1.Pargments.Add (EmptyParam);

// ստեղծել սեղան
ներդիր ՝ = WordDocument1.Tables.Add (պար.Ռանգ, 1, 2);
// 1 - շարքերի քանակը, 2 - սյունակների քանակը

// Ընտրեք սյունակը
սյուն ՝ = tabl.Columns.Item (1);

// Սահմանեք դրա չափը, տես թարգմանությունը ֆունտ
colum.Width: = 3.78 * 28.35;


վերջը.



Էջեր: 1 ամբողջ ճյուղը

Ֆորում: «Գլխավոր»;
Ընթացիկ արխիվը `2002.01.08;
Բեռնել: [xml.tar.bz2];

Up





Հիշողություն `0.54 ՄԲ
Ժամանակը `0.025 գ
14-22407
KL
2001-11-03 00:47
2002.01.08
Բետա թեստավորում !!!


1-22119
Սոկոլ
2001-12-15 10:45
2002.01.08
Օգնություն երկու հարցերին.


1-22226
Սնունդ
2001-12-15 13:06
2002.01.08
Ինչու այս պարզ կոդը չի աշխատում ...


3-21960
Ալենկա
2001-12-05 12:53
2002.01.08
Օգնություն խնդրում եմ!


7-22446
Պարադոքս
2001-09-25 19:12
2002.01.08
Մի կարոտեք: Դե, շատ անհրաժեշտ է:





afrikaans ալբանական արաբական հայերեն ադրբեջանական Բասկերի Բելառուսի Բուլղարիայի catalan Չինարեն (պարզեցված) Չինարեն (ավանդական) Խորվաթիայի չեխ դանիերեն հոլանդական Անգլերեն
Էստոնիայի filipino ֆիններեն ֆրանսերեն
galician վրացական գերմանական հունարեն haitian Creole եբրայերեն հինդի հունգարերեն icelandic հայերեն իռլանդական իտալական ճապոնացի Կորեայի Լատվիայի Լիտվայի մակեդոներեն Մալայերեն մալթերեն նորվեգական
պարսկական Լեհաստանի պորտուգալացի ռումինական ռուսական սերբերեն Սլովակիայի Սլովենիայի իսպաներեն սուահիլի շվեդերեն թայերեն թուրքական ուկրաինական ուրդու վիետնամերեն ուելսերեն հայերեն bengali բոսնիերեն
Cebuano Esperanto գուջարաթի հաուսա Hmong Igbo ճավաերեն kannada Khmer Lao լատիներեն մաորի մարաթի մոնղոլական նեպալերեն Punjabi Somali tamil telugu յորուբա
զուլուսերեն
Անգլերեն Французский Немецкий Итальянский Португальский Русский Испанский