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

Para baixo

Transferir dados para uma célula da planilha do Excel Encontre agências semelhantes


Striker   (2001-12-13 07:59) [0]

Por favor, diga-me como escrever alguma variável da string ou tipo real para a célula especificada da planilha EXCEL (eu gostaria de um exemplo). Obrigado por ela anteriormente.



perov   (2001-12-13 08:21) [1]

ExcelApplication.Connect; ExcelApplication.Workbooks.Add ("", 0); ExcelWorkbook.ConnectTo (ExcelApplication.ActiveWorkbook); ExcelWorksheet.ConnectTo (ExcelWorkbook.Sheets [1] como _WorkSheet); ExcelWorksheet.Activate ExcelWorksheet.Cells.Item [j, 1] .Valor: = j - i; ExcelApplication.Visible [0]: = True;



KIR   (2001-12-13 08:32) [2]

Aqui está a questão do catch-up, mas como fechar esse XL corretamente? E então eu tenho uma transferência de tempo (embora o Excel do Excel "I) funciona, e se você tentar novamente, então - Erro de alocação de memória ...



perov   (2001-12-13 08:44) [3]

ExcelApplication.Disconnect;



Striker   (2001-12-13 09:00) [4]

Muito obrigado vou tentar em casa.



KIR   (2001-12-13 12:02) [5]

> perov
Já escrevi
e ExcelApplication.Disconnect,
e ExcelApplication.Quit,
e FreeAndNil (ExcelApplication) ...
não ajuda, aqui está um pedaço de código:

ExcelApplication1.Connect;
ExcelApplication1.WorkBooks.Add (n, 0); // n - nome do arquivo
ExcelWorkBook1.ConnectTo (ExcelApplication1.ActiveWorkBook);

{program body}

ExcelApplication.WorkBook1.Close;
ExcelApplication1.Disconnect;



perov   (2001-12-13 12:33) [6]

ExcelWorksheet.Disconnect; ExcelWorkbook.Close; ExcelApplication.Disconnect;



Олег Лаукарт   (2001-12-13 13:33) [7]

Há alguns artigos sobre como trabalhar com o Excel no Reino do Delphi



Ынс   (2001-12-13 14:32) [8]

// adicione este aos módulos
usa ComObj;
// ...
var
xlApp: variante;
DataArray: Variant; // array bidimensional estará aqui
rv: real;
começar
rv: = 10.56568;
xlApp: = CreateOleObject ("Excel.Sheet"); // create
xlApp.Application.Visible: = True;

xlApp.Application.Cells [1, 2] .Value: = "23456346"; // so

xlApp.Application.Range ["RealValue1"]. Valor: = rv; {você pode fazer isso: "RealValue1" - o nome da célula nas "células"}

xlApp.Application.Range ("A1: B8"). Value: = "Apenas uma string para preencher o intervalo"; {preencha o intervalo com uma linha}


DataArray: = VarArrayCreate ([0,2,0,2], varVariant); {criar uma opção do tipo array para armazenar quaisquer valores}
DataArray [0, 0]: = "elemento da matriz";
DataArray [1, 0]: = 38754; // também um elemento de matriz

{atribuir a matriz inteira ao link de uma só vez ... barato, confiável e praticamente = =) = especialmente quando você precisa enviar um array de milhares de linhas 5 para o relatório ... se você fizer isso através de um loop for, o relatório será gerado como mortal}

xlApp.Application.Range ("A1: C3): = DataArray;

// salve este arquivo para a posteridade = -)
xlApp.SaveAs ("c: \ docs \ reports \ sample1.xls");

DataArray: = não atribuído; // varre faixas
xlApp: = não atribuído; // bang e isso ...
end;



Striker   (2001-12-15 11:06) [9]

Eu vasculhei por aqui e encontrei um site (WWW.afalinasoft.com) lá, é precisamente devido à interação do Delphi & Excel.



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

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

em cima









Memória: 0.58 MB
Hora: 0.026 c
14-22399
Mcsimm
2001-11-11 12:01
2002.01.08
Formatando em respostas


7-22431
Paxá
2001-09-21 15:58
2002.01.08
Como remover da placa de som, a forma de onda.


1-22079
kserg@ukr.net
2001-12-19 13:11
2002.01.08
Como associar corretamente um botão com um ToolBara com um item de menu no MainMenu?


4-22485
Delphi5.01
2001-11-05 06:56
2002.01.08
Como posso carregar meu cursor no Delphi!


1-22118
vlv
2001-12-19 21:59
2002.01.08
Componentes





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