//--------------------------------------------------------------------------- #include #pragma hdrstop #include "FloatingWin.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "RzEdit" #pragma resource "*.dfm" TFloatingWindow *FloatingWindow; //--------------------------------------------------------------------------- __fastcall TFloatingWindow::TFloatingWindow(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TFloatingWindow::editKeyPress(TObject *Sender, char &Key) { if(Key==VK_RETURN){ ModalResult = mrOk; } } //--------------------------------------------------------------------------- void __fastcall TFloatingWindow::FormActivate(TObject *Sender) { edit->SelectAll(); } //---------------------------------------------------------------------------