Недавно добавленные исходники

•  DeLiKaTeS Tetris (Тетрис)  364

•  TDictionary Custom Sort  3 501

•  Fast Watermark Sources  3 246

•  3D Designer  5 008

•  Sik Screen Capture  3 498

•  Patch Maker  3 703

•  Айболит (remote control)  3 906

•  ListBox Drag & Drop  3 166

•  Доска для игры Реверси  82 929

•  Графические эффекты  4 104

•  Рисование по маске  3 397

•  Перетаскивание изображений  2 769

•  Canvas Drawing  2 920

•  Рисование Луны  2 725

•  Поворот изображения  2 340

•  Рисование стержней  2 228

•  Paint on Shape  1 627

•  Генератор кроссвордов  2 311

•  Головоломка Paletto  1 824

•  Теорема Монжа об окружностях  2 330

•  Пазл Numbrix  1 720

•  Заборы и коммивояжеры  2 094

•  Игра HIP  1 315

•  Игра Go (Го)  1 263

•  Симулятор лифта  1 512

•  Программа укладки плитки  1 259

•  Генератор лабиринта  1 585

•  Проверка числового ввода  1 404

•  HEX View  1 539

•  Физический маятник  1 389

 
скрыть


Delphi FAQ - Часто задаваемые вопросы

| Базы данных | Графика и Игры | Интернет и Сети | Компоненты и Классы | Мультимедиа |
| ОС и Железо | Программа и Интерфейс | Рабочий стол | Синтаксис | Технологии | Файловая система |



Delphi Sources

Работа с большими массивами



Распределите память кучи с помощью GetMem. Если вы имеете:


var
  a, b: array [0..30000]: Integer;

то попробуйте:


type
  TBigArray = array [0..30000] of Integer;
var
  a, b: ^TBigArray;

и во внешнем блоке сделайте:


GetMem(a, SizeOf(TBigArray));
GetMem(b, SizeOf(TBigArray));

Также необходимо применять указатели на память вместо ссылок, например взамен:


a[0] := xxx;

необходимо использовать


a^[0] := xxx;





Похожие по теме исходники

Nstruct (работа с DBF)

Работа с принтером

fwZIP - Работа с ZIP архивами




Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software. Delphi World FAQ

Группа ВКонтакте