I need a small code sample in Delphi 5, showing the next aspects of communication between my application and MS PowerPoint via COM.
1. Extracting text from the "Slide Notes" field, associated with each of slides in the presentation. Text must be saved into a string of Unicode characters (WideString);
2. Extracting sound, associated with each slide. Sound should be obtained into the stream (e.g. TMemoryStream in Delphi terms) or just as array of bytes. Sound format should be either WAV or MP3 depending on the format it is stored inside PPT file in.
3. It is an issue, that we see a small "speaker" sign on slide if the audio is attached to it. And this image remains to be visible on exported slides (when we use [login to view URL](i).Export() function). The question is how to hide it (temporarily) while the slide is exported.
Code sample for these solutions should look like the next:
**procedure** [login to view URL];
var
ws : WideString;
f : TMemoryStream;
**begin**
PPA1 := [login to view URL](Self);
PPP1 := [login to view URL](Self);
[login to view URL];
[login to view URL]([login to view URL]('[login to view URL]', 0, 0, 0));
**for** i := 1 **to** [login to view URL] **do**
**begin**
ws := ExportNotes([login to view URL](i));
ExportSound([login to view URL](i), f);
DoSomethigToHideSpeaker([login to view URL](i));
[login to view URL](i).Export(....);
DoSomethigToShowSpeakerBack([login to view URL](i));
**end**;
[login to view URL];
[login to view URL];
[login to view URL];
[login to view URL];
**end**;
## Deliverables
1) Complete and fully-functional working program(s) in executable form as well as complete source code of all work done. Source code should be compilable in Delphi 5.
Code sample must be delivered as complete application with source code, which (in compiled form):
1(a). Saves "Slide Notes" field of each slide into a text file with filename like "[login to view URL]";
1(b). Saves soundtrack, associated with each slide, into a file of appropriate format, e.g. [login to view URL] or [login to view URL], depending on the inner sound format;
1(c). Saves slides as JPEGs of some fixed size like 640x480 without the speaker symbol for slides, having associated soundtrack.
2) All deliverables will be considered "work made for hire" under U.S. Copyright law. Buyer will receive exclusive and complete copyrights to all work purchased. (No GPL, GNU, 3rd party components, etc. unless all copyright ramifications are explained AND AGREED TO by the buyer on the site per the coder's Seller Legal Agreement).
## Platform
IBM PC
Windows 2000, XP
MS PowerPoint 2000, 2003, XP.