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

E1508. Лечиться ли Delphi 7?   Найти похожие ветки 

← →
oxffff ©   (2007-02-02 16:44) [0]

type
TSlyObject=class(TObject,Iunknown)
protected
lUnknown:IUnknown;
property Unknown:IUnknown read lUnknown implements Iunknown;
public
end;

procedure TForm1.Button1Click(Sender: TObject);
var a:TSlyObject;
    b:Iunknown;
begin
a:=TSlyObject2.Create;
b:=a; //Internal error here E1508.
end;

Delphi 2006 Sp2 не страдает этим.

Если bug fix для delphi 7

---

← →
oxffff ©   (2007-02-02 16:45) [1]

TSlyObject2=TSlyObject

---

← →
clickmaker ©   (2007-02-02 16:58) [2]

> oxffff ©   (02.02.07 16:44)

а почему не TInterfacedObject?

---

← →
oxffff ©   (2007-02-02 17:08) [3]

> а почему не TInterfacedObject?


Хочется в зависимости от необходимость инстанцировать объекты, которые либо ref, либо NoRef counting. + динамически менять поведение Iunknown.

Я уже давно сталкнулся с этими проблемами.

Но тогда решал их так.
b:=a as Iunknown вместо b:=a; //Internal error here E1508.

Что делать если компилятор не совершенен.

Но здесь этот финт не проходит.

---

← →
clickmaker ©   (2007-02-02 17:18) [4]

> [3] oxffff ©   (02.02.07 17:08)

у меня этот код работает
D7 Build 8.1 (Update Pack 1)

---

← →
oxffff ©   (2007-02-02 17:31) [5]

> clickmaker ©   (02.02.07 17:18) [4]
>
> > [3] oxffff ©   (02.02.07 17:08)
>
> у меня этот код работает
> D7 Build 8.1 (Update Pack 1)


У меня D7 4.453

Не могли ли вы предоставить link на update 1  
на free  :)

---

← →
clickmaker ©   (2007-02-02 17:34) [6]

ftp://ftpd.borland.com/devsupport/delphi/d7/update1r2/Delphi_71_Ent_Update_Inline/d7_ent_upd1_1.exe

---

← →
oxffff ©   (2007-02-02 17:34) [7]

> Не могли ли вы предоставить link на update 1  


Ой я что-то обленился. Не утруждайтесь. Саму надо бы поискать.
Да 3 недели дома и воспаление легких дают знать. :)

---

← →
oxffff ©   (2007-02-02 17:35) [8]

> ftp://ftpd.borland.com/devsupport/delphi/d7/update1r2/Delphi_71_Ent_Update_Inline/d7_ent_upd1_1.
> exe


Ого. Огромнейшее спасибо.

---

← →
oxffff ©   (2007-02-02 20:15) [9]

> clickmaker ©   (02.02.07 17:34) [6]
> ftp://ftpd.borland.com/devsupport/delphi/d7/update1r2/Delphi_71_Ent_Update_Inline/d7_ent_upd1_1.
> exe


Поставил update.
Уже internal error E1513.

Первый раз компилируешь при
b:=a; internal error E1513.

Меняешь на b:=a as iunknown; Работает.

НО!!!

internal error E1513. Вылетаешь и при b:=a as iunknown.
меняешь на b:=a; Работает.
Чудеса.!!!

---

← →
ЮЮ ©   (2007-02-03 10:58) [10]

Делай билд, а не компиле или компилируй из командной строки, убивая dcu-шки, и будет работать всегда :)

---

← →
oxffff ©   (2007-02-03 14:36) [11]

> ЮЮ ©   (03.02.07 10:58) [10]


> Делай билд, а не компиле или компилируй из командной строки,
>  убивая dcu-шки, и будет работать всегда :)


Да полный Rebuild помогает. Благодарю вас.

---

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

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



Память: 0.47 MB
Время: 0.031 c