Weiß jemand die neue Adresse ?

[QuickAndDirty]

Ja die Einzig Guten Kompos für sowas, ich hab dann noch einen Bug entfernt

Delphi-Quellcode:

 
procedure TCapiISDN.ProcessSending(aConnection:TConnection);
var aConnectionInfo:TConnectionInfo;
    alawAdr,wavadr:pointer;
    aSize:integer;
begin
    if assigned(aConnection) then
      aConnectionInfo:=FConnectionInfos.IDITems[aConnection.ID]
    else
      aConnectionInfo:=Nil;
    if assigned(aConnectionInfo) then begin
      while (aConnection.B3DataQueue.count<_CapiBDataBlocks) and (aConnectionInfo.SendingMode<>smNone) do begin
           if aConnectionInfo.SendingMode = smWave then begin
              getmem(alawAdr,_CapiBDataLen);
              getmem(wavAdr,2*_CapiBDataLen);
              fillchar(alawAdr^,_CapiBDataLen,0);
              aSize:=2*_CapiBDataLen;
              Wave.Read(aConnectionInfo.PWavFile,wavAdr,aSize);
              MoveWavtoALaw(wavAdr,ALawAdr,aSize);

              (****************A.R.  4. April 2005************************)
              //Wegen des KNACK am Ende der Datei auskommentiert
              //FCapi.AddB3Data(aConnection,alawAdr,_CapiBDataLen,0);

              //Statt dessen    aSize div 2   verwenden da es nur Daten in
              //die Queue schiebt die Ton kodieren.
              FCapi.AddB3Data(aConnection,alawAdr,asize div 2,0);

              freemem(alawAdr,_CapiBDataLen);
              freemem(wavAdr,2*_CapiBDataLen);
           end;
      end;
      FCapi.TransferB3Data(aConnection);
    end else if not assigned(aConnectionInfo) then
     showmessage('CI NA');
end;

Kann man diese Komponenten eigentlich irgendwo ins Forum einstellen, so das man sie leicht findet?
Hat es jemand von euch geschafft Konntakt mit Dirk Rübenbach aufzunehmen? Auf Emails antwortet er damals nicht.

[DevStar]

Zitat:

Zitat von QuickAndDirty

Ja die Einzig Guten Kompos für sowas, ich hab dann noch einen Bug entfernt

Ja, nur das der Knack am Ende jetzt noch schlimmer geworden ist.