Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.11.11;
Скачать: CL | DM;

Вниз

default-значение пирватного булёвого поля   Найти похожие ветки 

 
Ega23 ©   (2007-10-16 10:50) [0]

type
 TMyClass = class(...)
 private
   FMyBoolField : Boolean;
 end;

После создания экземпляра класса какое значение будет? Абсолютно точно False, или всё-таки переопределить конструктор и в нём явно прописать FMyBoolField := False;  ?


 
Суслик   (2007-10-16 10:51) [1]

false


 
Суслик   (2007-10-16 10:52) [2]

class function TObject.InitInstance(Instance: Pointer): TObject;
var
 IntfTable: PInterfaceTable;
 ClassPtr: TClass;
 I: Integer;
begin
 FillChar(Instance^, InstanceSize, 0);  PInteger(Instance)^ := Integer(Self);
 ClassPtr := Self;
 while ClassPtr <> nil do
 begin
   IntfTable := ClassPtr.GetInterfaceTable;
   if IntfTable <> nil then
     for I := 0 to IntfTable.EntryCount-1 do
   with IntfTable.Entries[I] do
   begin
     if VTable <> nil then
       PInteger(@PChar(Instance)[IOffset])^ := Integer(VTable);
   end;
   ClassPtr := ClassPtr.ClassParent;
 end;
 Result := Instance;
end;


 
Ega23 ©   (2007-10-16 10:53) [3]


>  FillChar(Instance^, InstanceSize, 0);


Всё понял, вопрос снят.

З.Ы.
Дима, перерегистрируй анкету.


 
Ins ©   (2007-10-16 10:55) [4]

Абсолютно точно, если вы конечно не перекроете NewInstance. Можете, кстати, посмотреть реализацию этого метода в классе TObject. Там видно, что память под экземпляр в самом начале заполняется нулями.


 
Сусл ©   (2007-10-16 10:58) [5]


> Дима, перерегистрируй анкету.

ок, я немного подрос.


 
Игорь Шевченко ©   (2007-10-16 11:03) [6]


> После создания экземпляра класса какое значение будет? Абсолютно
> точно False


До тех пор, пока Borland считает False нулем :)


 
Сусл ©   (2007-10-16 11:11) [7]

борланд нам не указ! пусть алм свою продают.



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

Текущий архив: 2007.11.11;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.022 c
15-1191387880
oxffff
2007-10-03 09:04
2007.11.11
CodeGear RAD Studio 2007 – the Smart Alternative


6-1173444998
vlavich
2007-03-09 15:56
2007.11.11
Проблема с установкой RAS соединения


8-1168878219
Denis_ka
2007-01-15 19:23
2007.11.11
Караоке-проигрыватель


2-1192522073
m-kirill-2003
2007-10-16 12:07
2007.11.11
Delphi и Mysql


15-1191917876
031178
2007-10-09 12:17
2007.11.11
Компоненты