Заметил, что когда удаляю этот код, ошибка пропадает. Но тогда как мне сделать еще 3 подсказки???
code_27528.txt
------------ Дoбавленo в 00.21:
Всё сам разобрался. Эта ошибка, runtime error 216, перестала вылетать после того как я выбрал другой компилятор
Также хочу выложить код всплывающей подсказки (hint), так как на форуме я не нашел рабочий, пришлось самому делать из той, которую мне дал tomas (спасибо ему).
Вот код
Make(delphi)
ver(4.04 build 184)
Add(MainForm,2953706,322,91)
{
Position=1
}
Add(Button,3793205,280,161)
{
Left=150
Top=105
HintManager="333"
Point(Handle)
}
Add(UserHintManager,4138560,133,343)
{
Name="333"
link(onChangeHint,12311373:doTimer,[(212,349)(212,286)])
link(onHide,11405745:doTimer,[(217,363)(217,409)])
}
Add(BaloonToolTips,13835737,434,343)
{
Title="Подсказка"
link(Handle,3793205:Handle,[(440,226)(286,226)])
link(Text,2374724:Text,[(447,268)(335,268)])
}
Add(StrList,2374724,329,168)
{
Strings=#47:Вот подсказка, которая будет вылетать у людей=)|26:Спасибо кто помог сделать.|
}
Add(Timer,12311373,259,280)
{
Interval=1
AutoStop=1
link(onTimer,13835737:doCreate,[(327,286)(327,349)])
}
Add(Timer,11405745,256,403)
{
Interval=600000
Enable=1
AutoStop=4
OverCall=1
link(onTimer,13835737:doDestroy,[(368,409)(368,356)])
}
Теперь назрел вопрос: можно ли как-то сделать так, чтоб когда я поставил галочку в чекбоксе в моей программе, она отключала все эти подсказки и в следующие разы запуска, она всегда там стояла. Еще раз повторюсь, чтоб когда надо я поставил галочку - подсказки перестали показываться, а когда убрал - опять стали появляться подсказки.
Поиск
Друзья
Администрация