¿Cómo mostrar UN Doc. "PowerPoint" desde un Programa en Delphi?

[MACOII]

Muchas gracias por ayudarme.

ya puede mostrar documento Word y hoja Excel desde Delphi.

Para Word:


var
Word: Variant;
Documento: Variant;
BEGIN
(* Creas un objeto Word *)
Word := CreateOleObject('Word.Application');
(* Añades un documento basado en la plantilla *)
Word.Documents.Add('c:\prueba.DOc');
Documento := Word.Documents.Item(1);
(* Asignas valores a los campos *)
Word.Visible := true;
documento.Fields.ToggleShowCodes;
Documento.Fields.Update;


Para Excel:


var
excel: Variant;
Excel_Documento: Variant;
begin
excel := CreateOleObject('excel.Application');
excel.Workbooks.add('c:\libro.xls');
excel.visible:=true;


Ahora necesito saber como Mostrar Una Plantilla "PowerPoint" desde un programa Delphi. Muchas Gracias de Antemano.

[Neftali [Germán.Estévez]]

var
PowerPoint: Variant;
begin
try
PowerPoint := GetActiveOleObject('PowerPoint.Application');
except
PowerPoint := CreateOleObject('PowerPoint.Application');
end;
PowerPoint.Visible := True;

Link. (http://www.djpate.freeserve.co.uk/AutoPpt.htm)

[axlrafael]

Muchas gracias por ayudarme.

ya puede mostrar documento Word y hoja Excel desde Delphi.

Para Word:


Código Delphi [-] (http://www.clubdelphi.com/foros/#)
var
Word: Variant;
Documento: Variant;
BEGIN
(* Creas un objeto Word *)
Word := CreateOleObject('Word.Application');
(* Añades un documento basado en la plantilla *)
Word.Documents.Add('c:\prueba.DOc');
Documento := Word.Documents.Item(1);
(* Asignas valores a los campos *)
Word.Visible := true;
documento.Fields.ToggleShowCodes;
Documento.Fields.Update;





Para Excel:


Código Delphi [-] (http://www.clubdelphi.com/foros/#)
var
excel: Variant;
Excel_Documento: Variant;
begin
excel := CreateOleObject('excel.Application');
excel.Workbooks.add('c:\libro.xls');
excel.visible:=true;





Ahora necesito saber como Mostrar Una Plantilla "PowerPoint" desde un programa Delphi. Muchas Gracias de Antemano.

Excelente justo lo que necesitaba, gracias. Saludos