Czy ktoś mógłby zamienić mi to na delphi, tak żeby działało? Nie bardzo rozumiem o co chodzi w tych va_start
int gg_http_hash(const char *format, ...)
{
unsigned int a, c, i, j;
va_list ap;
int b = -1;
va_start(ap, format);
for (j = 0; j < strlen(format); j++) {
char *arg, buf[16];
if (format[j] == 'u') {
snprintf(buf, sizeof(buf), "%d", va_arg(ap, uin_t));
arg = buf;
} else {
if (!(arg = va_arg(ap, char*)))
arg = "";
}
i = 0;
while ((c = (unsigned char) arg[i++]) != 0) {
a = (c ^ b) + (c << 8);
b = (a >> 24) | (a << 8);
}
}
va_end(ap);
return (b < 0 ? -b : b);
}
ta funkcja jest TGGLite ale jej nie mam
czy ktoś z was posiada najnowszą wersję TGGLite i mógłby udostępnić ? byłbym wdzieczny, bardzo by mi sie przydała
pozdrawiam z gory thx