FreePascal.ru

Да, вот тут вот нарыл http://www.interface.ru/home.asp?artId=21418
Как вариант можно ещё autocomplete у tlabelededit, но не то.

Хочу при вводе в tlabelededit выводить список уже имеющихся записей в виде выпадающего списка. Типа как сейчас модно при поиске вводишь искомое, выпадает меню с вариантами. Вот так надо.

Поискал чембы это реализовать, не нашёл. Самое просто это через combobox. Но хочется чего нить посовременний ...

GAMER
Спасибо, обязательно почитаю.

С проблемой я уж разобрался, ответ дал выше.

Формы создаются самым делитанским образом. Т.е. дефолтно. Т.е. когда программа стартует создаются все формы и ждут своего часа, т.е. когда им дадут команду показатся. Много раз слышал, что нужно форму создавать только когда она нужна, а после показа ...

Ёлки палки. Теперь понятно что случилось. На главной форме FormStyle = fsStayOnTop. И я понял почему это стало вдруг так, а не как должно быть FormStyle = fsNormal. Вы не замечали что иногда когда в опциях надо что-то выбрать и вы нажимаете кнопу выпадающего меню, то оно иногда сразу пропадает, а ...

Т.е. вы предлагаете закрывать обо окна при нажатии esc? Ну та, тогда проблем не будет с тем что приложение заблокировано. Но тогда вообще весь смысл теряется. В третьей форме какраз предлагается произвести действия важные для пользователя. А во второй другие настройки которые по смыслу не должны ...

dunin
Тема конечно интересная, но не в ней дело явно. Мне то как раз и надо из одного окна вызвать другое. По другому смысол теряется.

Какие альтернативы? Кроме Show, потому как неудобно юзать окна после этого. Да и желательно блокировать предыдущее окно чтоб делов неправильных не натворить.

Так, ну а по моему вопросу есть предложения? Как так получается что вызывая Close в одной форме получается петрушка в другой.

GAMER
Через крестик тот же эффект

да, чёт я тормазнул...

// Вызов 2 формы
procedure TMain.MAddUserClick(Sender: TObject);
begin
WAddEditUser.Tag := 0;
WAddEditUser.ShowModal;
end;

// Взов 3 формы из 2
procedure TWAddEditUser.LicListDblClick(Sender:TObject);
begin
WAddEditLic.Tag &#58 ...

Да-да, тема избита. Но у меня немного другая проблема.

Знаю как закрыть окно по клавише. Как перехватывать и т.д. Проблема в другом.

Есть 3 формы. Из 1 (главная форма программы) формы можно вызвать 2 и 3 форму. 2 и 3 формы закрываются по esc. Если вызвать из 2 формы 3 и нажать esc то зыкрывается ...

То что нужно... Теперь много чего придётся переделывать...
спасибо.

Подскажите как сделать как на скрине? Чтоб бегунок не появлялся пока нет реальной колонки, а только её имитация.

Вот этот код скрывает:

Вот куда воткнуть чтоб при запуске программы изначально не видеть ничего нигде, кроме свой формы?