#ifndef OverbyteIcsWhoisCliTst1H
#define OverbyteIcsWhoisCliTst1H

#include <System.Classes.hpp>
#include <Vcl.Controls.hpp>
#include <Vcl.StdCtrls.hpp>
#include <Vcl.Forms.hpp>
#include <Vcl.ExtCtrls.hpp>

#include "OverbyteIcsTypes.hpp"
#include "OverbyteIcsWhoisCli.hpp"

const int WM_APPSTARTUP = WM_USER + 1;

class TWhoisDemoForm : public TForm
{
__published:
    TMemo *DisplayMemo;
    TPanel *Panel1;
    TButton *QueryButton;
    TButton *CancelButton;
    TComboBox *HostEdit;
    TLabel *Label1;
    TLabel *Label2;
    TIcsWhoisCli *WhoisCli1;
    TButton *CloseButton;
    TRadioGroup *WhoisMethod;
    TComboBox *QueryEdit;
    void __fastcall QueryButtonClick(TObject *Sender);
    void __fastcall WhoisCli1QueryDone(TObject *Sender, System::Word Error);
    void __fastcall CancelButtonClick(TObject *Sender);
    void __fastcall FormShow(TObject *Sender);
    void __fastcall CloseButtonClick(TObject *Sender);
    void __fastcall FormCreate(TObject *Sender);

private:
    void __fastcall WMAppStartup(TMessage &Msg);

public:
    __fastcall TWhoisDemoForm(TComponent *Owner);

BEGIN_MESSAGE_MAP
    VCL_MESSAGE_HANDLER(WM_APPSTARTUP, TMessage, WMAppStartup)
END_MESSAGE_MAP(TForm)
};

extern PACKAGE TWhoisDemoForm *WhoisDemoForm;

#endif