Vorbereitungen

In diesem Kapitel möchte ich am Beispiel einer Delphi-Komponente die Grundlagen der CAPI-Programmierung aufzeigen. Ergebnis dieses kleinen Projektes wird eine Komponente für Delphi 3 sein, die bei einem ankommenden Anruf die Nummer des Anrufers liefert. Mit Hilfe dieser Komponente oder persönlichen Erweiterungen, können Sie endlich Ihren Lieblings-Anrufmonitor schreiben. Wenn Sie alle Schritte nachvollziehen wollen, sollten Sie folgendes zur Hand haben:

Um Ihnen das Ganze noch ein wenig schmackhaft zu machen, hier der gesamte Code, der im Beispielprojekt nötig war, um die Rufnummer von der Komponente zu bekommen und anzuzeigen:

procedure TForm1.FormCreate(Sender: TObject);
var Controller : dWord;
begin
  Controller := 1;
  CapiMonitor1.WaitForCall(Controller, 0);
end;
procedure TForm1.CapiMonitor1IncomingCall(CallingPartyNumber: string;
                                          CalledPartyNumber : string;
                                          CipValue : word;
                                          CipValueString : string);
begin
  lblRufnummer.Caption := TimeToStr(Time) + ':  ' + CallingPartyNumber;
end;

Wenn Sie auch noch wissen wollen, wie das Ganze funktioniert, sollten Sie sich die folgenden Abschnitte ansehen. Wenn ab jetzt von der (eigentlich heißt es ja "dem") CAPI gesprochen wird, ist immer der Treiber gemeint, während sich CAPI Doku. auf das Dokument bezieht, das die Schnittstelle definiert, die der Treiber für die Anwendung bereitstellt.

Noch eine kurze Bemerkung zum Schluß der Vorbereitungen:

Ich habe das Programm auf meinem Rechner entwickelt und auch getestet. Damit kann ich natürlich nicht gewährleisten, dass bei Ihnen alles fehlerfrei läuft. Wenn Sie auf ein Problem stoßen oder einen Fehler finden, wäre ich Ihnen sehr verbunden, wenn Sie mir Bescheid sagen würden..


Home Infos Download Links Feedback