Konvertierung von C nach Delphi

[venice2]

Zitat von mkinzler:

Das ist eine Funktion.

Jo habe mir so etwas gedacht nur wie lege ich das nach Delphi um?

Zitat:

convert the data to 8 bit

Wie?
Scheinen 16 Bit Daten zu sein die nach 8 Bit konvertiert werden müssen.

Code:

long Cnv16to8 (signed short *source,signed char *dest,unsigned long samples)
{
  unsigned long i;

  for (i=0;i<samples;i=i+2)
    dest[i>>1]=source[i]>>8;

  return i; 

}

Danke