/******************************************************************************
 *
 * Copyright (c) 2014 Antillia.com TOSHIYUKI ARAI. ALL RIGHTS RESERVED.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions, and the following disclaimer.
 *
 * 2. The name of the author may not be used to endorse or promote products
 *    derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 *
 *      Command.h
 *
 *****************************************************************************/


#pragma once

#include <oz++/motif/SelectionBox.h>
#include <Xm/Command.h>

namespace OZ {
  
class Command :public SelectionBox {
  
public:
  Command(View* parent, const char* name, Args& args)
  :SelectionBox(parent, name, xmCommandWidgetClass, args) 
  { 
  }
  
  Command()
  :SelectionBox()
  {
  }


  void create(View* parent, const char* name, Args& args)
  {
    SelectionBox::create(parent, name, xmCommandWidgetClass, 
        args);
  }

  void  appendValue(XmString xms) 
  {
    XmCommandAppendValue(getWidget(), xms);
  }
  
  void  error(XmString error) 
  {
    XmCommandAppendValue(getWidget(), error);
  }

  Widget  getChild(unsigned char child) 
  {
    return XmCommandGetChild(getWidget(), child);
  }
  
  Widget  commandText() 
  {
    return XmCommandGetChild(getWidget(), 
           XmDIALOG_COMMAND_TEXT);
  }
  
  Widget  promptLabel() 
  {
    return XmCommandGetChild(getWidget(), 
           XmDIALOG_PROMPT_LABEL);
  }
  
  Widget  historyList() 
  {
    return XmCommandGetChild(getWidget(), 
           XmDIALOG_HISTORY_LIST);
  }
  
  void  setValue(XmString xms) 
  {
    XmCommandSetValue(getWidget(), xms);
  }
};

}