> 2 GB

[alexteam]

ещё какая-то фигня с MySQL

дай как догадаюсь... дллко просит поинтеры 4 байта.. а ты подсовываеш 8.

Даже java сборки довольствутся 3-4 ГБ даже с геодатой при маленьком онлайне. ))

+ никто не говорит что это должен быть 1 процесс.

[SeregaZ]

сервер wot на дельфи зафигачте.

[supernewbie]

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

supernewbie, ты таки не оставил попытку написать свой delphi l2 сервер? Зачем тебе так много памяти в процессе? Даже java сборки довольствутся 3-4 ГБ даже с геодатой при маленьком онлайне. ))

эт на будущее, малоли, вдруг у меня там будет 100к онлайна!!!11

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

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

дай как догадаюсь... дллко просит поинтеры 4 байта.. а ты подсовываеш 8.

не, не в этом была проблема, почему-то в компиляторе нельзя Connected:=true; сделать а в самом процессе можно, забил на это

Добавлено через 2 часа 8 минут
происходит эксцепшн при вызове:

var
  ar:array [word] of byte;

procedure check(a:array of byte; len:word);
begin
  
end;

begin
check(ar,1000);
end.

а вот так не происходит:

var
  ar:array [word] of byte;

procedure check(const a:array of byte; len:word);
begin
  
end;

begin
check(ar,1000);
end.

в чем прикол?

[etoken]

мб потому что при конст параметре нет копирования буфера ?
насколько я помню в дельфи через конст организована передача указателя, не ?

З.ы. если скранил - каюсь )

[Yegor]

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

мб потому что при конст параметре нет копирования буфера ?
насколько я помню в дельфи через конст организована передача указателя, не ?

З.ы. если скранил - каюсь )

передача с директивой const аналогична передаче с var только с запретом изменять передаваемую переменную. Тоесть переменная передается по ссылке.

Ошибка в первом случае скорее всего потому что delphi по какой то причине неправильно определяет размер передаваемого массива. ХЗ почему.

[supernewbie]

хех, баг репорт чтоль накатать в ембаркадеро

[xkor]

supernewbie, Yegor, проблема скорее всего не в том что дельфи не может размер массива определить, а в том что в первом случае в стек будет положен весь массив ar, и в стеке по видимому не хватает места (хотя 65 килобайт по идее в него бы должно было поместиться достаточно спокойно), хотя без текста ошибки ничего сказать точно нельзя.
Вот никак не могу понять, почему народ как минимум пытающийся строить из себя программистов (я уж молчу про тех кто ими и является), когда просит помочь избавиться от ошибки, очень редко предоставляет текст ошибки. Ладно ещё когда текст ошибки это "Access violation...", он как правило ни о чем не говорит если нет стека вызовов, но блин ошибки часто и другие бывают, и весьма информативные...

[supernewbie]

Exception class $C0000005 with message 'c0000005 ACCESS_VIOLATION'

и кстати это тока на 64 битном приложении, на 32 нормалды

[alexteam]

var
ar:array [word] of byte;

procedure check(const a:array of byte; len:word);
begin

end;

begin
check(ar,1000);
end.

мне когдато дестр надавал по шапке за то что в стек хлама кучу ложу.. теперь пытаюсь везде где это критично передавать "4 байта"
если ты не хочешь каждый раз при изменении длинны массива передергивать память то сделай хотябы воттак

type
  PData = ^TData;
  TData = packed record len:word; data: array[word] of byte; end;




procedure check(p:pdata);
begin
  while someshitcounter < p^.len do
    dosomeshit(p^.data[someshitcounter]);
end;

var
ar : tdata;
begin
check(ar, 100)

[supernewbie]

ваще че это за C0000005 она часто че-то вылетает в местах где раньше все работало

Добавлено через 3 минуты

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

мне когдато дестр надавал по шапке за то что в стек хлама кучу ложу.. теперь пытаюсь везде где это критично передавать "4 байта"
если ты не хочешь каждый раз при изменении длинны массива передергивать память то сделай хотябы воттак

type
  PData = ^TData;
  TData = packed record len:word; data: array[word] of byte; end;




procedure check(p:pdata);
begin
  while someshitcounter < p^.len do
    dosomeshit(p^.data[someshitcounter]);
end;

var
ar : tdata;
begin
check(ar, 100)

но ведь если передавать через const\var то идёт тоже самое, ну т.е. передается только поинтер или нет?