Вверх ↑
Этот топик читают: Гость
Ответов: 35
Рейтинг: 0
#1: 2008-03-12 16:10:14 ЛС | профиль | цитата
Помогите мне вот в чем:
Есть список Яндекс, Гоогл, ХиАсм, вот, при нажатии на 1 открывается яндекс и так далее
Вот мои попытки:
И если возможно помогите сделать допустим кнопку добавить в список и сохранить все это в файл

code_8611.txt
карма: 0

0
файлы: 1code_8611.txt [948B] [232]
Ответов: 315
Рейтинг: 1
#2: 2008-03-12 18:50:23 ЛС | профиль | цитата
Странно у тебя схема сделана, помоему проще новую собрать, чем твое дорабатывать.


------------ Дoбавленo:


Держи, доделаешь, модернизируешь и используй


#sha
Add(MainForm,11003698,203,301)
{
Left=20
Top=105
Width=448
Height=411
}
Add(ComboBox,4630099,203,378)
{
Left=155
Top=350
Width=140
Height=21
Strings=#6:Яндекс|6:Google|5:HiAsm|
link(onClick,10021728:doEvent1,[])
}
Add(ChildFormEx,14157719,413,441)
{
Mode=2
}
BEGIN_SDK
Add(EditMultiEx,9618538,21,21)
{
WorkCount=#5:##add|
Width=412
Height=277
Point(##add)
}
Add(MainForm,4773822,35,196)
{
Left=35
Top=105
Width=332
Height=153
}
Add(Button,2020055,140,154)
{
Left=180
Top=90
Width=65
Caption="Сохранить"
link(onClick,7710772:doString,[])
}
Add(Button,7939885,189,224)
{
Left=255
Top=90
Caption="Отмена"
link(onClick,1710502:doWork2,[(233,230)(233,223)])
}
Add(Edit,3205439,105,35)
{
Left=25
Top=25
Width=285
Text=""
}
Add(Edit,5230988,217,70)
{
Left=25
Top=60
Width=285
Text=""
}
Add(Label,10797267,28,35)
{
Left=25
Top=10
Width=26
Height=12
Caption="URL"
}
Add(Label,9075208,35,42)
{
Left=25
Top=45
Width=54
Height=12
Caption="Название"
}
Add(FormatStr,7710772,210,154)
{
Mask="%1#%2
"
link(onFString,3082537:doEvent1,[])
link(Str1,3205439:Text,[(216,110)(111,110)])
link(Str2,5230988:Text,[])
}
Add(StrList,11071431,308,126)
{
FileName="Spisok.tmp"
}
Add(Hub,3082537,259,154)
{
OutCount=3
link(onEvent1,11071431:doAdd,[(299,160)(299,132)])
link(onEvent2,11071431:doSave,[])
link(onEvent3,1710502:doWork1,[(303,174)(303,196)(88,196)])
}
Add(HubEx,1710502,84,210)
{
Angle=2
link(onEvent,4773822:doClose,[(23,223)(23,223)])
}
END_SDK
Add(WebBrowser,5785167,336,259)
{
Left=5
Top=30
Width=430
Height=315
link(URL,5168663:Var1,[(342,247)(354,247)(354,443)])
}
Add(Button,4647690,322,441)
{
Left=5
Top=350
Width=65
Caption="Добавить"
link(onClick,14157719:##add,[])
}
Add(Button,14717946,287,511)
{
Left=80
Top=350
Width=65
Caption="Загрузить"
link(onClick,10814963:doEvent1,[])
}
Add(StrList,6180627,413,483)
{
FileName="Spisok.tmp"
}
Add(ArrayEnum,10320853,427,546)
{
link(onItem,3693612:doSplit,[])
link(Array,6180627:Array,[])
}
Add(Hub,10814963,343,511)
{
link(onEvent1,6180627:doLoad,[])
link(onEvent2,10320853:doEnum,[(401,524)(401,552)])
}
Add(StrPart,3693612,490,546)
{
Char="#"
link(onSplit,4630099:doAdd,[(534,552)(534,468)(198,468)(198,384)])
link(onPart,5480211:doAdd,[(534,559)(534,471)(324,471)(324,384)])
}
Add(ComboBox,5480211,364,378)
{
Left=295
Top=350
Width=140
Height=21
Visible=1
Strings=#12:http://ya.ru|17:http://google.com|16:http://hiasm.com|
DataType=1
Point(doSelect)
}
Add(Hub,10021728,252,385)
{
OutCount=3
link(onEvent1,5480211:doSelect,[(324,391)(324,426)])
link(onEvent2,5785167:doNavigate,[(310,398)(310,265)])
link(onEvent3,2866315:doText2,[(348,405)(348,265)])
}
Add(Edit,2866315,413,252)
{
Left=5
Top=5
Width=430
Text=""
link(Str,5168663:Var3,[(419,240)(370,240)])
}
Add(GetDataEx,5168663,357,434)
{
Angle=1
link(Data,5480211:String,[(384,443)])
}
Add(InfoTip,4933495,196,252)
{
Info=#6:GS_Lab|11:GRS.ucoz.ru|
}

карма: 0

0
Ответов: 35
Рейтинг: 0
#3: 2008-03-12 19:34:28 ЛС | профиль | цитата
Спасибо
карма: 0

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