Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.04.2013, 14:18   #21
viks1
человек
Форумчанин
 
Аватар для viks1
 
Регистрация: 11.05.2009
Сообщений: 517
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
А вдруг в Edit2 Enabled=False? Тогда исключение подымется. Обычно делаю это в OnKeyUp, что в принципе не важно, но чуть по другому, в соответствии с TabOrder
Код:
procedure TForm1.Edit1KeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
var xControl: TWinControl;
begin
  if Key<>13 then Exit;
  xControl:=FindNextControl(Sender as TWinControl,True,True,False);
  if xControl<>nil then ActiveControl:=xControl;
end;
ADD

WM_NEXTDLGCTL и не приметил
я немного не понял что за функции или команды, даже как их назвать)
можете объяснить вот это?
if Key<>13 then Exit; // если не Entrer то выход из чего куда?
xControl:=FindNextControl(Sender as TWinControl,True,True,False);
if xControl<>nil then ActiveControl:=xControl;
end;

дальше я не понял)
viks1 вне форума Ответить с цитированием
Старый 16.04.2013, 14:23   #22
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Цитата:
если не Entrer то выход из чего куда
Просто выход из обработчика события, дальнейший код в нем не выполняется
FindNextControl - ищет следующий TWinControl, которому можно фокус ввода передать
Если найден, то и передается
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 16.04.2013, 14:25   #23
viks1
человек
Форумчанин
 
Аватар для viks1
 
Регистрация: 11.05.2009
Сообщений: 517
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
Просто выход из обработчика события, дальнейший код в нем не выполняется
FindNextControl - ищет следующий TWinControl, которому можно фокус ввода передать
Если найден, то и передается
это так сказать универсальный передатчик фокуса?
viks1 вне форума Ответить с цитированием
Старый 16.04.2013, 14:58   #24
viks1
человек
Форумчанин
 
Аватар для viks1
 
Регистрация: 11.05.2009
Сообщений: 517
По умолчанию Справка

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

Например:
Для того что бы управлять объектом вам надо знать что:
e - больше скорости
q - меньше скорости
a - назад
s - вниз
d - вправо
w - вверх

Новую форму создавать не охота. Можно это как то каким то сообщением вывести?(сообщением я знаю как) или компонент есть какой то такой?
viks1 вне форума Ответить с цитированием
Старый 16.04.2013, 22:02   #25
domovou
Пользователь
 
Аватар для domovou
 
Регистрация: 01.09.2012
Сообщений: 88
По умолчанию

Цитата:
Сообщение от viks1 Посмотреть сообщение
Такой вопрос, Как лучше всего вывести справку к программе?
там небольшой текст с обозначениями типа что куда нажимать и зачем.
...
Код:
ShowMessage('');
Программист - это не тот, кто пишет программы, а тот, чьи программы работают.
domovou вне форума Ответить с цитированием
Старый 16.04.2013, 23:07   #26
Yurk@
Участник клуба
 
Аватар для Yurk@
 
Регистрация: 19.12.2007
Сообщений: 1,100
По умолчанию

Цитата:
Можно это как то каким то сообщением вывести?
многострочный Hint в трее, не?
На форуме: Помогаю за спасибо
ICQ\Skype: Это моё личное время ...
Yurk@ вне форума Ответить с цитированием
Старый 16.04.2013, 23:08   #27
viks1
человек
Форумчанин
 
Аватар для viks1
 
Регистрация: 11.05.2009
Сообщений: 517
По умолчанию

Цитата:
Сообщение от Yurk@ Посмотреть сообщение
многострочный Hint в трее, не?
это что?)
я сделал в панель. Создал панель и туда поместил Label (много label) и кнопку ОК которая скрывает панель.
viks1 вне форума Ответить с цитированием
Старый 16.04.2013, 23:44   #28
alextrof94
Форумчанин
 
Регистрация: 16.03.2013
Сообщений: 599
По умолчанию

Проще showmessage('первая строка'+#13+'вторая строка'+#13+'третья строка');
Она вылезает как дочернее окно, которое не дает вернуться к главному окну, пока ее не закроют, или не нажмут ОК. А про трей вообще забудь.
alextrof94$gmail.com
alextrof94 вне форума Ответить с цитированием
Старый 16.04.2013, 23:45   #29
alextrof94
Форумчанин
 
Регистрация: 16.03.2013
Сообщений: 599
По умолчанию

И кстати. Вы правила читали?! ОДИН вопрос на ОДНУ тему.
alextrof94$gmail.com
alextrof94 вне форума Ответить с цитированием
Старый 16.04.2013, 23:49   #30
viks1
человек
Форумчанин
 
Аватар для viks1
 
Регистрация: 11.05.2009
Сообщений: 517
По умолчанию

Цитата:
Сообщение от alextrof94 Посмотреть сообщение
И кстати. Вы правила читали?! ОДИН вопрос на ОДНУ тему.
Читал. Но все же, если так подумать, лучше создавать много тем мелочных? или одну, где можно задать мелкие вопросы на которые ответить можно 1 пост.

Если же лучше что бы создавать много таких тем, не вопрос, создам потом.
viks1 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Идиотский звук при нажатии enter у TEdit Crystallon Общие вопросы Delphi 3 22.06.2011 07:33
Переход по нажатию ENTER в заданном порядке Dog_DinGo Microsoft Office Excel 9 28.02.2011 12:18
Переключения между Edit-ами??? FantomasRUS Общие вопросы Delphi 4 30.04.2010 13:27
По нажатию Enter Cpluser Общие вопросы .NET 4 30.04.2009 10:28
По нажатию Enter Andr Общие вопросы Delphi 8 22.12.2008 16:58