Class TDelphiXDXPlayForm (unit DXPlayFm)

Inherits from

TForm

Constructors



Functions

procedure BackButtonClick(Sender: TObject);


procedure CancelButtonClick(Sender: TObject);

Session connection

procedure EditKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure FormDestroy(Sender: TObject);


procedure FormShow(Sender: TObject);


procedure JoinGamePlayerNameKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure JoinGameSessionListKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure NewGameClick(Sender: TObject);


procedure NewGamePlayerNameKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure NewGameSessionNameKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure NextButtonClick(Sender: TObject);


procedure NotebookPageChanged(Sender: TObject);


procedure ProviderListClick(Sender: TObject);


Properties

Events

Variables

BackButton : TButton;


Bevel1 : TBevel;


Bevel2 : TBevel;


CancelButton : TButton;


DXPaintBox1 : TDXPaintBox;


JoinGame : TRadioButton;


JoinGamePlayerName : TEdit;


JoinGameSessionList : TListBox;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


Label7 : TLabel;


Label8 : TLabel;


NewGame : TRadioButton;


NewGamePlayerName : TEdit;


NewGameSessionName : TEdit;


NextButton : TButton;


Notebook : TNotebook;


ProviderList : TListBox;


DPlay : IDirectPlay3A;


DXPlay : TCustomDXPlay;


PlayerName : string;


ProviderName : string;


SessionName : string;


FProviderGUID : TGUID;



Constructors


Functions


procedure BackButtonClick(Sender: TObject);


procedure CancelButtonClick(Sender: TObject);

Session connection


procedure EditKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure FormDestroy(Sender: TObject);


procedure FormShow(Sender: TObject);


procedure JoinGamePlayerNameKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure JoinGameSessionListKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure NewGameClick(Sender: TObject);


procedure NewGamePlayerNameKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure NewGameSessionNameKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure NextButtonClick(Sender: TObject);


procedure NotebookPageChanged(Sender: TObject);


procedure ProviderListClick(Sender: TObject);


Properties


Events


Variables


BackButton : TButton;


Bevel1 : TBevel;


Bevel2 : TBevel;


CancelButton : TButton;


DXPaintBox1 : TDXPaintBox;


JoinGame : TRadioButton;


JoinGamePlayerName : TEdit;


JoinGameSessionList : TListBox;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


Label7 : TLabel;


Label8 : TLabel;


NewGame : TRadioButton;


NewGamePlayerName : TEdit;


NewGameSessionName : TEdit;


NextButton : TButton;


Notebook : TNotebook;


ProviderList : TListBox;


DPlay : IDirectPlay3A;


DXPlay : TCustomDXPlay;


PlayerName : string;


ProviderName : string;


SessionName : string;


FProviderGUID : TGUID;