Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.453 Beiträge
Delphi 12 Athens
|
AW: Einem Set einen Enum zuweisen?
27. Aug 2017, 12:54
Hmmmm, war mir sicher, dass es sorum auch mal ging.
Auch nicht wirklich:
Delphi-Quellcode:
var
cnt: Integer;
dataSet: TDataSet;
enum: TDataEnum;
begin
Byte(dataSet) := $FF;
cnt := 0;
for enum in dataSet do begin
Inc(cnt);
end;
Assert(cnt = 2, 'Klappt nicht!');
end;
|