Wie kann ich mit Delphi ein PowerPoint Diagramm erstellen und
es dann als File Abspeichern.
Geht das überhaupt ?
kann mir jemand helfen ?
Danke
Peter
Vielleicht hilft Dir dieser C++ Code etwas weiter, die Uebersetzung in Delphi duerfte nicht so schwierig sein. Es stammt von der Borland Konferenz 2000. Lt. Borland Community gibts zwar die OLE Server in CBuilder 5 bzw. Delphi 4, aber an eine genauere Doku ist von Seiten Borland nicht gedacht. Versuch auch mal die Visual Basic Hilfe ueber PowerPoint, in der Hilfe-Datei Vbappt8.hlp, die Teil der WIN98 CD ist. Dort wird dei OLE Schnittstelle beschrieben (allerdings von der Powerpoint Sicht aus, Borland hat die Schnittstelle ‚geringfuegig‘ modifiziert)
void __fastcall TForm1::Button1Click(TObject *Sender)
{
OleVariant Template = EmptyParam;
OleVariant NewTemplate = False;
OleVariant ItemIndex = 1;
try
{
try
{
PowerPointApplication1->Connect();
}
catch (Exception &exception)
{
MessageDlg(„PowerPoint may not be installed“, mtError, TMsgDlgButtons() Visible = msoTrue;
PowerPointApplication1->Caption = StringToOleStr(„BorCon 2000“);
PowerPointApplication1->:stuck_out_tongue_winking_eye:resentations->Add(msoTrue);
PowerPointPresentation1->ConnectTo(PowerPointApplication1->:stuck_out_tongue_winking_eye:resentations->Item(1));
PowerPointPresentation1->Slides->Add(1, ppLayoutChartAndText);
PowerPointSlide1->ConnectTo(PowerPointPresentation1->Slides->Item(1));
}
catch (Exception &exception)
{
Application->ShowException(&exception);
PowerPointApplication1->Disconnect();
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
DBImage1->CopyToClipboard();
PowerPointSlide1->Name = StringToOleStr(„San Diego BorCon2000“);
PowerPointSlide1->
PowerPointPresentation1->SlideShowSettings->Run();
}
//---------------------------------------------------------------------------