Registriert seit: 5. Mai 2008
Ort: Oberschwaben
1.275 Beiträge
Delphi 11 Alexandria
|
AW: TAPI - lineMakeCall - Format der Telefonnummer
5. Jun 2013, 07:16
Danke für all eure Tipps, ich habe es nun folgendermaßen gelöst. Ich nehme weiterhin alle möglichen Zeichen aus dem Telefonnummern-String raus, ersetze + durch 00 (alles wie zuvor) nun ersetze ich noch zusätzlich 0049 durch 0, damit meine Telefonanlage die Gespräche innerhalb Deutschlands auch schafft. Ob alles so klappt zeigt die Praxis
Delphi-Quellcode:
// überflüssige Zeichen entfernen (Leerzeichen, '-', '/', etc.)
aAddress := StringReplace(aAddress, ' ', '', [rfReplaceAll]);
aAddress := StringReplace(aAddress, '-', '', [rfReplaceAll]);
aAddress := StringReplace(aAddress, '/', '', [rfReplaceAll]);
aAddress := StringReplace(aAddress, '(', '', [rfReplaceAll]);
aAddress := StringReplace(aAddress, ')', '', [rfReplaceAll]);
aAddress := StringReplace(aAddress, '<', '', [rfReplaceAll]);
aAddress := StringReplace(aAddress, '>', '', [rfReplaceAll]);
// '+' durch '00' ersetzen (Ländervorwahl)
aAddress := StringReplace(aAddress, '+', '00', []);
if copy(aAddress, 1, 4) = '0049' then
begin // Unsere Telefonanlage kommt mit der eigenen Ländervorwahl nicht zurecht, deswegen weg damit. 03.06.2013
delete(aAddress, 2, 3);
end;
FillChar(callingNr, sizeof(callingNr), 0);
StrPCopy(callingNr, aAddress);
i := lineMakeCall(line, @call, callingNr, 0, @CallParams);
...
Hinter dir gehts abwärts und vor dir steil bergauf ! (Wolfgang Ambros)
Geändert von baumina ( 5. Jun 2013 um 07:20 Uhr)
|