![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Доброго всем времени суток.
Имеется программа которая при работе подгружает локальную страницу html. В этой странице используется функция на JS, принимающая параметры. Функция выглядит так: Код:
function getArgs() { var args = new Object(); var query = location.search.substring(1); // Get query string // могут подсунть с кавычками, нужно их убрать if(query.indexOf('%22') >= 0) query = query.split('%22').join('') if(query.indexOf('"') >= 0) query = query.split('"').join('') var pairs = query.split("&"); // Break at ampersand for(var i = 0; i < pairs.length; i++) { var pos = pairs[i].indexOf('='); // Look for "name=value" if(pos == -1) continue; // If not found, skip var argname = pairs[i].substring(0, pos); // Extract the name var value = pairs[i].substring(pos + 1); // Extract the value value = decodeURIComponent(value); // Decode it, if needed args[argname] = value; // Store as a property } return args; // Return the object } дальнейшее использование той же программой выглядит так: Код:
var params = getArgs(); var param1 = Number(params['par1'] ? params['par1'] : 0) / 100; var param2 = Number(params['par2'] ? params['par2'] : 0) / 100; var Param3 = Number(params['par3'] ? params['par3'] : 0) / 100; Вопрос: Возможно ли отправить из моего Delphi приложения сторонней программе аргументы той самой функции getArgs. Если это возможно, подскажите пожалуйста как это можно соорудить. А то всю голову сломал уже... Заранее благодарю. Последний раз редактировалось Wikly, 02.08.2013 в 11:37. |