можно
в разделе type например:

TMyStruct = record
I : Integer;
Str : String;
Count : Float;
.....
end;

Потом объявляешь переменную этого типа:

var
Struct : TMyStruct

И используешь:

begin
Struct.I := 0;
.....