for supernewbie (логово извращенцев)

[destructor]

Сообщение от supernewbie

begin
asm
mov eax, [ebp+8]
mov this, eax
mov eax, [ebp+12]
mov format, eax
end;

эт чо?

Добавлено через 11 секунд

Сообщение от supernewbie

asm
mov eax, [ebp+16];
mov tmp1, eax
end;

а это?

Добавлено через 59 секунд

Сообщение от supernewbie

for i := 0 to length(format)-1 do
begin
if (format[i] = 'Q') or (format[i] = 'b') then
begin
params[k] := pointer(Integer(tmp1)+(k*4));
params[k+1] := pointer(integer(tmp1)+(k*4)+4);
Inc(k, 2);
end
else
begin
params[k] := pointer(integer(tmp1)+(k*4));
Inc(k);
end;

это ваще чо?