Вверх ↑
Ответов: 11
Рейтинг: 0
#1: 2020-08-18 08:25:59 ЛС | профиль | цитата
Доброе утро! Нашел почти нужную схему на форуме, + мне подсказали что если добавить пару компонентов, то можно решить мою проблему, но к сожалению как соединить её я в силу своей неопытности я не понимаю. Данная схема работает только если целиком вбивать домен сайта например www.сайт.ru. При вводе открывается браузер по умолчанию и переходит на искомый сайт. Подскажите пожалуйста как сделать так, что бы схема открывала поисковик с искомой фразой, т.е - я вбиваю в программу "привет привет" и например открывается браузер Яндекс с искомой фразой в поисковике, спасибо большое!


____________________________________________________

Add(MainForm,9760370,224,161)
{
}
Add(Button,11337299,224,217)
{
Left=270
Top=100
Caption="Add"
link(onClick,158642:doShellExec,[])
}
Add(Edit,7943623,280,119)
{
Left=50
Top=100
Width=215
Font=[Segoe UI,8,0,-16777216,1]
Text="Введи адрес..."
Point(onMouseDown)
Point(doFont)
link(onMouseDown,14645059:doFont,[])
}
Add(Font,14645059,329,133)
{
Font=[Segoe UI,8,0,0,1]
link(onFont,12348149:doEvent1,[])
}
Add(Hub,12348149,385,133)
{
link(onEvent1,7221380:doReplace,[])
link(onEvent2,7943623:doFont,[(415,146)(415,181)(268,181)(268,139)])
}
Add(Replace,7221380,427,133)
{
SubStr="Введи адрес..."
link(onReplace,7943623:doText2,[(481,139)(481,107)(268,107)(268,132)])
link(Str,12583050:Var3,[(433,120)(320,120)(320,166)])
}
Add(WinExec,158642,280,210)
{
@Hint=#7:WinExec
FileName="C:\\FlylinkDC++\\FlylinkDC.exe"
link(FileName,12583050:Var2,[])
AddHint(68,9,58,13,@Hint)
}
Add(GetDataEx,12583050,280,161)
{
link(Data,7943623:Text,[])
}
Add(Charset,2070752,427,266)
{
Type=6
}
Add(Charset,2408061,476,266)
{
Type=12
}
Add(StrCat,14786221,371,266)
{
}
|
карма: 0

0
Редактировалось 1 раз(а), последний 2020-08-18 10:57:53