Подключение к Quik и запуск DDE

Пробую подключение к Quik и запуск DDE из примеров (Sample, SampleSMA). Все происходит очень медленн...

2011-01-24T16:43:02Z

Пробую подключение к Quik и запуск DDE из примеров (Sample, SampleSMA).
Все происходит очень медленно, поискал по форуму, есть несколько сообщений с такими же проблемами.
Железо вроде не самое слабое (Phenom II X2 555/8Gb/SSD), система Windows 7 Ultimate 64bit.
Запускаются Quik и примеры от имени администратора.
Хотелось бы все-таки с помощью Михаила докопаться до возможных причин таких тормозов.

В связи с этим первый вопрос:
после установки соединения с Квиком через QuikTrader.Connect() и поступления события Connected секунд где-то через 10 в Квике появляется окно "Выбор активных счетов и задание их очередности", которое висит и пропадает где-то через 30 секунд.
Так и должно быть?

Вот код этого консольного приложения:

Код

          Console.WriteLine("Запуск...");

          try
          {
              var waitHandle = new AutoResetEvent(false);

              // создаем шлюз к Quik-у
              var trader = new QuikTrader(@"C:\FinamJunior\info.exe");

              // подписываемся на событие успешного подключения
              // все действия необходимо производить только после подключения
              trader.Connected += () =>
              {
                  Console.WriteLine("Подключение было произведено успешно.");

                  // извещаем об успешном соединени
                  waitHandle.Set();
              };

              Console.WriteLine("Производим подключение...");

              trader.Connect();

              // дожидаемся события об успешном соединении
              waitHandle.WaitOne();
              Console.ReadKey();

              trader.Dispose();
          }
          catch (Exception ex)
          {
              Console.WriteLine(ex);
              Console.ReadKey();
          }

Ура!!! Свершилось!!! Спасибо!!!

2011-08-08T08:16:56Z

Ура!!! Свершилось!!! Спасибо!!!

Exception поборол, в 3.2.6 будет это изменение. Спасибо большое! Теперь экспорт просто летает!!!

2011-08-07T17:32:35Z

Alexander

Exception поборол, в 3.2.6 будет это изменение.

Спасибо большое! Теперь экспорт просто летает!!!

Exception поборол, в 3.2.6 будет это изменение.

2011-07-19T06:22:17Z

Exception поборол, в 3.2.6 будет это изменение.

Урааа! Отдельное спасибо esper!

2011-07-19T04:22:08Z

Урааа![biggrin] Отдельное спасибо esper!

Exception возник при остановке экспорта. Буду разбираться. В любом случае - запуск \ остановка стала...

2011-07-18T19:56:43Z

Exception возник при остановке экспорта. Буду разбираться.

В любом случае - запуск \ остановка стала на порядки быстрее :)

На моей машине (Win 7) стало запускаться раз в 10 быстрее - я банально даже не успеваю просмотреть о...

2011-07-18T17:05:39Z

На моей машине (Win 7) стало запускаться раз в 10 быстрее - я банально даже не успеваю просмотреть окошки.
Вы большие молодцы, спасибо! [thumbup]

После закрытия основной сессии протестирую с 7 копиями квиков.

Получилось чего-нить?

2011-07-18T12:04:55Z

Получилось чего-нить?

Александр, можете попробовать собрать проект с такой вот функцией GetQuikWindows: static extern int ...

2011-07-18T09:44:53Z

Александр, можете попробовать собрать проект с такой вот функцией GetQuikWindows:

Код

[DllImport("user32.dll", SetLastError = true)]
static extern int GetWindowThreadProcessId(IntPtr hWnd, out int lpdwProcessId);

static int GetProcessId(IntPtr hwnd)
{
	int pid;
	GetWindowThreadProcessId(hwnd, out pid);
	return pid;
}

private static IEnumerable<SystemWindow> GetQuikWindows(Process process)
{
	if (process == null)
		throw new ArgumentNullException("process");

	return SystemWindow.FilterToplevelWindows(q => GetProcessId(q.HWnd) == process.Id);
}

Я не сразу допер... С новым предикатом ведь совсем все замечательно!!!

2011-07-18T09:20:50Z

Я не сразу допер... С новым предикатом ведь совсем все замечательно!!![drool]

А после такого измения кода как быстро стало отрабатывать? С измененным предикатом: EnumWindows time...

2011-07-18T09:05:48Z

Alexander

А после такого измения кода как быстро стало отрабатывать?

С измененным предикатом:

Цитата:

EnumWindows time: 00:00:00.0018250 Windows count: 393
AllToplevelWindows time: 00:00:00.0037758 Windows count: 0

без:

Цитата:

EnumWindows time: 00:00:00.0012580 Windows count: 393
AllToplevelWindows time: 00:00:00.3220401 Windows count: 0

Оставьте почту, отправлю весь QuikTerminal отправил в личку Это понятно... Время тратится на доступ ...

2011-07-18T09:04:16Z

Alexander

Оставьте почту, отправлю весь QuikTerminal

отправил в личку

Alexander

