t_id
764
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
525685615 | 948227 | True | False | Successfully run |
Record count: 1
{$MODE OBJFPC } type TestRec = record fString : AnsiString; fInt1 : Longint; fInt2 : Longint; fRetAddr : Longint; end; function GetGroupInfo: TestRec; begin fillchar(Result, Sizeof(Result), 0); Result.fRetAddr := 0; end; function SelectGroup: TestRec; begin Result := GetGroupInfo; end; begin SelectGroup; end.