Casa
Top.Mail.Ru Yandeks.Metrika
Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

Para baixo

Tabelas no MS Word Encontre agências semelhantes


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

Como redimensionar uma coluna em uma tabela ???



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

unidade ...;

interface

usos
... Word2000, OleServer, Word97;

tipo
TForm1 = classe (TForm)
.
.
.
WordApplication1: TWordApplication;
WordDocument1: TWordDocument;
público
procedimento ChangeSizeColumn;
end;

var
Form1: TForm1;

implementação

{$ R * .dfm}

Procedimento Form1.ChangeSizeColumn;
var
Modelo,
NewTemplate,
ItemIndex: OleVariant;
par: Parágrafo;
Tabulação: tabela;
colum: coluna;
começar
// Run Word
WordApplication1.Connect;
WordApplication1.Visible: = True;
Modelo: = EmptyParam;
NewTemplate: = falso;
ItemIndex: = 1;
WordApplication1.Documents.Add (modelo, NewTemplate);
WordDocument1.ConnectTo (WordApplication1.Documents.Item (ItemIndex));
WordApplication1.Options.CheckSpellingAsYouType: = falso;
WordApplication1.Options.CheckGrammarAsYouType: = falso;
Par: = WordDocument1.Paragraphs.Add (EmptyParam);

// cria uma tabela
tabl: = WordDocument1.Tables.Add (par.Range, 1, 2);
// 1 - número de linhas, 2 - número de colunas

// Selecione a coluna
colum: = tabl.Columns.Item (1);

// Defina seu tamanho, veja translate to pound
colum.Width: = 3.78 * 28.35;


end;



Страницы: 1 filial inteira

Fórum: "Principal";
Arquivo atual: 2002.01.08;
Download: [xml.tar.bz2];

em cima





Memória: 0.54 MB
Hora: 0.02 c
1-22245
T2
2001-12-16 07:12
2002.01.08
Gost e melhor cripta


1-22199
T2
2001-12-16 07:16
2002.01.08
Fazer processo


7-22445
Kirill
2001-09-21 19:03
2002.01.08
Gravar para dll


1-22111
Alguém já fez?
2001-12-14 08:12
2002.01.08
Crie uma lista suspensa em StringGride, digite Lookup in DBGride


14-22354
Nêmesis
2001-10-08 13:02
2002.01.08
Mobil





afrikaans albanês Arabic armênio azerbaijano basco belarusian Bulgarian catalão Chinês simplificado) Chinês tradicional) croata checo dinamarquês Dutch Inglês estoniano filipino Finnish French
Galego georgiano German grego crioulo haitiano hebraico hindi húngaro islandês Indonesian irlandês Italian Japanese Korean letão lituano macedónio Malay maltês Norwegian
persa polonês Portuguese Romeno Russa sérvio Slovak esloveno Espanhol swahili sueco tailandês turco ucraniano urdu vietnamita galês ídiche bengali bósnio
cebuano esperanto gujarati hausa hmong igbo javanês kannada khmer lao latino maori marata mongol Nepali punjabi somali tâmil telugu yoruba
zulu
Английский francês Alemão Italiano Португальский russo Espanhol