![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Работа с ActiveX ;компонентом MS Agent 2.0 [D6, WinXP]
DPro © (2002-03-09 01:01:00)Кто может знает или есьт опыт работы с ним. Мне нужно немного примеров.
Sergey_n (2002-03-09 02:42:00) [1]Ну а дальше читай ету статью или SDK по Microsoft Agent 2.0, оно есть в MSDN.
DPro (2002-03-09 02:41:00) [2]Благодарен вам Sergey_n!
Sergey_n (2002-03-09 02:39:00) [3]1. Ставиш етот контроль в Delphi. Меню Component->Import ActiveX Control...
2. Вытаскиваешь на форму этот компонент
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
OleCtrls, AgentObjects_TLB, StdCtrls;
type
TForm1 = class(TForm)
Agent1: TAgent;
Button1: TButton;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
Agent: IAgentCtlCharacterEx;
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.FormCreate(Sender: TObject);
begin
Agent1.Characters.Load("my character", "merlin.acs");
Agent := Agent1.Characters.Character("my character");
Agent.Show(0);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Agent.Think("Готово!!!");
end;
end.
DPro (2002-03-09 02:26:00) [4]Видно заглох мой вопрос!?
DPro (2002-03-09 02:15:00) [5]Да я читал в журнале Программист, но перевести на Delphi не смогу может поможеш?!
Sergey_n (2002-03-09 02:06:00) [6]Могу намылить статью "Использование Microsoft Agent в Visual Basic", не думаю, что работа с ним в Delphi будет чемто отличаться.
DPro (2002-03-09 01:57:00) [7]Ну ты жнаешь новерно такую программу как Magic Gody. Там такой персонаж каторый делает всекие приколы что то говорит и так далие. Да и MS Officeтоже есть агенты скрепка, мячик и т.д.
Вообщем их можно вызывать застовлять что то говорить и многое другое. Короче вещь прикольная и в твоей проге будет скрашивать
нудный и скучный интерфейс.
Dimk (2002-03-09 01:32:00) [8]Прости что сам спрашиваю - а что он собственно делает.
Я тут разное про него слышал - объясни популярно :0)