{
GetAliasNames, Count example
}
MyStringList := TStringList.Create;
try
  Session.GetAliasNames(MyStringList);
  { fill a list box with alias names for the user to select from }
  for I := 0 to MyStringList.Count - 1 do
    ListBox1.Items.Add(MyStringList[I]);
finally
  MyStringList.Free;
end; 
