Леонид, спасибо, но я пока новичек и видимо неспособен разобраться с вашим кодом. Возможно я неправильно поставил задачу. Хотелось бы чтото типа этого http://i54.fastpic.ru/big/2013/0111/ea/69ca95c4ac9cdd61d61a55c1c055aaea.jpg но не в конструкторе а уже в скомпилированном exeшнике Т е запускаю свою програмку, ввожу в поле слово , жму кнопку, получаю окно со списком полей где встречается это самое слово и фокусом на обьект выбранный из списка найденного Блин путано конечно Просто если вам не трудно воспользуйтесь поиском в конструкторе и подскажите как реализовать подобное в своей программке. Спасибо ------------ Дoбавленo в 00.58:Чую гдето рядом отгадка Сделал поиск в файле .sha с выводом результатов в ListBox (в список выводит параметр name (например слово - Три)в схеме 2 соответствия) Как теперь сделать чтобы при выборе строки в ListBox курсор перескакивал на соответствующий элемент, при выборе следующей строки - следующий элемент... и тд вобщем както выделялся Make(delphi) ver(4.04 build 184) Add(ChildScrollBox,3375844,224,14) { @Hint=#15:Спасибо olDjeka| FirstUsage=0 } BEGIN_SDK Add(EditMulti,6395808,21,21) { EventCount=1 WorkCount=2 Width=237 Height=207 link(doWork1,9102620:doSetFocus,[(84,27)(84,125)]) link(doWork2,12769341:doEvent1,[(-7,34)(-7,272)]) } Add(ScrollBox,9102620,147,105) { Left=4 Top=5 Width=1263 Height=901 Ctl3D=901 Point(onMouseWheel) Point(doSetFocus) link(onMouseWheel,6335071:doOperation,[(191,111)(191,147)(86,147)(86,174)]) } Add(Math,16577956,154,168) { @Hint=#14:-1 крутит вниз| OpType=1 ResultType=0 link(onResult,9102620:doVScroll,[(197,174)(197,155)(135,155)(135,118)]) link(Op1,9102620:VPos,[]) } Add(Math,6335071,98,168) { @Hint=#14:-1 крутит вниз| OpType=3 Op2=1.43 ResultType=0 link(onResult,16577956:doOperation,[]) } Add(BitBtn,9275062,63,245) { Top=-10 Width=180 Height=185 Font=[MS Sans Serif,8,0,4259584,1] Name="5" Caption="1" Data=String(file://localhost/C:/Documents%20and%20Settings/ves/Рабочий%20стол/default1.htm) Point(doSetFocus) link(onClick,4560149:doEvent1,[(247,251)(247,76)]) } Add(BitBtn,12744867,63,287) { Top=-200 Width=180 Height=185 Name="6" Caption="2" Data=String(file://localhost/C:/Documents%20and%20Settings/ves/Рабочий%20стол/default1.htm) link(onClick,5624864:doEvent2,[(408,293)(408,83)]) } Add(Hub,4560149,343,70) { InCount=100 OutCount=1 link(onEvent1,6666510:doEvent1,[(658,76)(658,293)]) } Add(Hub,5624864,420,70) { InCount=100 OutCount=1 link(onEvent1,6666510:doEvent2,[(732,76)(732,300)]) } Add(Hub,13123391,490,70) { InCount=100 OutCount=1 link(onEvent1,6666510:doEvent3,[(760,76)(760,307)]) } Add(Hub,2181583,560,70) { InCount=100 OutCount=1 link(onEvent1,6666510:doEvent4,[(788,76)(788,314)]) } Add(Hub,5573985,623,70) { InCount=100 OutCount=1 link(onEvent1,6666510:doEvent5,[(816,76)(816,321)]) } Add(Hub,6666510,833,287) { InCount=5 OutCount=1 link(onEvent1,6395808:onEvent1,[(859,293)(859,160)(246,160)(246,27)]) } Add(Hub,12769341,21,266) { } Add(BitBtn,12653220,63,329) { Top=-390 Width=180 Height=185 Name="7" Caption="3" Data=String(file://localhost/C:/Documents%20and%20Settings/ves/Рабочий%20стол/default1.htm) link(onClick,4560149:doEvent40,[(278,335)(278,349)]) } Add(ImgBtn,3070919,63,392) { Left=5 Top=182 Width=175 Height=180 Name="Три 123" } Add(ImgBtn,16661994,63,441) { Left=5 Top=367 Width=175 Height=180 Name="Три 2" } Add(ImgBtn,14753066,63,490) { Left=5 Top=742 Width=175 Height=180 Name="3" } Add(ImgBtn,3772497,63,532) { Left=5 Top=557 Width=175 Height=180 Name="4" } Add(SearchInFile,7590536,154,483) { FileName="C:program filesHiAsmProject3.sha" link(onSearch,13161790:doAdd,[(198,489)(198,541)(163,541)(163,489)]) link(Text,4529124:Text,[(167,461)(160,461)]) } Add(Button,16447967,105,483) { Left=200 Top=255 link(onClick,7590536:doSearch,[]) } Add(Edit,4529124,154,406) { Left=270 Top=255 Width=190 } Add(ListBox,13161790,245,483) { Left=230 Top=530 Width=550 SelectAdd=0 Point(onMouseLeave) link(onClick,9844879:doText,[(289,496)(289,562)(191,562)(191,629)]) link(onMouseLeave,9275062:doSetFocus,[(289,503)(289,381)(51,381)(51,258)]) } Add(Edit,9844879,203,623) { Left=200 Top=620 Width=340 } END_SDK Add(MainForm,16520918,7,7) { Width=1281 Height=942 link(onCreate,5402344:doEvent1,[(75,27)(75,20)]) } Add(Hub,5402344,112,14) { link(onEvent1,3375844:doWork1,[]) link(onEvent2,3375844:doWork2,[]) }
Спасибо
|