tagWNDCLASSEXA

type tagWNDCLASSEXA = record

  cbSize: UINT;

  style: UINT;

  lpfnWndProc: TFNWndProc;

  cbClsExtra: Integer;

  cbWndExtra: Integer;

  hInstance: HINST;

  _hIcon: HICON;

  hCursor: HCURSOR;

  hbrBackground: HBRUSH;

  lpszMenuName: PAnsiChar;

  lpszClassName: PAnsiChar;

  hIconSm: HICON;

end;