Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 15.08.2011, 13:52
Snake22 Snake22 вне форума
Активный
 
Регистрация: 20.02.2011
Сообщения: 374
Репутация: 744
По умолчанию При смене раскладки пропадают кнопки и чекбоксы

Подскажите пожалуйста почему,и как это исправить, у меня в некоторых программах,где использую ХРман . при нажатии шифт+альт для смены языка,исчезают некоторые кнопки и чекбоксы,при этом если провести мышкой по месту где исчезла кнопка,она появляется.у меня Винда 7,дельфи 7
Ответить с цитированием
  #2  
Старый 15.08.2011, 13:57
Аватар для v1s2222
v1s2222 v1s2222 вне форума
Продвинутый
 
Регистрация: 07.09.2010
Сообщения: 726
Репутация: 26711
По умолчанию

Проблема делфи 7 (исчезают компоненты такие как TButton, TCheckBox, TStaticText). Лично я исправлял так:
Код:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var
  i: Integer;
begin
// Перерисовываю TButton, TCheckBox, TStaticText, TRadioButton
 
  for i:=0 to (ComponentCount - 1) do begin
    if(Components[i].ClassType = TButton) then
      TButton(Components[i]).Repaint;
 
    if(Components[i].ClassType = TCheckBox) then
      TCheckBox(Components[i]).Repaint;
 
    if(Components[i].ClassType = TStaticText) then
      TStaticText(Components[i]).Repaint;
 
    if(Components[i].ClassType = TRadioButton) then
      TRadioButton(Components[i]).Repaint;
  end;
end;
Конечно это далеко не идеальный вариант, тут идет цикл по всем компонентам, но все-таки как по мне этот вариант лучше, чем например тот же таймер (как советовали на др. форуме).
__________________
Помогаю за Спасибо

Последний раз редактировалось v1s2222, 15.08.2011 в 13:59.
Ответить с цитированием
  #3  
Старый 15.08.2011, 14:06
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

можно образец?
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #4  
Старый 15.08.2011, 15:15
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Цитата:
Сообщение от v1s2222
Проблема делфи 7 (исчезают компоненты такие как TButton, TCheckBox, TStaticText). ...
Странная какая то Дельфи, у моей таких глюков не наблюдалось.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #5  
Старый 15.08.2011, 16:06
Аватар для v1s2222
v1s2222 v1s2222 вне форума
Продвинутый
 
Регистрация: 07.09.2010
Сообщения: 726
Репутация: 26711
По умолчанию

Читаем.
__________________
Помогаю за Спасибо
Ответить с цитированием
  #6  
Старый 15.08.2011, 16:19
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

гг, прикольно) Steps to Reproduce сделал, на теме Windows XP TStaticText реально при нажатии на Alt исчезает
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #7  
Старый 15.08.2011, 21:47
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Тогда понятно, у меня все проекты на API и мне поровну как Дельфи работает со своими манифестами.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #8  
Старый 16.08.2011, 09:23
Snake22 Snake22 вне форума
Активный
 
Регистрация: 20.02.2011
Сообщения: 374
Репутация: 744
По умолчанию

Цитата:
Сообщение от v1s2222
ага спасибо,скачал фикс компонент ,норм
Ответить с цитированием
  #9  
Старый 18.06.2012, 14:04
Wild Pointer Wild Pointer вне форума
Прохожий
 
Регистрация: 18.06.2012
Сообщения: 1
Версия Delphi: 7.0.4.453
Репутация: 10
Вопрос

Цитата:
Сообщение от Snake22
ага спасибо,скачал фикс компонент ,норм
А где? Можно ссылку?
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 12:05.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025