Generico definito nelle informazioni di debug delle unità

Question

Questo deve essere un errore Delphi ...

Ho un'unità che costituisce la base del mio framework di persistenza. In quell'unità ho una classe base per tutti i miei oggetti dominio, una classe lista e una classe lista generica.

Recentemente ho notato che quando eseguo il debug nell'unità durante il debug, l'esecuzione salterà a un punto un po 'più in basso nel file di quanto dovrebbe ... Forse quattro o cinque righe. Riordinare il file non fa differenza. Il codice genererebbe anche violazioni di accesso, ma solo quando l'ho debugato.

Ho provato a cercare il motivo per questo ... Sono venute in mente diverse cose, come l'iniezione di codice con il debugger (ad esempio this logitec webcam driver bug), o le informazioni di debug che non sono sincronizzate con la mia unità sorgente (es. il dcu veniva estratto da una vecchia fonte).

Alla fine ho acceso una macchina virtuale con un'installazione pulita di Windows + Delphi, ho afferrato solo ciò di cui avevo bisogno per testare l'unità e ho creato un piccolo progetto DUnit per testarlo. Stesso problema.

Quindi ho iniziato a rimuovere le cose dall'unità una alla volta finché non ha funzionato. L'unica cosa che ha fatto la differenza è stata quando ho rimosso la classe lista generica.

Qualcun altro ha visto questo problema? Qualcuno sa come aggirarlo?

Grazie in anticipo,

N @

Aggiornamento: Aggiunta del generico nell'unità rende il problema tornare, quindi non è un problema di stantio DCU.

Answer 1

Alla fine, l'unica soluzione che ho trovato che ha funzionato è stato quello di spostare l'elenco generico fuori dell'Unità.

Aggiornamento 2011-08-03 per rimpolpare meglio la mia soluzione:

avevo la mia classe generica lista di base definita nella mia unità Domain con la mia classe di base TDomainObject e una versione non generica.

Per risolvere il problema, ho spostato il generico in una seconda unità Domain.Generics che ha risolto il problema per me.

Quindi:

unit Domain; 

interface 

type 
    TDomainObject = class 
    //blah de blah 
    end; 

    TDomainObjectList = class (TDomainObject) 
    //more stuff 
    end; 

    TDomainListEnumerator = class 
    //etc 
    end; 

E:

unit Domain.Generics; 

interface 

type 

    TDomainObjectList<T: TDomainObject> = class (TDomainObjectList) 
    //stuff 
    public 
    property Items[AIndex: integer]: T read GetItem write SetItem; 

    type 
     TEnumerator = class (TDomainListEnumerator) 
     public 
     function GetCurrent: T; 
     property Current: T read GetCurrent; 
     end; 

    public 
    function GetEnumerator: TEnumerator; 

    end; 

Answer 2

Avete assicurato che tutte le linee dell'unità in questione finiscano in CR LF? Il debugger non può gestire solo CR o LF mentre l'editor può. Qualcosa come Notepad ++, TextPad, ecc. Può mostrarti se c'è una miscela. Caricarlo in [Windows] NotePad e ri-salvarlo può risolverlo.

Answer 3

Spesso questo stato di compilazione interno/esterno non è più sincronizzato.

Il primo passo è eliminare i file .dcu per il progetto, quindi riavviare Delphi, quindi eseguire una compilazione completa. Se il problema persiste, consulta Nick's answer.

--jeroen