2012-01-25 20 views
7

Bu birim XE2 Update 3'te "Dahili Hata: SY6315" hatasıyla derlenemiyor. XE'de böyle bir sorun yoktur.'Başlangıç' bölümündeki anonim yöntemlerle garip hata

unit Test; 

interface 

uses 
    SysUtils; 

var 
    Proc: TProc; 

implementation 

initialization 
    Proc := procedure 
    var ByteArr: array of Byte; 
    begin 
     SetLength(ByteArr, 10); 
    end; 

end. 

Bu sorunla ilgili herhangi bir deneyimi var mı?

Güncelleştirme: Bir QC raporu gönderdim: QC#102888.

+5

İç hataları kullanarak bir geçici çözüm, sen http://qc.embarcadero.com bu bildirmelidir. –

cevap

8

bir derleyici böcek gibi görünüyor, bu yüzey olmamalı TBytes

Proc := procedure 
    var 
    ByteArr: TBytes; 
    begin 
     SetLength(ByteArr, 10); 
    end; 
+3

+ 1, güzel cevap hey nasıl anladın? sade deneyim? – PresleyDias

+0

Ayrıca "bayt dizisi" çalışmaları için başka bir bildirilen tip kullanılıyorsa test ettiniz mi? Öyleyse, anonim yöntemlerde yerinde türlerini işleyen bir hatayı gösterir. –