StatusBar1->Panels->Items[1]->Text=ShortCutToText(ShortCut(Key,Shift));

위 코드는 StatusBar1에 Panels에 Item이 없기 때문입니다.
그러므로 Panel아이템을 추가해주면 됩니다.

[BCB에서 하는 방법]
1. StatusBar1를 마우스로 더블 클릭하거나
2. Object Inspector에서 Panels를 클릭하면 Panel을 추가할수 있습니다.
  
    그러면 Panel을 추가할수 있는 창이 나타납니다.
    거기서 하나이상 추가해 주시면 됩니다.

[coding으로..]

StatusBar1->Panels->Add();  //이렇게...



그럼...
    


김장희 님이 쓰신 글 :
: 상태바 만들기라는 예제 공부중인데 form1 에 statusBar1 을 위치시키고 책에있는 예제대로 소스를 넣었더니
:
: 에러가 나네요...ㅜ.ㅜ
:
: 소스가..
:
: #include <vcl.h>
: #pragma hdrstop
:
: #include "Unit1.h"
: //---------------------------------------------------------------------------
: #pragma package(smart_init)
: #pragma resource "*.dfm"
: TForm1 *Form1;
: //---------------------------------------------------------------------------
:
: //---------------------------------------------------------------------------
: void__fastcall TForm1::FormKeyDown(TObject *Sender,WORD &Key,TShiftState Shift)
:
: {
:   StatusBar1->Panels->Items[1]->Text=ShortCutToText(ShortCut(Key,Shift));
: }
:
: 입니다...제발 도와주세요....