Class TForm1 (unit Advdde)

Inherits from

TForm

** Entered into the Public Domain by David A. Rigsby on December 29, 1995. ** Use this unit and Functions at your own risk. Feel free to modify and ** redistribute on the condition that any revisions keep this original ** header or in some way bears the name of the Author and those who may ** have modified and redistributed it. Always remember, Give Credit where ** Credit is due.... and you will feel SOOOOOOO Good about yourself.. ** Ompa loompa dompa de do.....

Constructors



Functions

procedure CBGroupsChange(Sender: TObject);

else imAppIcon.

procedure FormClose(Sender: TObject; var Action: TCloseAction);

** Instanciate our little TStringList ** Object so that we can use it.

procedure FormCreate(Sender: TObject);


procedure LBItemsClick(Sender: TObject);


Properties

Events

Variables

CBGroups : TComboBox;


DDEClient : TDdeClientConv;


imAppIcon : TImage;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


lbCmdLine : TLabel;


lbItemName : TLabel;


LBItems : TListBox;


lbWorkingDir : TLabel;



Constructors


Functions


procedure CBGroupsChange(Sender: TObject);

else imAppIcon.Picture.Clear; {* ** Get rid of the PChar storage we used


procedure FormClose(Sender: TObject; var Action: TCloseAction);

** Instanciate our little TStringList ** Object so that we can use it. If you ** try to address or reference the TStringList ** object you have declared BEFORE using the Create ** Method.. You WILL GPF! Also, If you get creative and ** Decide to sort the tsItems StringList, remeber to sort the ** LBItems Listbox as well or else all Havoc could break lose.


procedure FormCreate(Sender: TObject);


procedure LBItemsClick(Sender: TObject);


Properties


Events


Variables


CBGroups : TComboBox;


DDEClient : TDdeClientConv;


imAppIcon : TImage;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


lbCmdLine : TLabel;


lbItemName : TLabel;


LBItems : TListBox;


lbWorkingDir : TLabel;