Нужна помощь по схеме.

Форумы Помощь по пакетуНужна помощь по схеме. ← Ctrl1Ctrl →

Этот топик читают: Гость

Ответов: 38

Рейтинг: 8

#1: 2010-05-02 10:56:04 ЛС | профиль | цитата

Имеется вот такая небольшая схема.


Add(MainForm,2953706,21,105)
{
 Width=867
 Height=489
}
Add(Hub,89538,352,287)
{
 link(onEvent1,86104:doClear,[(393,293)(393,335)])
 link(onEvent2,37223:doSearch,[(398,300)(398,463)])
}
Add(ListBox,86104,420,322)
{
 Left=320
 Width=242
 Height=416
 Font=[Arial,8,0,0,1]
 AddType=1
}
Add(BlockFind,37223,420,457)
{
 IncludeBlock=1
 StartBlock="href=""
 EndBlock="""
 link(onSearch,86104:doAdd,[(464,463)(464,315)(410,315)(410,328)])
 link(Text,4161314:Page,[])
}
Add(WebBrowser,4161314,413,392)
{
 Width=321
 Height=416
 ParentFont=0
 URL="http://mail.ru/"
}
Add(Button,47479,277,239)
{
 Left=200
 Top=425
 Width=75
 Font=[Arial,8,0,0,1]
 Caption="Search"
 link(onClick,89538:doEvent1,[(331,245)(331,293)])
}
Add(WebBrowser,1037553,518,329)
{
 Left=561
 Top=1
 Width=280
 Height=425
}

Программа ищет на страничке все ссылки и добавляет их в ListBox.
Как сделать так, чтоб из листбокса этого ссылка прописывалась как текст в другой браузер URLом

Заранее огромное спасибо.
Тоесть при выборе пункта с ссылкой из этого листбокса эта ссылка открывалась в другом браузере.

карма: 1

файлы: 1 code_18044.txt [786B] [115]

Ответов: 1379

Рейтинг: 86

#2: 2010-05-02 11:13:36 ЛС | профиль | цитата

другой - это вообще другой процесс (например, mozilla firefox) или встроенный браузер?

карма: 0

Ответов: 38

Рейтинг: 8

#3: 2010-05-02 11:15:29 ЛС | профиль | цитата

Это второй компонент WebBrowser, тоесть не из которого брались ссылки.
в схеме видно


Add(MainForm,2953706,21,105)
{
 Width=867
 Height=489
}
Add(Hub,89538,352,287)
{
 link(onEvent1,86104:doClear,[(393,293)(393,335)])
 link(onEvent2,37223:doSearch,[(398,300)(398,463)])
}
Add(ListBox,86104,420,322)
{
 Left=320
 Width=242
 Height=416
 Font=[Arial,8,0,0,1]
 AddType=1
}
Add(BlockFind,37223,420,457)
{
 IncludeBlock=1
 StartBlock="href=""
 EndBlock="""
 link(onSearch,86104:doAdd,[(464,463)(464,315)(410,315)(410,328)])
 link(Text,4161314:Page,[])
}
Add(WebBrowser,4161314,413,392)
{
 Width=321
 Height=416
 ParentFont=0
 URL="http://mail.ru/"
}
Add(Button,47479,277,239)
{
 Left=200
 Top=425
 Width=75
 Font=[Arial,8,0,0,1]
 Caption="Search"
 link(onClick,89538:doEvent1,[(331,245)(331,293)])
}
Add(WebBrowser,1037553,518,329)
{
 Left=561
 Top=1
 Width=280
 Height=425
}

карма: 1

Ответов: 1379

Рейтинг: 86

#4: 2010-05-02 11:28:51 ЛС | профиль | цитата

ну вот так вот. добавлено соединение и изменен datatype в listbox на string
подправил

Add(Hub,89538,114,105)
{
 link(onEvent1,86104:doClear,[])
 link(onEvent2,37223:doSearch,[(144,118)(144,239)])
}
Add(ListBox,86104,161,98)
{
 Left=320
 Width=242
 Height=416
 Font=[Arial,8,0,0,1]
 AddType=1
 DataType=1
 Point(String)
 link(onClick,1037553:doNavigate,[])
}
Add(BlockFind,37223,161,233)
{
 IncludeBlock=1
 StartBlock="href=""
 EndBlock="""
 link(onSearch,86104:doAdd,[(205,239)(205,91)(151,91)(151,104)])
 link(Text,4161314:Page,[])
}
Add(WebBrowser,4161314,154,168)
{
 Width=321
 Height=416
 ParentFont=0
 URL="http://mail.ru/"
}
Add(Button,47479,67,105)
{
 Left=200
 Top=425
 Width=75
 Font=[Arial,8,0,0,1]
 Caption="Search"
 link(onClick,89538:doEvent1,[])
}
Add(WebBrowser,1037553,217,105)
{
 Left=561
 Top=1
 Width=280
 Height=425
 link(URL,86104:String,[(223,93)(200,93)(200,147)(188,147)])
}

карма: 0

файлы: 1 code_18046.txt [750B] [110]

Голосовали: Devilsoft

Ответов: 38

Рейтинг: 8

#5: 2010-05-02 11:36:23 ЛС | профиль | цитата

Вот за это спасибо. Чутьчуть правдо пришлось доработать, но всё получилось.
Не мог просто понять почему номер строки вылазил а не содержимое

Лови +
Проблема решена

карма: 1

Форумы Помощь по пакетуНужна помощь по схеме. ← Ctrl1Ctrl →


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