Record als Funktionsrückgabe

[Deep-Sea]

Zitat von fly_singapore:

Delphi-Quellcode:

function new_calc(cWert: string) : TRGW;

var

  rRecord : TRGW;

begin 
    rRecord.iAnzahl = '3302';
    rRecord.sDS = '12';
    rRecord.sMin = '4';
    rRecord.sMax := '34';

new_calc := rRecord;
end;

Bitte doch eher so:

Delphi-Quellcode:

function new_calc(cWert: string): TRGW;
begin 
  Result.iAnzahl = '3302';
  Result.sDS = '12';
  Result.sMin = '4';
  Result.sMax := '34';
end;