lakomet написал(а):
И ещё вопрос как сделать всё то же самое для линя
В линуксе совсем другие API функции, поэтому я не знаю как сделать.
Вопросы новичка
Сообщений 271 страница 300 из 1000
Поделиться27217.04.2010 17:03:37
Пётр написал(а):
Ну сделай так (небольшое окно без рамки)
Хм рисунков нет. Не мог бы ты проект скинуть
Поделиться27317.04.2010 17:41:04
daiomik написал(а):
Хм рисунков нет. Не мог бы ты проект скинуть
Поделиться27417.04.2010 20:09:45
Пётр написал(а):
http://depositfiles.com/files/h21azhw1b
Спасибо. Все таки остановился на всплывающей надписи. Переработал под свой пример и возник вопрос. В процедуре создания главного окна у меня имеются следующие строчки, создающие всплывающую надпись:
Код:
TextGadget(100,1,1,82,16," Кликни здесь") SetGadgetColor(100,#PB_Gadget_BackColor,GetSysColor_(#COLOR_INFOBK)) HideGadget(100,1)
Далее: У меня имеется процедуря, которая при наведении на определенные координаты загружает курсор и показывает раннее созданную надпись:
Код:
Procedure kursor() myCursor=LoadCursor_(0,#IDC_HAND) SetCursor_(myCursor) GetCursorPos_(pt.POINT) ResizeGadget(100,WindowMouseX(#Window_0)-30,WindowMouseY(#Window_0)+20,#PB_Ignore ,#PB_Ignore ) HideGadget(100,0) EndProcedure
Вопрос: что бы не нагромождать код, как сделать так, что бы при наведении на определенную координату значение текста надписи менялось с " Кликни здесь" на мое нужное. То есть как то должно происходить условие в процедуре или еще что то.
Поделиться27517.04.2010 21:03:05
daiomik написал(а):
В процедуре создания главного окна у меня имеются следующие строчки, создающие всплывающую надпись:
Эту строку забыл
Код:
OpenWindow(100,0,0,84,18,"",#PB_Window_BorderLess|#PB_Window_Invisible,WindowID(0))
daiomik написал(а):
как сделать так, что бы при наведении на определенную координату значение текста надписи менялось с " Кликни здесь" на мое нужное
Как обычно, с помощью SetGadgetText изменяешь текст в гаджете с идентификатором 100.
Поделиться27617.04.2010 21:05:25
Пётр написал(а):
Эту строку забыл
а вообще для чего она. Ведь одно главное окно уже есть
Поделиться27717.04.2010 21:29:41
daiomik написал(а):
а вообще для чего она. Ведь одно главное окно уже есть
разобрался. Но теперь остался один вопрос: создал я к каждой требуемой части тела всплывающую надпись, но при перемещении мыши они как бы мерцают, то есть не плавно перемещаются. Уже и пробовал и SmartWindowRefresh(#Window_0,1), но лучше не стало. Может есть что то по этому поводу?
Поделиться27817.04.2010 21:38:43
daiomik написал(а):
они как бы мерцают, то есть не плавно перемещаются
Странно, у меня плавно перемещается и ничего не мерцает.
Поделиться27917.04.2010 21:46:47
Странно, но размер скомпилированной программы составляет 110 кб, а строк всего 195. Может эта строчка виновата:
Код:
UseJPEGImageDecoder() Global Image0 Image0 = CatchImage(0, ?Image0) DataSection Image0: IncludeBinary "F:\Doc\Проект ВолГМУ\Программа\body.jpg" EndDataSection
Поделиться28017.04.2010 22:17:34
daiomik написал(а):
Странно, но размер скомпилированной программы составляет 110 кб, а строк всего 195. Может эта строчка виновата:
UseJPEGImageDecoder() занимает 40КБ
Плюс к этому рисунок body.jpg при компиляции помещается в исполняемый файл, что тоже увеличивает размер EXE.
Можно не размещать рисунок в исполняемом файле, но по моему, не очень удобно тащить кучу рисунков в месте с исполняемым файлом.
Лучше уж внуть запихнуть.
Поделиться28118.04.2010 22:22:32
У меня есть Главное окно программы и 2 побочных (о программе и одно для действия, не важно вообщем). Проблема такого плана: при запуске программы как обычно главное окно появляется по центру. Далее я жму на кнопку и появляется второе окно (как то с мерцанием). Теперь, если я передвину главное окно и потом закрою побочное, то главное у меня автоматически "мерцнет" 
и окажется по центру. Странно как - то, при чем ни каких изменений при открывании и закрывании я не делал. Что это может быть?
Поделиться28218.04.2010 22:46:33
daiomik написал(а):
главное у меня автоматически "мерцнет" и окажется по центру
Скроее всего, оно в программе создаётся заново, но вот почему, нужно код смотреть.
Поделиться28318.04.2010 22:52:46
ну да, заново. ПРосто вызывается процедура, а в ней создается заново окно. Это можно как нибудь избежать?
Поделиться28418.04.2010 23:22:56
Ну не вызывай процедуру.
В чём собственно проблема?
Поделиться28519.04.2010 17:37:29
Пётр написал(а):
В чём собственно проблема?
разобрался. Такой вопрос: у меня txt лежит не рядом с проектом а во внутренней папке. В проекте, где нужно указать путь пишу: "\data\primer.txt" но ничего не происходит. Как правильно указывать путь?
Поделиться28619.04.2010 18:18:57
Попробуй так data\primer.txt
Поделиться28719.04.2010 18:28:21
Все получилось, это я тупанул. Первый раз без кавычек писал. 
Поделиться28819.04.2010 19:13:43
Не подскажете как производить поиск не в строке, а в полностью файле и брать по его результатом нужные мне куски текста.
Поделиться28919.04.2010 19:23:17
Загружаешь в память и ищешь.
Если файл текстовый, то можно загружать построчно.
Поделиться29019.04.2010 19:25:53
Хм..задам по другому: можно ли как нибудь зная номер первого символа текста и последнего вытащить кусок текста из памяти, то есть переменной
Поделиться29119.04.2010 19:49:44
daiomik написал(а):
можно ли как нибудь зная номер первого символа текста и последнего вытащить кусок текста из памяти, то есть переменной
Код:
BeginMem=10 ; Начало требуемого участка текста EndMem=20 ; Конец требуемого участка текста *PointMem ; Память с текстом Text.s=PeekS(*PointMem+BeginMem, EndMem-BeginMem)
Поделиться29219.04.2010 22:14:06
Скажите, а можно ли в PB используя кнопки сделать такой эфект при котором эти кнопки были бы связаны и например одна нажата. Если нажимаешь на другую, то все остальные отжимаются.
Поделиться29319.04.2010 22:47:45
Типа этого нужно?
Код:
Procedure ToggleButton(Gadget)
For i=1 To 8
If Gadget=i
SetGadgetState(i,1)
Else
SetGadgetState(i,0)
EndIf
Next i
EndProcedure
OpenWindow(0,0,0,120,290,"",#PB_Window_MinimizeGadget|#PB_Window_Invisible|#PB_Window_ScreenCentered)
y=10
For i=1 To 8
ButtonGadget(i,20,y,80,24,"Кнопка "+Str(i),#PB_Button_Toggle)
y+35
Next i
ToggleButton(1)
HideWindow(0,0)
Repeat
Event=WaitWindowEvent()
Gadget=EventGadget()
If Event=#PB_Event_Gadget
Select Gadget
Case 1 To 8
ToggleButton(Gadget)
EndSelect
EndIf
Until Event=#PB_Event_CloseWindowПоделиться29420.04.2010 18:21:32
Не могу справиться с проблемой следующего плана: есть определенный текст находящийся в переменной. Данный текст-ни одна строка. Как в этом тексте произвести поиск определенной части, при чем FindString тут не поможет, так как текст занимает несколько строк блокнота.
Поделиться29520.04.2010 18:56:05
Пётр написал(а):
Типа этого нужно?
да, спасибо, именно это
Поделиться29620.04.2010 19:32:38
daiomik написал(а):
Как в этом тексте произвести поиск определенной части, при чем FindString тут не поможет, так как текст занимает несколько строк блокнота
Но ведь текст в одной переменной.
Тогда почему по твоему мнению не будет работать FindString?
Или нужно текст разделить на строки?
Поделиться29720.04.2010 19:51:49
нужно из этого текста вытаскивать различного рода куски. Текст у меня находится в памяти. Структура текста:
Код:
термин-содержание-описание|||термин-содержание-описание|||термин-содержание-описание и тп
мне нужно зная название термина вытащить соответствующее содержание и название
Поделиться29820.04.2010 21:16:33
Это данные из чужого файла или свою структуру придумал?
Просто можно сделать всё намного проще, если данные в файлах хранятся.
Поделиться29920.04.2010 21:43:41
это моя структура. А как сделать проще??
Поделиться30020.04.2010 22:47:51
Данные хранятся в файле?
Если да, то можно использовать INI файлы, позволяющие создавать простые базы данных.
Похожие темы
| Вопросы новичка (продолжение…) | Вопросы по PureBasic | 26.02.2024 |
| Скорее, это теоретический вопрос о правах в директории. | OffTop | 16.09.2022 |
| Вопрос по отладке | Вопросы по PureBasic | 26.01.2017 |
| Три вопроса по созданию браузера. | Вопросы по PureBasic | 01.11.2010 |
| вопрос о точности типов данных | Вопросы по PureBasic | 20.05.2021 |