Скачать: CL | DM;

Breakpoint   Найти похожие ветки 

← →
Ricks ©   (2006-01-23 13:30) [0]

Что за странное поведение Delphi IDE? В использованном мною юните (который я сам написал) не стоят точки выполнения кода и все breakpoint"ы при запуске программы оказываются недействительными. Что бы это значило?

PS: Все dcu, dof и cfg я поудалял...

---

← →
begin...end ©   (2006-01-23 13:37) [1]

1. Не удалён ли участок кода оптимизатором?
2. Не отключена ли отладочная информация (Project -> Options -> Compiler -> Debug information)?

---

← →
Ricks ©   (2006-01-23 13:40) [2]

Участок кода не удален, так как в юните несколько процедур и ни на одной нет НИЧЕГО! :)
Отладочная информация не отключена!

:"(

---

← →
ZeroDivide ©   (2006-01-23 14:05) [3]

Подхватывается другой модуль.

---

← →
Eraser ©   (2006-01-23 14:06) [4]

> Ricks ©   (23.01.06 13:30)

Уточни - "твой юнит" это dll?

---

← →
Ricks ©   (2006-01-23 14:06) [5]

Я нашел причину этого! Но теперь становится еще непонятней. Вот кусочек кода:

const
MAP_SIZE  = 32;
MPS       = pred(MAP_SIZE);
DMX       = MAP_SIZE / 2;
DMY       = MAP_SIZE / 2;
OneBy8    = 1 / 8;
OneBy4    = 1 / 4;
MinValue  = 1 / 250;

type
TMapTerrain = ( tlBasic, tlGrass, tlIce );
TMapTile    = ( empty, full,  rbot,   bot, lbot, right, left, rtop,
                top, ltop, ldiag, rdiag, nolt,  nort, nolb, norb );

TTileMap    = array[ 0..MPS, 0..MPS ] of TMapTile;

TTerrainMap = array[ 0..MPS, 0..MPS ] of TMapTerrain;

TTextureCoordinates = array [1..4] of TBasicTextureVectors;
 
TMapVertex = packed record
 XY : TVector;
 UV : TBasicTextureVectors;
 CL : TColor3f;
end;

TMapQuad = packed record
 tile : TMapTile;
 vert : array [0..3] of TMapVertex;
end;

TMapLayer = packed record
 ID       : TMapTerrain;
 TexID    : Cardinal;
 IsEmpty  : boolean;
 TileSet  : TTileMap;
 AutoTile : TTileMap;
 Mesh     : array[ 0..MPS, 0..MPS ] of TMapQuad;
end;


А вот причина:

var
EMPTYLAYER : TMapLayer = (ID:tlBasic; IsEmpty:true);


???????????????????

---

← →
ZeroDivide ©   (2006-01-23 14:10) [6]

TMapLayer = class(TPersistent). Unit. MapObjects

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.044 c