Это понятно... Время тратится на доступ к w.Process (см. #44) Я вот и говорю, может надо типа того че-то сделать

Если просто попробовать поменять предикат, как в предыдущем моем сообщении?

У меня это условие не очень сильно увеличивает время EnumWindows time: 00:00:00.0014281 Windows coun...

2011-07-18T09:04:10Z

esper

У меня это условие не очень сильно увеличивает время

Цитата:

EnumWindows time: 00:00:00.0014281 Windows count: 384
AllToplevelWindows time: 00:00:00.2985305 Windows count: 0

В 100 раз. Довольно сильно :)

У меня это условие не очень сильно увеличивает время Цитата: EnumWindows time: 00:00:00.0014281 Win...

2011-07-18T09:03:13Z

Цитата:

У меня это условие не очень сильно увеличивает время

Цитата:
EnumWindows time: 00:00:00.0014281 Windows count: 384
AllToplevelWindows time: 00:00:00.2985305 Windows count: 0

У вас окон 384 выводится, а у меня больше 700

Вообще, дело тут не в LINQ, дело в том, что SystemWindow.Process выполняет пару дополнительных дейст...

2011-07-18T09:03:01Z

esper

Вообще, дело тут не в LINQ, дело в том, что SystemWindow.Process выполняет пару дополнительных действий, в частности тормозит Process.GetProcessById

А после такого измения кода как быстро стало отрабатывать?

Вообще, дело тут не в LINQ, дело в том, что SystemWindow.Process выполняет пару дополнительных дейс...

2011-07-18T09:00:03Z

Цитата:

Это понятно... Время тратится на доступ к w.Process (см. #44) Я вот и говорю, может надо типа того че-то сделать:

Код



 var wins = SystemWindow.AllToplevelWindows.Where(w => w.ClassName.Contains("VBF")).Where(w => w.Process.Id == AppDomain.GetCurrentThreadId());

Эх, нету ни квика ни кода из QuikTerminal сейчас под рукой чтоб проверить[crying]

P.s. посмотреть бы как это все используется в S#... Alexander, можете показать эту часть исходника? ...

2011-07-18T08:58:00Z

esper

P.s. посмотреть бы как это все используется в S#... Alexander, можете показать эту часть исходника?

Оставьте почту, отправлю весь QuikTerminal

При этом время увеличивапется, если добавить условие на Linq var wins = SystemWindow.AllToplevelWind...

2011-07-18T08:49:33Z

Артем_2

У меня это условие не очень сильно увеличивает время

Цитата:

EnumWindows time: 00:00:00.0014281 Windows count: 384
AllToplevelWindows time: 00:00:00.2985305 Windows count: 0

Код

namespace ConsoleApplication3
{
	using System;
	using System.Diagnostics;
	using System.Linq;
	using System.Runtime.InteropServices;
	using ManagedWinapi.Windows;

	internal class Program
	{
		#region Delegates

		public delegate bool CallBackPtr(int hwnd, int lParam);

		#endregion

		[DllImport("user32.dll")]
		public static extern int EnumWindows(CallBackPtr callPtr, int lPar);

		[DllImport("user32.dll", SetLastError = true)]
		static extern int GetWindowThreadProcessId(IntPtr hWnd, out int lpdwProcessId);

		static int GetProcessId(IntPtr hwnd)
		{
			int pid;
			GetWindowThreadProcessId(hwnd, out pid);
			//Process.GetProcessById(pid);
			return pid;
		}

		private static void Main()
		{
			var watch = Stopwatch.StartNew();
			
			var windowsCount = 0;
			EnumWindows((hwnd, lParam) =>
			{
				windowsCount++;
				return true;
			}, 0);
			
			watch.Stop();
			Console.WriteLine("EnumWindows time: {0} Windows count: {1}", watch.Elapsed, windowsCount);

			watch = Stopwatch.StartNew();
			//var wins = SystemWindow.AllToplevelWindows.Where(w => w.Process.Id == AppDomain.GetCurrentThreadId()).ToArray();
			var wins = SystemWindow.FilterToplevelWindows(w => GetProcessId(w.HWnd) == AppDomain.GetCurrentThreadId());
			watch.Stop();
			Console.WriteLine("AllToplevelWindows time: {0} Windows count: {1}", watch.Elapsed, wins.Length);

			Console.ReadLine();
		}
	}
}

P.s. посмотреть бы как это все используется в S#... Alexander, можете показать эту часть исходника?

Видимо, время тратится на доступ к w.Process Может быть тогда можно попробовать для получения окон к...

2011-07-18T08:44:42Z

Видимо, время тратится на доступ к w.Process

Может быть тогда можно попробовать для получения окон квика сначала ограничить выборку из AllToplevelWindows по какому-нить нетормозному признаку (по ClassName или еще как), а потом уже фильтровать по w.Process

При этом время увеличивапется, если добавить условие на Linq var wins = SystemWindow.AllToplevelWind...

2011-07-18T08:30:03Z

При этом время увеличивапется, если добавить условие на Linq

var wins = SystemWindow.AllToplevelWindows.Where(w=>w.Process.Id == AppDomain.GetCurrentThreadId()).ToArray();
, тогда

EnumWindows time: 00:00:00.0009348 Windows count: 730
AllToplevelWindows time: 00:00:00.9365030 Windows count: 0

Видать, зря я EnumWindows так катигорично забраковал