Вниз
Скачать: CL | DM;

record`ы   Найти похожие ветки 

← →
vassal   (2012-03-16 09:06) [0]

Нужно задать значения по умолчанию полям записи:

type TTableRow = record
Operation,
PlaceInd,
PlaceOPC,
Attrib:String[255];
empty,
error:boolean;
end;


Можно ли это сделать при объявлении типа, или нужно писать обработчик OnCreate? Как?(покажите пожалуйста на примере)


← →
Dimka Maslov ©   (2012-03-16 09:36) [1]

При объявлении типа нельзя. Только при объявлении переменной.


← →
vassal   (2012-03-16 11:14) [2]

Можно ли сделать OnCreate для своего типа (record), чтобы писать:

Row:=TTableRow.Create;


или лучше/проще написать функцию для присвоения дефолтных значений:
Row:=InitTableRow;


← →
CRLF   (2012-03-16 11:27) [3]

В последних версиях делфи можно record"у сделать конструктор.


> Row:=InitTableRow;
Лучше InitTableRow(var ARow: TTableRow). С функциями, возвращающими значения структурированного типа, надо быть осторожным.


← →
vassal   (2012-03-16 11:44) [4]

Спасибо!

А почему
> С функциями, возвращающими значения структурированного типа,
>  надо быть осторожным.
?


← →
CRLF   (2012-03-16 17:44) [5]

вкратце, потому, что освобождать память должен тот, кто её выделил.


← →
vassal   (2012-03-16 17:56) [6]

Так и думал что дело в работе с памятью. Спасибо.


← →
begin...end ©   (2012-03-16 18:13) [7]

const
 ConstRow: TTableRow =
   (Operation: "всё будет хорошо"; Attrib: "и даже ещё лучше"; Empty: True; Error: False);
var
 Row: TTableRow;
begin
 // установка значений полей по умолчанию
 Row := ConstRow;
 // установка значений других полей
 Row.PlaceInd := ...;
end


← →
CRLF   (2012-03-16 19:05) [8]

Прикольно... Даже не знал, что можно часть полей в типизированной константе оставить неинициализированными.



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

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



Память: 0.46 MB
Время: 0.059 c
2-1335505590
AV
2012-04-27 09:46
2013.03.22
Eureka ловит ошибку при закрытии прораммы с TidTelnet.


15-1338971575
Cobalt
2012-06-06 12:32
2013.03.22
Самый лучший сотрудник российского оделения Embarcadero


1-1268122509
Сергей М.
2010-03-09 11:15
2013.03.22
AV при использовании юнита Variants


15-1352916329
ПЛОВ
2012-11-14 22:05
2013.03.22
Не найден dcu


2-1344085484
MS Access
2012-08-04 17:04
2013.03.22
Сортировка по части поля




   Наверх