Вверх ↑
Этот топик читают: Гость
Ответов: 177
Рейтинг: 11
#1: 2012-06-20 13:35:45 ЛС | профиль | цитата
во-общем пришла мысль создать что-то вроде журнала,в программе.
вот цифры 1,2,3.... это ссылки,а рядом сам браузер,то есть по нажатию на кнопку открывается страница в браузере.
ну вот так вот и должно работать:
code_28258.txt
так вот,как сделать чтобы при нажатии на кнопку в браузере (в программе) открывалась заданная страница?
карма: 0

0
файлы: 1code_28258.txt [1.2KB] [88]
Ответов: 1173
Рейтинг: 49
#2: 2012-06-20 14:49:16 ЛС | профиль | цитата
Ты вот это имеешь ввиду?

Add(Button,6288509,189,168)
{
Left=80
Top=10
Caption="Google"
link(onClick,5549923:doWork2,[(251,174)(251,146)])
}
Add(WebBrowser,6463992,497,98)
{
Left=20
Top=40
Width=350
Height=210
link(URL,6045896:Value,[(503,86)(457,86)(457,142)(412,142)])
}
Add(StrList,14916595,357,91)
{
Strings=#20:http://www.hiasm.com|20:http://www.google.ru|
Point(doGetString)
Point(onGetString)
link(onGetString,6045896:doValue,[])
}
Add(ChanelToIndex,5549923,280,133)
{
link(onIndex,14916595:doGetString,[])
}
Add(Button,3064498,189,133)
{
Left=15
Top=10
Caption="HiAsm"
link(onClick,5549923:doWork1,[])
}
Add(Memory,6045896,406,98)
{
link(onData,6463992:doNavigate,[])
}
карма: 0

0
файлы: 1code_28259.txt [714B] [83]
Ответов: 704
Рейтинг: 44
#3: 2012-06-20 14:51:28 ЛС | профиль | цитата
Каждой кнопке предоставите ссылку на страницу в свойстве "Data"
или вот так


Add(MainForm,5047523,413,203)
{
Width=754
Height=581
}
Add(Button,740491,168,476)
{
Left=7
Top=47
Width=235
Height=25
Caption="2"
}
Add(WebBrowser,3675025,371,154)
{
Left=260
Top=15
Width=475
Height=445
Point(doFromText)
link(URL,13014210:String,[(377,141)(353,141)(353,211)(335,211)])
}
Add(Button,5149002,161,14)
{
Left=7
Top=11
Width=235
Height=25
Caption="1"
link(onClick,13878933:doWork1,[(226,20)(226,195)])
}
Add(Button,1774048,161,98)
{
Left=7
Top=127
Width=235
Height=25
Caption="4"
link(onClick,13878933:doWork3,[(210,104)(210,209)])
}
Add(Button,8276738,161,56)
{
Left=7
Top=86
Width=235
Height=25
Caption="3"
link(onClick,13878933:doWork2,[(218,62)(218,202)])
}
Add(Button,16304046,161,392)
{
Left=7
Top=207
Width=235
Height=25
Caption="6"
}
Add(Button,3088926,161,140)
{
Left=7
Top=166
Width=235
Height=25
Caption="5"
link(onClick,13878933:doWork4,[(203,146)(203,216)])
}
Add(Button,3067318,168,434)
{
Left=7
Top=287
Width=235
Height=25
Caption="8"
}
Add(Button,4996256,161,175)
{
Left=7
Top=246
Width=235
Height=25
Caption="7"
}
Add(Button,15245302,161,224)
{
Left=7
Top=357
Width=235
Height=25
Caption="10"
}
Add(Button,9026682,161,266)
{
Left=7
Top=321
Width=235
Height=25
Caption="9"
}
Add(Button,13137456,161,301)
{
Left=7
Top=437
Width=235
Height=25
Caption="12"
}
Add(Button,14581364,161,343)
{
Left=7
Top=396
Width=235
Height=25
Caption="11"
}
Add(StrList,13014210,308,147)
{
Strings=#20:http://www.Yandex.ru|18:http://www.Mail.ru|20:http://www.Google.ru|20:http://www.Hiasm.com|
Point(doGetString)
Point(onGetString)
Point(String)
link(onGetString,3675025:doNavigate,[])
}
Add(ChanelToIndex,13878933,259,189)
{
Count=4
link(onIndex,13014210:doGetString,[])
}

карма: 0

1
Голосовали:=G=S
Ответов: 1173
Рейтинг: 49
#4: 2012-06-20 14:56:59 ЛС | профиль | цитата
Kazbek17, нет, нужно подавать адрес на верхнюю точку. Он из потока урл не берёт, почему-то. К тому же, если кнопок будет много, то замучаешься прописывать и редактировать каждый адрес. Списком, ИМХО, легче и нагляднее.
Kazbek17 писал(а):
или вот так
А, да. Есть же точка String, что-то запамятовал
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#5: 2012-06-20 15:41:04 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2025-01-17 15:25:51
карма: 0

0
Ответов: 1173
Рейтинг: 49
#6: 2012-06-20 17:04:17 ЛС | профиль | цитата
Понял: чтобы УРЛ принимался, нужно поле URL в свойствах компонента очистить, там ведь по дефолту написано "about:blank" -- не берёт
Предупреждали бы...
карма: 0

