//--------------------------------------------------------------------------- #include #pragma hdrstop #include "versesel.h" #include //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TVerseSelFrm *VerseSelFrm; using namespace sword; //--------------------------------------------------------------------------- __fastcall TVerseSelFrm::TVerseSelFrm(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TVerseSelFrm::Edit1Change(TObject *Sender) { VerseKey trykey = Edit1->Text.c_str(); Panel2->Caption = (const char *)trykey; } //---------------------------------------------------------------------------