blob: 0c874802b12a6e1383efa306b8ca629d0fc11ce4 (
plain) (
tree)
|
|
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "versesel.h"
#include <versekey.h>
//---------------------------------------------------------------------------
#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;
}
//---------------------------------------------------------------------------
|