FINEサーバ/FINEクライアントを実装する為のDelphi用コンポーネント。
http://kotomishome.hp.infoseek.co.jp/docs/soft/fine-c.lzh
TFINEServer†
FINEサーバを表すクラス。
プロパティ†
- Registration: boolean <public> R/W
FMOに登録するか
- ID: string <public> R/W
プロセスID
- HWnd: HWND <public> R/W
FINEサーバのHWnd
- Capability: TStringList <public> R/W
Capabilityプロパティ。1行に付き一つのCapabilityを設定する。
- Version: string <published> R/W
FINEサーバーのバージョン文字列
イベント†
TNotifyFINERequestRecieveEvent = procedure (Sender: TObject;
Rcv: TFINERequest; var StatusCode: Integer; var StatusString: string; var Extra: string)of object;
FINEリクエストを受信したときに発生する。
イベントハンドラ内でStatusCode、StatusString、Extraの値を設定すること。
TFINEClient†
FINEクライアントを表すクラス
プロパティ†
- Sender: string <published> R/W
FINEリクエストのSenderフィールドの値。クライアントの名称を設定する。
メソッド†
- function Count(Key: string): Integer
サーバの数を返す。
Keyの値はCapabilityの値を取り、該当のCapability値を持つサーバのみがリストアップされる。
- function Server(Key: string; Index: Integer): TFINEServer
サーバオブジェクトを返す。
Keyの値としてCapabilityの値を取り、該当のCapability値を持つサーバのみがリストアップされ、該当Index番号を持つ物が返される。
- function PostMessage(Value: TFINERequest; Target: TFINEServer;
var StatusString: string; var Extra: string): Integer
FINEリクエストを発行する。
Valueとしてリクエスト内容、Targetに送信先サーバーオブジェクトを取り、戻り値としてステータスコードが返る。
StatusStringとExtraにそれぞれの値が返る。
TFINERequest†
FINEリクエストを表すクラス
プロパティ†
- Reference[Index: Integer]: string <public> R/W
Reference値。Indexの上限は7まで。
- Charset: string <public> R/W
'Shift_JIS'など、文字コード指定を行う。
プロパティ†
メソッド†
- SetProperty(Name: string; Value: string)
プロパティ値のセット。名前と値を引数として取る。
- DelProperty(Name: string; Value: string)
プロパティ値の削除。名前と値を引数として取る。