0
Ответов: 177
Рейтинг: 11
#7: 2012-06-20 17:05:48 ЛС | профиль | цитата
спасибо,помогли!
и еще что бы листать журнал,как сделать переходы по страницам,ну допустим нажал 2 раза Enter или нажав на кнопку?
карма: 0

0
Разработчик
Ответов: 26324
Рейтинг: 2148
#8: 2012-06-20 17:09:17 ЛС | профиль | цитата
Ex_ писал(а):
Предупреждали бы...

Основы -> Циркуляция данных
карма: 22

0
Ответов: 1173
Рейтинг: 49
#9: 2012-06-20 17:11:28 ЛС | профиль | цитата
=G=S писал(а):
что бы листать журнал,как сделать переходы по страницам,ну допустим нажал 2 раза Enter или нажав на кнопку
Что-то не понятно ничего из твоего предложения.
карма: 0

0
Ответов: 177
Рейтинг: 11
#10: 2012-06-20 17:25:42 ЛС | профиль | цитата
Ex_ писал(а):

ну вот я читаю первую страницу (нажал на кнопку 1)
потом нужно,вторую страницу читать,а что-бы не нажимать кнопку 2,нажать под браузером кнопку "далее" или 2 раза кнопку энтер.
карма: 0

0
Ответов: 1173
Рейтинг: 49
#11: 2012-06-20 17:31:00 ЛС | профиль | цитата
=G=S, подключи счётчик и будет тебе счастье!

Add(MainForm,5047523,399,294)
{
Width=754
Height=581
}
Add(Button,740491,84,567)
{
Left=7
Top=47
Width=235
Height=25
Caption="2"
}
Add(WebBrowser,3675025,357,245)
{
Left=260
Top=15
Width=475
Height=445
URL=""
Point(doFromText)
}
Add(Button,5149002,77,105)
{
Left=7
Top=11
Width=235
Height=25
Caption="1"
link(onClick,13878933:doWork1,[(212,111)(212,286)])
}
Add(Button,1774048,77,189)
{
Left=7
Top=127
Width=235
Height=25
Caption="4"
link(onClick,13878933:doWork3,[(196,195)(196,300)])
}
Add(Button,8276738,77,147)
{
Left=7
Top=86
Width=235
Height=25
Caption="3"
link(onClick,13878933:doWork2,[(204,153)(204,293)])
}
Add(Button,16304046,77,483)
{
Left=7
Top=207
Width=235
Height=25
Caption="6"
}
Add(Button,3088926,77,231)
{
Left=7
Top=166
Width=235
Height=25
Caption="5"
link(onClick,13878933:doWork4,[(189,237)(189,307)])
}
Add(Button,3067318,84,525)
{
Left=7
Top=287
Width=235
Height=25
Caption="8"
}
Add(Button,4996256,77,266)
{
Left=7
Top=246
Width=235
Height=25
Caption="7"
}
Add(Button,15245302,77,315)
{
Left=7
Top=357
Width=235
Height=25
Caption="10"
}
Add(Button,9026682,77,357)
{
Left=7
Top=321
Width=235
Height=25
Caption="9"
}
Add(Button,13137456,77,392)
{
Left=7
Top=437
Width=235
Height=25
Caption="12"
}
Add(Button,14581364,77,434)
{
Left=7
Top=396
Width=235
Height=25
Caption="11"
}
Add(StrList,13014210,294,238)
{
Strings=#20:http://www.Yandex.ru|18:http://www.Mail.ru|20:http://www.Google.ru|20:http://www.Hiasm.com|
Point(doGetString)
Point(onGetString)
Point(String)
link(onGetString,3675025:doNavigate,[])
}
Add(ChanelToIndex,13878933,245,280)
{
Count=4
link(onIndex,12924404:doWork2,[])
}
Add(CounterEx,12229242,245,329)
{
Point(doPrev)
link(onNext,12924404:doWork3,[(284,335)])
}
Add(Button,11426925,182,364)
{
Left=260
Top=470
Caption="prev"
link(onClick,12229242:doPrev,[(230,370)(230,342)])
}
Add(Button,5422800,182,329)
{
Left=340
Top=470
Caption="next"
link(onClick,12229242:doNext,[])
}
Add(HubEx,12924404,280,280)
{
link(onEvent,13014210:doGetString,[])
}
Думаю, с установкой нужного числа счётчика по кнопкам "2", "3" и т.п. разберёшься.
Или же используй соответствующие точки у самого WebBrowser, но я счётчику больше доверяю
карма: 0

1
Голосовали:=G=S
Ответов: 177
Рейтинг: 11
#12: 2012-06-20 17:48:36 ЛС | профиль | цитата
Ex_ писал(а):

Спасиб! то что нужно!
Я что-то забросил все...ХИасм уже с полгода не включал,забыл все,и про счетчик,щас сново перебираю компаненты вспомнить все нужно
щас вот компанент Tabcontrol...нужен а его ни как вспомнить не могу... вот по форуму гуляю и справку сново перечитываю...
карма: 0

0
Ответов: 1173
Рейтинг: 49
#13: 2012-06-20 18:04:22 ЛС | профиль | цитата
=G=S писал(а):
справку сново перечитываю
Повторение -- мать учения (c)
карма: 0

0
Ответов: 177
Рейтинг: 11
#14: 2012-06-20 18:51:13 ЛС | профиль | цитата
Ex_ писал(а):

ага,
карма: 0

0
14
Сообщение
...
Прикрепленные файлы
(файлы не залиты)