type
  TMyStuct=record
    Data1 : integer;
    Data2 : String;
  end;

解决方案 »

  1.   

    type
      TFRAME_INFO=record
        nWidth : Longint;
        nHeight : Longint;
        nStamp : Longint;
        nType :Longint;
        nFrameRate : Longint;
      end;
      

  2.   

    type
      TFRAME_INFO=record
        nWidth : Longint;
        nHeight : Longint;
        nStamp : Longint;
        nType :Longint;
        nFrameRate : Longint;
      end;
      

  3.   

    如果你是指类似于c中的structure的话,那么:
    type
      TStudent = record
        name: string;
        sex:string;
        age:Integer;
      end;
    var
      aStudent:TStrudent;