iwunit1.pas

掌握delphi中网络编程工具的使用方法及常用函数的调用

unit IWUnit1;
{PUBDIST}

interface

uses
  IWAppForm, IWApplication, IWTypes, IWCompButton, Classes, Controls,
  IWControl, IWCompEdit;

type
  TformMain = class(TIWAppForm)
    IWEdit1: TIWEdit;
    IWButton1: TIWButton;
    procedure IWButton1Click(Sender: TObject);
  public
  end;

implementation
{$R *.dfm}

uses
  ServerController;

procedure TformMain.IWButton1Click(Sender: TObject);
begin
   IWButton1.Caption:=IWEdit1.Text;
   WebApplication.ShowMessage('Hello');
end;

end.