Подключение к 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

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

Alexander: 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 будет это изменение.

Урааа![biggrin] Отдельное спасибо 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: [DllImport("user32...

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);
}

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

2011-07-18T09:20:50Z

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

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

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

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

2011-07-18T09:04:16Z

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

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

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

2011-07-18T09:04:10Z

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

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 Wind...

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

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

2011-07-18T09:03:01Z

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

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

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

2011-07-18T09:00:03Z

Вообще, дело тут не в LINQ, дело в том, что SystemWindow.Process выполняет пару дополнительных действий, в частности тормозит Process.GetProcessById Это понятно... Время тратится на доступ к w.Process (см. #44) Я вот и говорю, может надо типа того че-то сделать:



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

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

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

2011-07-18T08:58:00Z

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

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

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

2011-07-18T08:49:33Z

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

var wins = SystemWindow.AllToplevelWindows.Where(w=>w.Process.Id == AppDomain.GetCurrentThreadId()).ToArray();

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

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

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

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 так катигорично забраковал